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

Time bar (total: 10.5s)

analyze148.0ms (1.4%)

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 20 to 14 computations (30% saved)

Precisions
Click to see histograms. Total time spent on operations: 83.0ms
ival-mult: 49.0ms (59.2% of total)
ival-sqrt: 15.0ms (18.1% of total)
ival-add: 6.0ms (7.2% of total)
ival-sub: 5.0ms (6% of total)
ival->: 5.0ms (6% of total)
const: 1.0ms (1.2% of total)
backward-pass: 0.0ms (0% of total)

sample1.8s (17%)

Results
749.0ms6210×0valid
427.0ms1226×2valid
103.0ms598×1valid
102.0ms222×3valid
Precisions
Click to see histograms. Total time spent on operations: 960.0ms
ival-mult: 431.0ms (44.9% of total)
ival-sqrt: 226.0ms (23.6% of total)
ival-add: 94.0ms (9.8% of total)
ival-sub: 87.0ms (9.1% of total)
backward-pass: 54.0ms (5.6% of total)
ival->: 50.0ms (5.2% of total)
const: 17.0ms (1.8% of total)
Bogosity

preprocess111.0ms (1.1%)

Algorithm
egg-herbie
Rules
1110×fnmadd-define
804×fmsub-define
764×fnmsub-define
668×fma-define
602×fmm-def
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03662
18760
217760
337160
478660
5124460
6178960
7248860
8319760
9333260
01210
11910
23210
35210
48210
512910
624010
741110
866110
990110
10120010
11142510
12148610
13156610
14168010
15180410
16192810
17196110
18196910
0196910
Stop Event
iter limit
saturated
saturated
Calls
Call 1
Inputs
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
Outputs
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
Call 2
Inputs
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* (neg re) (neg re)) (* im im))) (neg re)))))
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* (neg im) (neg im)))) re))))
(neg (* 1/2 (sqrt (* 2 (- (sqrt (+ (* (neg re) (neg re)) (* im im))) (neg re))))))
(neg (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* (neg im) (neg im)))) re)))))
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* im im) (* re re))) im))))
Outputs
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
(* 1/2 (sqrt (* 2 (- (hypot re im) re))))
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* (neg re) (neg re)) (* im im))) (neg re)))))
(* 1/2 (sqrt (* 2 (+ re (hypot re im)))))
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* (neg im) (neg im)))) re))))
(* 1/2 (sqrt (* 2 (- (hypot re im) re))))
(neg (* 1/2 (sqrt (* 2 (- (sqrt (+ (* (neg re) (neg re)) (* im im))) (neg re))))))
(* (sqrt (* 2 (+ re (hypot re im)))) -1/2)
(neg (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* (neg im) (neg im)))) re)))))
(* (sqrt (* 2 (- (hypot re im) re))) -1/2)
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* im im) (* re re))) im))))
(* 1/2 (sqrt (* 2 (- (hypot re im) im))))
Symmetry

(abs im)

explain149.0ms (1.4%)

FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1280-2(-6.041995866794372e-223 1.1059976078213714e-158)(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
370-0-(-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
350-2(651160067.4273511 1.6751423117530594e-151)(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
00-0-#s(literal 1/2 binary64)
00-0-(*.f64 im im)
00-0-re
00-0-#s(literal 2 binary64)
00-0-(+.f64 (*.f64 re re) (*.f64 im im))
00-0-im
00-0-(*.f64 re re)
00-0-(*.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))))
Results
41.0ms360×0valid
35.0ms98×2valid
12.0ms40×1valid
7.0ms14×3valid
Compiler

Compiled 173 to 38 computations (78% saved)

Precisions
Click to see histograms. Total time spent on operations: 51.0ms
ival-mult: 22.0ms (43.4% of total)
ival-sqrt: 13.0ms (25.6% of total)
backward-pass: 6.0ms (11.8% of total)
ival-sub: 4.0ms (7.9% of total)
ival-add: 4.0ms (7.9% of total)
const: 1.0ms (2% of total)

eval0.0ms (0%)

Compiler

Compiled 12 to 9 computations (25% saved)

prune1.0ms (0%)

Alt Table
Click to see full alt table
StatusAccuracyProgram
74.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
39.6%
(*.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 29 to 21 computations (27.6% saved)

simplify62.0ms (0.6%)

Algorithm
egg-herbie
Localize:

Found 8 expressions of interest:

NewMetricScoreProgram
cost-diff0
(-.f64 (hypot.f64 re im) re)
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-diff320
(-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
cost-diff320
(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
cost-diff320
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
cost-diff320
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))
Rules
584×fnmadd-define
408×fnmsub-define
408×fmsub-define
406×sum3-define
402×fma-define
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01286
11986
23286
35286
48286
512986
624086
741186
866186
990186
10120086
11142586
12148686
13156686
14168086
15180486
16192886
17196186
18196986
0196986
Stop Event
iter limit
saturated
Calls
Call 1
Inputs
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
1/2
(sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))
(* 2 (- (sqrt (+ (* re re) (* im im))) re))
2
(- (sqrt (+ (* re re) (* im im))) re)
(sqrt (+ (* re re) (* im im)))
(+ (* re re) (* im im))
(* re re)
re
(* im im)
im
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
1/2
(sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))
(* 2 (- (sqrt (+ (* re re) (* im im))) re))
2
(- (sqrt (+ (* re re) (* im im))) re)
(sqrt (+ (* re re) (* im im)))
re
im
Outputs
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
1/2
#s(literal 1/2 binary64)
(sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))
(* 2 (- (sqrt (+ (* re re) (* im im))) re))
(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
2
#s(literal 2 binary64)
(- (sqrt (+ (* re re) (* im im))) re)
(-.f64 (hypot.f64 re im) re)
(sqrt (+ (* re re) (* im im)))
(hypot.f64 re im)
(+ (* re re) (* im im))
(+.f64 (*.f64 re re) (*.f64 im im))
(* re re)
(*.f64 re re)
re
(* im im)
(*.f64 im im)
im
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
1/2
#s(literal 1/2 binary64)
(sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))
(* 2 (- (sqrt (+ (* re re) (* im im))) re))
(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
2
#s(literal 2 binary64)
(- (sqrt (+ (* re re) (* im im))) re)
(-.f64 (hypot.f64 re im) re)
(sqrt (+ (* re re) (* im im)))
(hypot.f64 re im)
re
im

localize146.0ms (1.4%)

Localize:

Found 8 expressions of interest:

NewMetricScoreProgram
accuracy100.0%
(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
accuracy100.0%
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))
accuracy99.9%
(-.f64 (hypot.f64 re im) re)
accuracy100.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))))
accuracy100.0%
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
accuracy99.9%
(-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
accuracy68.8%
(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
Results
78.0ms76×5exit
38.0ms180×0valid
Compiler

Compiled 115 to 18 computations (84.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 79.0ms
ival-mult: 28.0ms (35.3% of total)
backward-pass: 15.0ms (18.9% of total)
ival-sqrt: 14.0ms (17.7% of total)
compiled-spec: 12.0ms (15.1% of total)
ival-sub: 6.0ms (7.6% of total)
ival-add: 4.0ms (5% of total)
const: 1.0ms (1.3% of total)

series23.0ms (0.2%)

Counts
9 → 216
Calls
Call 1
Inputs
#<alt (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))>
#<alt (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))>
#<alt (* 2 (- (sqrt (+ (* re re) (* im im))) re))>
#<alt (- (sqrt (+ (* re re) (* im im))) re)>
#<alt (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))>
#<alt (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))>
#<alt (* 2 (- (sqrt (+ (* re re) (* im im))) re))>
#<alt (- (sqrt (+ (* re re) (* im im))) re)>
#<alt (sqrt (+ (* re re) (* im im)))>
Outputs
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))>
#<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)))))))>
#<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))))))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<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)))))>
#<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))))))>
#<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)))))))>
#<alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<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))))))>
#<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)))))))>
#<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))))))))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<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))))))>
#<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)))))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<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))))))))>
#<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))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))>
#<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)))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<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))))>
#<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)))))>
#<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))))))>
#<alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))>
#<alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))>
#<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))))))>
#<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))))))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<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)))))>
#<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)))))))>
#<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))))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))>
#<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)))))>
#<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))))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))>
#<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)))))))>
#<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)))))))>
#<alt (* 2 im)>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (+ (* 2 im) (* re (- (/ re im) 2)))>
#<alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))>
#<alt (/ (pow im 2) re)>
#<alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)>
#<alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)>
#<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)>
#<alt (* -4 re)>
#<alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))>
#<alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))>
#<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)))))))>
#<alt (/ (pow im 2) re)>
#<alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))>
#<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)))>
#<alt (* 2 im)>
#<alt (* im (+ 2 (* -2 (/ re im))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))>
#<alt (* -2 im)>
#<alt (* -1 (* im (+ 2 (* 2 (/ re im)))))>
#<alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))>
#<alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))>
#<alt im>
#<alt (+ im (* -1 re))>
#<alt (+ im (* re (- (* 1/2 (/ re im)) 1)))>
#<alt (+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))>
#<alt (* 1/2 (/ (pow im 2) re))>
#<alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)>
#<alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)>
#<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)>
#<alt (* -2 re)>
#<alt (* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))>
#<alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))>
#<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))))))))>
#<alt (* 1/2 (/ (pow im 2) re))>
#<alt (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))>
#<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))))>
#<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))))>
#<alt im>
#<alt (* im (+ 1 (* -1 (/ re im))))>
#<alt (* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))>
#<alt (* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))>
#<alt (* -1 im)>
#<alt (* -1 (* im (+ 1 (/ re im))))>
#<alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))>
#<alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))>
#<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)))))))>
#<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))))))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<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)))))>
#<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))))))>
#<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)))))))>
#<alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<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))))))>
#<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)))))))>
#<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))))))))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<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))))))>
#<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)))))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<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))))))))>
#<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))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))>
#<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)))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<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))))>
#<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)))))>
#<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))))))>
#<alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))>
#<alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))>
#<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))))))>
#<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))))))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<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)))))>
#<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)))))))>
#<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))))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))>
#<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)))))>
#<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))))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))>
#<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)))))))>
#<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)))))))>
#<alt (* 2 im)>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (+ (* 2 im) (* re (- (/ re im) 2)))>
#<alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))>
#<alt (/ (pow im 2) re)>
#<alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)>
#<alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)>
#<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)>
#<alt (* -4 re)>
#<alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))>
#<alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))>
#<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)))))))>
#<alt (/ (pow im 2) re)>
#<alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))>
#<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)))>
#<alt (* 2 im)>
#<alt (* im (+ 2 (* -2 (/ re im))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))>
#<alt (* -2 im)>
#<alt (* -1 (* im (+ 2 (* 2 (/ re im)))))>
#<alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))>
#<alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))>
#<alt im>
#<alt (+ im (* -1 re))>
#<alt (+ im (* re (- (* 1/2 (/ re im)) 1)))>
#<alt (+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))>
#<alt (* 1/2 (/ (pow im 2) re))>
#<alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)>
#<alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)>
#<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)>
#<alt (* -2 re)>
#<alt (* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))>
#<alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))>
#<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))))))))>
#<alt (* 1/2 (/ (pow im 2) re))>
#<alt (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))>
#<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))))>
#<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))))>
#<alt im>
#<alt (* im (+ 1 (* -1 (/ re im))))>
#<alt (* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))>
#<alt (* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))>
#<alt (* -1 im)>
#<alt (* -1 (* im (+ 1 (/ re im))))>
#<alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))>
#<alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))>
#<alt im>
#<alt (+ im (* 1/2 (/ (pow re 2) im)))>
#<alt (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))>
#<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)))))>
#<alt re>
#<alt (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))>
#<alt (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))>
#<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)))))))>
#<alt (* -1 re)>
#<alt (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))>
#<alt (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))>
#<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))))))))>
#<alt re>
#<alt (+ re (* 1/2 (/ (pow im 2) re)))>
#<alt (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))>
#<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)))))>
#<alt im>
#<alt (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))>
#<alt (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))>
#<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)))))))>
#<alt (* -1 im)>
#<alt (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))>
#<alt (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))>
#<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))))))))>
Calls

54 calls:

TimeVariablePointExpression
3.0ms
im
@inf
(- (sqrt (+ (* re re) (* im im))) re)
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
im
@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))))

rewrite277.0ms (2.6%)

Algorithm
batch-egg-rewrite
Rules
2826×*-lowering-*.f32
2826×*-lowering-*.f64
1848×/-lowering-/.f32
1848×/-lowering-/.f64
1472×+-lowering-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01263
15063
239663
3490163
0842763
Stop Event
iter limit
node limit
Counts
9 → 283
Calls
Call 1
Inputs
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
(sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))
(* 2 (- (sqrt (+ (* re re) (* im im))) re))
(- (sqrt (+ (* re re) (* im im))) re)
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
(sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))
(* 2 (- (sqrt (+ (* re re) (* im im))) re))
(- (sqrt (+ (* re re) (* im im))) re)
(sqrt (+ (* re re) (* im im)))
Outputs
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))) (sqrt.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))))) (sqrt.f64 (+.f64 re (hypot.f64 re im))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (hypot.f64 re im) re))))
(*.f64 (sqrt.f64 (-.f64 (hypot.f64 re im) re)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (hypot.f64 re im) re))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.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 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))) (sqrt.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))))) (sqrt.f64 (+.f64 re (hypot.f64 re im))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))) (sqrt.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))))) (sqrt.f64 (+.f64 re (hypot.f64 re im))))
(/.f64 (*.f64 (sqrt.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (+.f64 re (hypot.f64 re im))))
(pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.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 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (-.f64 (hypot.f64 re im) re)))
(*.f64 (sqrt.f64 (-.f64 (hypot.f64 re im) re)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)))
(+.f64 (*.f64 #s(literal 2 binary64) (hypot.f64 re im)) (*.f64 #s(literal -2 binary64) re))
(+.f64 (*.f64 #s(literal -2 binary64) re) (*.f64 #s(literal 2 binary64) (hypot.f64 re im)))
(-.f64 (*.f64 #s(literal 2 binary64) (hypot.f64 re im)) (*.f64 re #s(literal 2 binary64)))
(-.f64 (*.f64 #s(literal 2 binary64) (hypot.f64 re im)) (*.f64 #s(literal 2 binary64) re))
(fma.f64 #s(literal 2 binary64) (hypot.f64 re im) (*.f64 #s(literal -2 binary64) re))
(fma.f64 (hypot.f64 re im) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) re))
(/.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (hypot.f64 re im) re)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))) (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re (hypot.f64 re im)) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))))))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im)))))
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 re (hypot.f64 re im)))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (+.f64 re (hypot.f64 re im))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (hypot.f64 re im)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -2 binary64) re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (hypot.f64 re im)) (*.f64 #s(literal 2 binary64) (hypot.f64 re im))) (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) re) (*.f64 #s(literal -2 binary64) re)) (*.f64 (*.f64 #s(literal 2 binary64) (hypot.f64 re im)) (*.f64 #s(literal -2 binary64) re)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) (hypot.f64 re im)) (*.f64 #s(literal 2 binary64) (hypot.f64 re im))) (*.f64 (*.f64 #s(literal -2 binary64) re) (*.f64 #s(literal -2 binary64) re))) (-.f64 (*.f64 #s(literal 2 binary64) (hypot.f64 re im)) (*.f64 #s(literal -2 binary64) re)))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (neg.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re re))) (-.f64 #s(literal 0 binary64) (+.f64 re (hypot.f64 re im))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (*.f64 (+.f64 (neg.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re re)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 re (hypot.f64 re im))))
(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
(*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))
(*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) #s(literal 2 binary64)))
(*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 2 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(*.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)))
(*.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))) (/.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(*.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (pow.f64 (*.f64 re (+.f64 re (hypot.f64 re im))) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (*.f64 re (+.f64 re (hypot.f64 re im))) (-.f64 (*.f64 re (+.f64 re (hypot.f64 re im))) (+.f64 (*.f64 re re) (*.f64 im im))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (pow.f64 (*.f64 re (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)))) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re)))) (-.f64 (hypot.f64 re im) re))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im))))))
(+.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re))
(+.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im))
(+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) (neg.f64 (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))))
(+.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im))) (neg.f64 (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im)))))
(-.f64 (hypot.f64 re im) re)
(-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(-.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im))) (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im))))
(-.f64 #s(literal 0 binary64) (-.f64 re (hypot.f64 re im)))
(-.f64 (+.f64 (hypot.f64 re im) #s(literal 0 binary64)) re)
(fma.f64 #s(literal -1 binary64) re (hypot.f64 re im))
(fma.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)) (-.f64 #s(literal 0 binary64) re))
(neg.f64 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))))
(neg.f64 (/.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) (+.f64 re (hypot.f64 re im)))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(neg.f64 (/.f64 (+.f64 (neg.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re re)) (+.f64 re (hypot.f64 re im))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im)))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (neg.f64 (*.f64 re (hypot.f64 re im))))))
(/.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))) (+.f64 re (hypot.f64 re im)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (hypot.f64 re im) re)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im)))) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (neg.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im))))))
(/.f64 (+.f64 (neg.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re re)) (-.f64 #s(literal 0 binary64) (+.f64 re (hypot.f64 re im))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 9/2 binary64)) (*.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re re)))) (*.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 re re)) (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 (hypot.f64 re im) re))))
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re)))) (*.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))) (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))))
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re)))) (*.f64 (+.f64 re (hypot.f64 re im)) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (*.f64 re re) (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))))))
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (+.f64 re (hypot.f64 re im)) (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) (*.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))) (*.f64 re (*.f64 re re)))) (*.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im))) (*.f64 (+.f64 re (hypot.f64 re im)) (*.f64 re re))) (*.f64 (+.f64 re (hypot.f64 re im)) (+.f64 re (hypot.f64 re im))))
(/.f64 (*.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))) #s(literal 1 binary64)) (+.f64 re (hypot.f64 re im)))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 9/2 binary64)) (*.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re re)))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 re re)) (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re)))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re)))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (*.f64 re re) (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))) (+.f64 re (hypot.f64 re im))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (*.f64 re (*.f64 re re)))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (+.f64 re (hypot.f64 re im))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))))
(/.f64 (neg.f64 (+.f64 (neg.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re re))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 re (hypot.f64 re im)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) (/.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))) (+.f64 (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))) (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im))) (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im)))) (+.f64 (*.f64 (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im))) (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im)))) (*.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im))) (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im)))))))
(/.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (-.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im)))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) (/.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))) (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im))) (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im)))) (*.f64 (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im))) (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im))))) (+.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im))) (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) #s(literal 1 binary64)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 9/2 binary64)) (*.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 re re)) (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))) (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im)))) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (*.f64 re re) (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im)))) (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))
(pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im))))))
(*.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))) (*.f64 (-.f64 (hypot.f64 re im) re) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))))
(*.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))) (/.f64 (-.f64 (hypot.f64 re im) re) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(*.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))) (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))))
(*.f64 (+.f64 re (hypot.f64 re im)) (*.f64 (-.f64 (hypot.f64 re im) re) (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im)))))
(*.f64 (+.f64 re (hypot.f64 re im)) (/.f64 (-.f64 (hypot.f64 re im) re) (+.f64 re (hypot.f64 re im))))
(*.f64 #s(literal 1 binary64) (-.f64 (hypot.f64 re im) re))
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))))
(*.f64 (+.f64 (neg.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re re)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 re (hypot.f64 re im)))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))))
(*.f64 (/.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re)))) (-.f64 (hypot.f64 re im) re))
(*.f64 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (pow.f64 (*.f64 re (+.f64 re (hypot.f64 re im))) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (*.f64 re (+.f64 re (hypot.f64 re im))) (-.f64 (*.f64 re (+.f64 re (hypot.f64 re im))) (+.f64 (*.f64 re re) (*.f64 im im))))))
(*.f64 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (pow.f64 (*.f64 re (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)))) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(*.f64 (/.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))) (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im))))))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))) (sqrt.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))))) (sqrt.f64 (+.f64 re (hypot.f64 re im))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (hypot.f64 re im) re))))
(*.f64 (sqrt.f64 (-.f64 (hypot.f64 re im) re)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (hypot.f64 re im) re))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.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 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))) (sqrt.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))))) (sqrt.f64 (+.f64 re (hypot.f64 re im))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))) (sqrt.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))))) (sqrt.f64 (+.f64 re (hypot.f64 re im))))
(/.f64 (*.f64 (sqrt.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (+.f64 re (hypot.f64 re im))))
(pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.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 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (-.f64 (hypot.f64 re im) re)))
(*.f64 (sqrt.f64 (-.f64 (hypot.f64 re im) re)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)))
(+.f64 (*.f64 #s(literal 2 binary64) (hypot.f64 re im)) (*.f64 #s(literal -2 binary64) re))
(+.f64 (*.f64 #s(literal -2 binary64) re) (*.f64 #s(literal 2 binary64) (hypot.f64 re im)))
(-.f64 (*.f64 #s(literal 2 binary64) (hypot.f64 re im)) (*.f64 re #s(literal 2 binary64)))
(-.f64 (*.f64 #s(literal 2 binary64) (hypot.f64 re im)) (*.f64 #s(literal 2 binary64) re))
(fma.f64 #s(literal 2 binary64) (hypot.f64 re im) (*.f64 #s(literal -2 binary64) re))
(fma.f64 (hypot.f64 re im) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) re))
(/.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (hypot.f64 re im) re)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))) (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re (hypot.f64 re im)) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))))))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im)))))
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 re (hypot.f64 re im)))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (+.f64 re (hypot.f64 re im))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (hypot.f64 re im)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -2 binary64) re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (hypot.f64 re im)) (*.f64 #s(literal 2 binary64) (hypot.f64 re im))) (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) re) (*.f64 #s(literal -2 binary64) re)) (*.f64 (*.f64 #s(literal 2 binary64) (hypot.f64 re im)) (*.f64 #s(literal -2 binary64) re)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) (hypot.f64 re im)) (*.f64 #s(literal 2 binary64) (hypot.f64 re im))) (*.f64 (*.f64 #s(literal -2 binary64) re) (*.f64 #s(literal -2 binary64) re))) (-.f64 (*.f64 #s(literal 2 binary64) (hypot.f64 re im)) (*.f64 #s(literal -2 binary64) re)))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (neg.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re re))) (-.f64 #s(literal 0 binary64) (+.f64 re (hypot.f64 re im))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (*.f64 (+.f64 (neg.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re re)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 re (hypot.f64 re im))))
(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
(*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))
(*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) #s(literal 2 binary64)))
(*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 2 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(*.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)))
(*.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))) (/.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(*.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (pow.f64 (*.f64 re (+.f64 re (hypot.f64 re im))) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (*.f64 re (+.f64 re (hypot.f64 re im))) (-.f64 (*.f64 re (+.f64 re (hypot.f64 re im))) (+.f64 (*.f64 re re) (*.f64 im im))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (pow.f64 (*.f64 re (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)))) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re)))) (-.f64 (hypot.f64 re im) re))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im))))))
(+.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re))
(+.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im))
(+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) (neg.f64 (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))))
(+.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im))) (neg.f64 (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im)))))
(-.f64 (hypot.f64 re im) re)
(-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(-.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im))) (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im))))
(-.f64 #s(literal 0 binary64) (-.f64 re (hypot.f64 re im)))
(-.f64 (+.f64 (hypot.f64 re im) #s(literal 0 binary64)) re)
(fma.f64 #s(literal -1 binary64) re (hypot.f64 re im))
(fma.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)) (-.f64 #s(literal 0 binary64) re))
(neg.f64 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))))
(neg.f64 (/.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) (+.f64 re (hypot.f64 re im)))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(neg.f64 (/.f64 (+.f64 (neg.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re re)) (+.f64 re (hypot.f64 re im))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im)))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (neg.f64 (*.f64 re (hypot.f64 re im))))))
(/.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))) (+.f64 re (hypot.f64 re im)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (hypot.f64 re im) re)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im)))) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (neg.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im))))))
(/.f64 (+.f64 (neg.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re re)) (-.f64 #s(literal 0 binary64) (+.f64 re (hypot.f64 re im))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 9/2 binary64)) (*.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re re)))) (*.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 re re)) (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 (hypot.f64 re im) re))))
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re)))) (*.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))) (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))))
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re)))) (*.f64 (+.f64 re (hypot.f64 re im)) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (*.f64 re re) (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))))))
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (+.f64 re (hypot.f64 re im)) (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) (*.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))) (*.f64 re (*.f64 re re)))) (*.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im))) (*.f64 (+.f64 re (hypot.f64 re im)) (*.f64 re re))) (*.f64 (+.f64 re (hypot.f64 re im)) (+.f64 re (hypot.f64 re im))))
(/.f64 (*.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))) #s(literal 1 binary64)) (+.f64 re (hypot.f64 re im)))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 9/2 binary64)) (*.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re re)))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 re re)) (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re)))) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re)))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (*.f64 re re) (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))) (+.f64 re (hypot.f64 re im))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (*.f64 re (*.f64 re re)))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (+.f64 re (hypot.f64 re im))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))))
(/.f64 (neg.f64 (+.f64 (neg.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re re))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 re (hypot.f64 re im)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) (/.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))) (+.f64 (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))) (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im))) (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im)))) (+.f64 (*.f64 (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im))) (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im)))) (*.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im))) (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im)))))))
(/.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (-.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im)))
(/.f64 (-.f64 (*.f64 (/.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) (/.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))) (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))) (+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im))) (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im)))) (*.f64 (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im))) (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im))))) (+.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im))) (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im)))))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) #s(literal 1 binary64)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 9/2 binary64)) (*.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 re re)) (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))) (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im)))) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (*.f64 re re) (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im)))) (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))
(pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im))))))
(*.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))) (*.f64 (-.f64 (hypot.f64 re im) re) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))))
(*.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))) (/.f64 (-.f64 (hypot.f64 re im) re) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(*.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))) (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))))
(*.f64 (+.f64 re (hypot.f64 re im)) (*.f64 (-.f64 (hypot.f64 re im) re) (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im)))))
(*.f64 (+.f64 re (hypot.f64 re im)) (/.f64 (-.f64 (hypot.f64 re im) re) (+.f64 re (hypot.f64 re im))))
(*.f64 #s(literal 1 binary64) (-.f64 (hypot.f64 re im) re))
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))))
(*.f64 (+.f64 (neg.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re re)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 re (hypot.f64 re im)))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))))
(*.f64 (/.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re)))) (-.f64 (hypot.f64 re im) re))
(*.f64 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (pow.f64 (*.f64 re (+.f64 re (hypot.f64 re im))) #s(literal 3 binary64)))) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (*.f64 re (+.f64 re (hypot.f64 re im))) (-.f64 (*.f64 re (+.f64 re (hypot.f64 re im))) (+.f64 (*.f64 re re) (*.f64 im im))))))
(*.f64 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (pow.f64 (*.f64 re (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)))) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(*.f64 (/.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))) (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im))))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 re re) (*.f64 im im)))))
(hypot.f64 re im)
(hypot.f64 re (exp.f64 (log.f64 im)))
(hypot.f64 im re)
(hypot.f64 im (-.f64 #s(literal 0 binary64) re))
(hypot.f64 im (exp.f64 (log.f64 re)))
(hypot.f64 (-.f64 #s(literal 0 binary64) re) im)
(hypot.f64 (-.f64 #s(literal 0 binary64) 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)) (-.f64 #s(literal 0 binary64) re))
(hypot.f64 (exp.f64 (log.f64 im)) (exp.f64 (log.f64 re)))
(fabs.f64 (hypot.f64 re im))
(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (-.f64 (*.f64 im im) (*.f64 re re)))))) (hypot.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (sqrt.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re re) (*.f64 im im))))))
(/.f64 (hypot.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (-.f64 (*.f64 im im) (*.f64 re re)))))))
(/.f64 (sqrt.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re re) (*.f64 im im)))) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (-.f64 (*.f64 im im) (*.f64 re re))))))))
(/.f64 (sqrt.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 re re) (*.f64 im im))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re (*.f64 re re))))) (sqrt.f64 (-.f64 (*.f64 im im) (*.f64 re re))))
(/.f64 (neg.f64 (hypot.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (-.f64 (*.f64 im im) (*.f64 re re))))))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re re) (*.f64 im im))))) (neg.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))))
(pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64))
(pow.f64 (hypot.f64 re im) #s(literal 1 binary64))
(pow.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(*.f64 (hypot.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (-.f64 (*.f64 im im) (*.f64 re re)))))) #s(literal 1/2 binary64)))
(*.f64 (hypot.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (-.f64 (*.f64 im im) (*.f64 re re))))))))
(*.f64 (hypot.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (-.f64 (*.f64 im im) (*.f64 re re))))))))
(*.f64 (sqrt.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re re) (*.f64 im im)))) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 re im)) (-.f64 re im)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re re) (*.f64 im im)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 re im)) (-.f64 re im))))
(*.f64 (sqrt.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re re) (*.f64 im im)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))))
(*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (hypot.f64 re im)) (sqrt.f64 (hypot.f64 re im)))

simplify333.0ms (3.2%)

Algorithm
egg-herbie
Rules
6618×*-lowering-*.f32
6618×*-lowering-*.f64
2550×+-lowering-+.f64
2550×+-lowering-+.f32
1440×fma-lowering-fma.f32
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
05465244
119294958
276584956
083594956
Stop Event
iter limit
node limit
Counts
216 → 216
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))))))))
(* (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)))))
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)))))
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 (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))))
(+.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 re (+.f64 (*.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))))))))
(+.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 re (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64))) (*.f64 re (+.f64 (*.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) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/16 binary64))))))))
(* 1/2 (* (* 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)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) 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)))))
(+.f64 (*.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 im im))) (/.f64 (sqrt.f64 #s(literal 2 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))))))
(+.f64 (*.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 (*.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 im im))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (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)))))))
(+.f64 (*.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 im im))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.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 9 binary64)))) (+.f64 (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (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))) (/.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 (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 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) 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 #s(literal 0 binary64) (*.f64 re (-.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) #s(literal 1 binary64)) (/.f64 (+.f64 (*.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))) (pow.f64 im #s(literal 4 binary64)))) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 (*.f64 im im) #s(literal 1/8 binary64)) (sqrt.f64 #s(literal -1 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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) #s(literal 1 binary64)) (/.f64 (+.f64 (*.f64 (sqrt.f64 re) (*.f64 (*.f64 (*.f64 im im) #s(literal 1/8 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) (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 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* 1/2 (* (* 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)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) 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))))))
(*.f64 im (+.f64 (*.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 im im)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (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 (+.f64 (*.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 (*.f64 im im) (+.f64 (*.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 im im) (/.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))))))))
(* 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 (+.f64 (*.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 (*.f64 im im) (+.f64 (*.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 im (*.f64 im (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sqrt.f64 re) (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.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))))))))))
(* 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 (+.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (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/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (*.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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re 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 (+.f64 (*.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 (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 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))))
(* -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 (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal -1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.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 #s(literal 0 binary64) 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 (+.f64 (*.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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal -1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (*.f64 re (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) #s(literal -1/8 binary64))))) (-.f64 #s(literal 0 binary64) 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 (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal -1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (*.f64 re (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (sqrt.f64 im) #s(literal 3/16 binary64))) (*.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) 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)))
(+.f64 (*.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)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.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/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)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64))) (*.f64 re (+.f64 (*.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) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/8 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))))
(+.f64 (*.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))) (*.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 im im))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (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)))))
(+.f64 (*.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 im im))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.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))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 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/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))))))
(+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (+.f64 (*.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)))))) (+.f64 (*.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))) (*.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 im im))) (/.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 (+.f64 (*.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 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 #s(literal 0 binary64) 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 #s(literal 2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (+.f64 (*.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))) (pow.f64 im #s(literal 4 binary64)))) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) 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 (+.f64 (*.f64 (sqrt.f64 re) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 (*.f64 #s(literal -1/16 binary64) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 im #s(literal 4 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 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) 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 (+.f64 (*.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 im im)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (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 (+.f64 (*.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 im im) (+.f64 (*.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 (*.f64 im im) (/.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))))))))
(* 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 (+.f64 (*.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 im im) (+.f64 (*.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 im (*.f64 im (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 re) (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.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 #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))))))))))
(* (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 (+.f64 (*.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 (+.f64 (+.f64 (*.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)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re 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 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re)) #s(literal 1/8 binary64))) (+.f64 (*.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))))))
(* -1 (* (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 binary64)))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(*.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (*.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 #s(literal 0 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 (+.f64 (*.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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (*.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 2 binary64)) (*.f64 re (*.f64 re (sqrt.f64 #s(literal -1 binary64))))))))) (-.f64 #s(literal 0 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 (-.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (*.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 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (*.f64 re (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 #s(literal 3/8 binary64) (*.f64 im (*.f64 im im))))) (-.f64 #s(literal 0 binary64) im))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+.f64 (*.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)))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))))))))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/.f64 (+.f64 (*.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 (+.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (/.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 (+.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (/.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)))))
(*.f64 (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(*.f64 (+.f64 (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (-.f64 #s(literal 0 binary64) 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 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))))) (-.f64 #s(literal 0 binary64) 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) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (*.f64 re (*.f64 re 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) (+.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (/.f64 (*.f64 (*.f64 im im) #s(literal 1/8 binary64)) (pow.f64 re #s(literal 5 binary64)))))))
(* (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) (+.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 (*.f64 im im) (+.f64 (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal -5/64 binary64)) (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)))))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) (/.f64 (*.f64 re re) (*.f64 im im))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(*.f64 im (+.f64 (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) (/.f64 (*.f64 re re) (*.f64 im im))) (/.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)))))
(*.f64 im (*.f64 #s(literal -1 binary64) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) 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)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (+.f64 (*.f64 re re) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im))) im)) im)) (-.f64 #s(literal 0 binary64) im))
im
(+ im (* -1 re))
(-.f64 im re)
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+.f64 im (*.f64 re (+.f64 #s(literal -1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) re) im))))
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(+.f64 im (*.f64 re (+.f64 #s(literal -1 binary64) (*.f64 re (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1/2 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 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 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 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal 8 binary64))) #s(literal 5/64 binary64)) (pow.f64 re #s(literal 6 binary64))))) re)
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(*.f64 re (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re) re)) #s(literal -1 binary64)))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(*.f64 (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re) re)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (-.f64 #s(literal 0 binary64) 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 (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re) re)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))) (-.f64 #s(literal 0 binary64) 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) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.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) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re re))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 im im)) (pow.f64 re #s(literal 5 binary64)))))))
(* (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) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (*.f64 (*.f64 im im) (+.f64 (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 (*.f64 (*.f64 im im) #s(literal -5/128 binary64)) (pow.f64 re #s(literal 7 binary64))))) (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re re)))))))
im
(* im (+ 1 (* -1 (/ re im))))
(*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(*.f64 im (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (-.f64 #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 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))) (/.f64 re im)))))
(* -1 im)
(-.f64 #s(literal 0 binary64) im)
(* -1 (* im (+ 1 (/ re im))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 #s(literal 1 binary64) (/.f64 re im))))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 re re)) im) re) im)))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im)) (*.f64 #s(literal 1/2 binary64) (*.f64 re re))) (-.f64 #s(literal 0 binary64) im)) re) 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))))
(+.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 re (+.f64 (*.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))))))))
(+.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 re (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64))) (*.f64 re (+.f64 (*.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) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/16 binary64))))))))
(* 1/2 (* (* 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)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) 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)))))
(+.f64 (*.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 im im))) (/.f64 (sqrt.f64 #s(literal 2 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))))))
(+.f64 (*.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 (*.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 im im))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (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)))))))
(+.f64 (*.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 im im))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.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 9 binary64)))) (+.f64 (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (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))) (/.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 (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 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) 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 #s(literal 0 binary64) (*.f64 re (-.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) #s(literal 1 binary64)) (/.f64 (+.f64 (*.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))) (pow.f64 im #s(literal 4 binary64)))) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 (*.f64 im im) #s(literal 1/8 binary64)) (sqrt.f64 #s(literal -1 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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) #s(literal 1 binary64)) (/.f64 (+.f64 (*.f64 (sqrt.f64 re) (*.f64 (*.f64 (*.f64 im im) #s(literal 1/8 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) (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 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* 1/2 (* (* 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)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) 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))))))
(*.f64 im (+.f64 (*.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 im im)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (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 (+.f64 (*.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 (*.f64 im im) (+.f64 (*.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 im im) (/.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))))))))
(* 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 (+.f64 (*.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 (*.f64 im im) (+.f64 (*.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 im (*.f64 im (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sqrt.f64 re) (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.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))))))))))
(* 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 (+.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (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/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (*.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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re 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 (+.f64 (*.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 (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 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))))
(* -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 (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal -1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.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 #s(literal 0 binary64) 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 (+.f64 (*.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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal -1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (*.f64 re (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) #s(literal -1/8 binary64))))) (-.f64 #s(literal 0 binary64) 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 (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal -1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (*.f64 re (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (sqrt.f64 im) #s(literal 3/16 binary64))) (*.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) 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)))
(+.f64 (*.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)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.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/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)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64))) (*.f64 re (+.f64 (*.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) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/8 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))))
(+.f64 (*.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))) (*.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 im im))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (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)))))
(+.f64 (*.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 im im))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.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))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 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/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))))))
(+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (+.f64 (*.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)))))) (+.f64 (*.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))) (*.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 im im))) (/.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 (+.f64 (*.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 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 #s(literal 0 binary64) 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 #s(literal 2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (+.f64 (*.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))) (pow.f64 im #s(literal 4 binary64)))) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) 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 (+.f64 (*.f64 (sqrt.f64 re) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 (*.f64 #s(literal -1/16 binary64) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 im #s(literal 4 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 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) 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 (+.f64 (*.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 im im)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (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 (+.f64 (*.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 im im) (+.f64 (*.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 (*.f64 im im) (/.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))))))))
(* 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 (+.f64 (*.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 im im) (+.f64 (*.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 im (*.f64 im (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 re) (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.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 #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))))))))))
(* (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 (+.f64 (*.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 (+.f64 (+.f64 (*.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)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re 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 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re)) #s(literal 1/8 binary64))) (+.f64 (*.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))))))
(* -1 (* (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 binary64)))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(*.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (*.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 #s(literal 0 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 (+.f64 (*.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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (*.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 2 binary64)) (*.f64 re (*.f64 re (sqrt.f64 #s(literal -1 binary64))))))))) (-.f64 #s(literal 0 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 (-.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (*.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 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (*.f64 re (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 #s(literal 3/8 binary64) (*.f64 im (*.f64 im im))))) (-.f64 #s(literal 0 binary64) im))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+.f64 (*.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)))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))))))))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/.f64 (+.f64 (*.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 (+.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (/.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 (+.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (/.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)))))
(*.f64 (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(*.f64 (+.f64 (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (-.f64 #s(literal 0 binary64) 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 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))))) (-.f64 #s(literal 0 binary64) 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) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (*.f64 re (*.f64 re 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) (+.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (/.f64 (*.f64 (*.f64 im im) #s(literal 1/8 binary64)) (pow.f64 re #s(literal 5 binary64)))))))
(* (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) (+.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 (*.f64 im im) (+.f64 (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal -5/64 binary64)) (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)))))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) (/.f64 (*.f64 re re) (*.f64 im im))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(*.f64 im (+.f64 (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) (/.f64 (*.f64 re re) (*.f64 im im))) (/.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)))))
(*.f64 im (*.f64 #s(literal -1 binary64) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) 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)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (+.f64 (*.f64 re re) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im))) im)) im)) (-.f64 #s(literal 0 binary64) im))
im
(+ im (* -1 re))
(-.f64 im re)
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+.f64 im (*.f64 re (+.f64 #s(literal -1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) re) im))))
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(+.f64 im (*.f64 re (+.f64 #s(literal -1 binary64) (*.f64 re (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1/2 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 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 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 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal 8 binary64))) #s(literal 5/64 binary64)) (pow.f64 re #s(literal 6 binary64))))) re)
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(*.f64 re (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re) re)) #s(literal -1 binary64)))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(*.f64 (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re) re)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (-.f64 #s(literal 0 binary64) 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 (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re) re)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))) (-.f64 #s(literal 0 binary64) 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) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.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) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re re))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 im im)) (pow.f64 re #s(literal 5 binary64)))))))
(* (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) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (*.f64 (*.f64 im im) (+.f64 (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 (*.f64 (*.f64 im im) #s(literal -5/128 binary64)) (pow.f64 re #s(literal 7 binary64))))) (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re re)))))))
im
(* im (+ 1 (* -1 (/ re im))))
(*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(*.f64 im (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (-.f64 #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 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))) (/.f64 re im)))))
(* -1 im)
(-.f64 #s(literal 0 binary64) im)
(* -1 (* im (+ 1 (/ re im))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 #s(literal 1 binary64) (/.f64 re im))))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 re re)) im) re) im)))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im)) (*.f64 #s(literal 1/2 binary64) (*.f64 re re))) (-.f64 #s(literal 0 binary64) im)) re) im)))
im
(+ im (* 1/2 (/ (pow re 2) im)))
(+.f64 im (*.f64 (*.f64 re re) (/.f64 #s(literal 1/2 binary64) im)))
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+.f64 im (*.f64 (*.f64 re re) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1/2 binary64) 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)))))
(+.f64 im (*.f64 re (*.f64 re (+.f64 (/.f64 #s(literal 1/2 binary64) im) (*.f64 (*.f64 re re) (+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 re re)) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (*.f64 im (*.f64 im im)))))))))
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re) re)))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(*.f64 re (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) 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 (+ (* -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 re (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re) re) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))))
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re) re)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re) re) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))) (-.f64 #s(literal 0 binary64) 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))))))))
(*.f64 (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re) re) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))) (-.f64 #s(literal 0 binary64) re))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(+.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re))
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+.f64 re (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/2 binary64) 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)))))
(+.f64 re (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re re))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 im im)) (pow.f64 re #s(literal 5 binary64))))))))
im
(* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))
(*.f64 im (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))))
(* 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)))))))
(*.f64 im (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64)))))
(* -1 im)
(-.f64 #s(literal 0 binary64) im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64)))))))
(* -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))))))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64)))))

eval59.0ms (0.6%)

Compiler

Compiled 16083 to 1568 computations (90.3% saved)

prune45.0ms (0.4%)

Pruning

11 alts after pruning (10 fresh and 1 done)

PrunedKeptTotal
New48910499
Fresh000
Picked112
Done000
Total49011501
Accuracy
99.8%
Counts
501 → 11
Alt Table
Click to see full alt table
StatusAccuracyProgram
30.9%
(*.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))))
74.2%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
25.0%
(*.f64 #s(literal 1/2 binary64) (*.f64 im (+.f64 (*.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 im im)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))
16.9%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 im im) re)))
51.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
39.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))))))))))
19.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))))
22.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64))))
52.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
74.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
53.5%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re))))
Compiler

Compiled 344 to 255 computations (25.9% saved)

simplify225.0ms (2.1%)

Algorithm
egg-herbie
Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
cost-diff128
(*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))))))
cost-diff128
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))))))))
cost-diff128
(sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))))))))
cost-diff128
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))))))))))
cost-diff0
(*.f64 im #s(literal 2 binary64))
cost-diff0
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))
cost-diff0
(sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))
cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
cost-diff0
(-.f64 im re)
cost-diff0
(*.f64 #s(literal 2 binary64) (-.f64 im re))
cost-diff0
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re)))
cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re))))
cost-diff0
(*.f64 im #s(literal 2 binary64))
cost-diff0
(sqrt.f64 (*.f64 im #s(literal 2 binary64)))
cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
cost-diff0
(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
cost-diff0
(pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64))
cost-diff6528
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
cost-diff6528
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
Rules
4506×*-lowering-*.f32
4506×*-lowering-*.f64
1708×fma-lowering-fma.f32
1708×fma-lowering-fma.f64
1696×sum5-define
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
041314
198298
2258296
3608283
41381283
52355283
63918283
08304283
Stop Event
iter limit
node limit
Calls
Call 1
Inputs
(* 1/2 (pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/4) 2))
1/2
(pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/4) 2)
(pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/4)
(* 2 (- (sqrt (+ (* re re) (* im im))) re))
2
(- (sqrt (+ (* re re) (* im im))) re)
(sqrt (+ (* re re) (* im im)))
re
im
1/4
(* 1/2 (sqrt (* im 2)))
1/2
(sqrt (* im 2))
(* im 2)
im
2
(* 1/2 (sqrt (* 2 (- im re))))
1/2
(sqrt (* 2 (- im re)))
(* 2 (- im re))
2
(- im re)
im
re
(* 1/2 (sqrt (+ (* im 2) (* re (+ -2 (/ re im))))))
1/2
(sqrt (+ (* im 2) (* re (+ -2 (/ re im)))))
(+ (* im 2) (* re (+ -2 (/ re im))))
(* im 2)
im
2
(* re (+ -2 (/ re im)))
re
(+ -2 (/ re im))
-2
(/ re im)
(* 1/2 (sqrt (+ (* im 2) (* re (+ -2 (* re (+ (/ 1 im) (/ (* -1/4 (* re re)) (* im (* im im))))))))))
1/2
(sqrt (+ (* im 2) (* re (+ -2 (* re (+ (/ 1 im) (/ (* -1/4 (* re re)) (* im (* im im)))))))))
(+ (* im 2) (* re (+ -2 (* re (+ (/ 1 im) (/ (* -1/4 (* re re)) (* im (* im im))))))))
(* im 2)
im
2
(* re (+ -2 (* re (+ (/ 1 im) (/ (* -1/4 (* re re)) (* im (* im im)))))))
re
(+ -2 (* re (+ (/ 1 im) (/ (* -1/4 (* re re)) (* im (* im im))))))
-2
(* re (+ (/ 1 im) (/ (* -1/4 (* re re)) (* im (* im im)))))
(+ (/ 1 im) (/ (* -1/4 (* re re)) (* im (* im im))))
(/ 1 im)
1
(/ (* -1/4 (* re re)) (* im (* im im)))
(* -1/4 (* re re))
-1/4
(* re re)
(* im (* im im))
(* im im)
Outputs
(* 1/2 (pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/4) 2))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -2 binary64) (-.f64 re (hypot.f64 re im)))))
1/2
#s(literal 1/2 binary64)
(pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/4) 2)
(sqrt.f64 (*.f64 #s(literal -2 binary64) (-.f64 re (hypot.f64 re im))))
(pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/4)
(pow.f64 (*.f64 #s(literal -2 binary64) (-.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64))
(* 2 (- (sqrt (+ (* re re) (* im im))) re))
(*.f64 #s(literal -2 binary64) (-.f64 re (hypot.f64 re im)))
2
#s(literal 2 binary64)
(- (sqrt (+ (* re re) (* im im))) re)
(-.f64 (hypot.f64 re im) re)
(sqrt (+ (* re re) (* im im)))
(hypot.f64 re im)
re
im
1/4
#s(literal 1/4 binary64)
(* 1/2 (sqrt (* im 2)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) im)))
1/2
#s(literal 1/2 binary64)
(sqrt (* im 2))
(sqrt.f64 (*.f64 #s(literal 2 binary64) im))
(* im 2)
(*.f64 #s(literal 2 binary64) im)
im
2
#s(literal 2 binary64)
(* 1/2 (sqrt (* 2 (- im re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re))))
1/2
#s(literal 1/2 binary64)
(sqrt (* 2 (- im re)))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re)))
(* 2 (- im re))
(*.f64 #s(literal 2 binary64) (-.f64 im re))
2
#s(literal 2 binary64)
(- im re)
(-.f64 im re)
im
re
(* 1/2 (sqrt (+ (* im 2) (* re (+ -2 (/ re im))))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
1/2
#s(literal 1/2 binary64)
(sqrt (+ (* im 2) (* re (+ -2 (/ re im)))))
(sqrt.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))
(+ (* im 2) (* re (+ -2 (/ re im))))
(+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))
(* im 2)
(*.f64 #s(literal 2 binary64) im)
im
2
#s(literal 2 binary64)
(* re (+ -2 (/ re im)))
(*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))
re
(+ -2 (/ re im))
(+.f64 #s(literal -2 binary64) (/.f64 re im))
-2
#s(literal -2 binary64)
(/ re im)
(/.f64 re im)
(* 1/2 (sqrt (+ (* im 2) (* re (+ -2 (* re (+ (/ 1 im) (/ (* -1/4 (* re re)) (* im (* im im))))))))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im)))))))))
1/2
#s(literal 1/2 binary64)
(sqrt (+ (* im 2) (* re (+ -2 (* re (+ (/ 1 im) (/ (* -1/4 (* re re)) (* im (* im im)))))))))
(sqrt.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im))))))))
(+ (* im 2) (* re (+ -2 (* re (+ (/ 1 im) (/ (* -1/4 (* re re)) (* im (* im im))))))))
(+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im)))))))
(* im 2)
(*.f64 #s(literal 2 binary64) im)
im
2
#s(literal 2 binary64)
(* re (+ -2 (* re (+ (/ 1 im) (/ (* -1/4 (* re re)) (* im (* im im)))))))
(*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im))))))
re
(+ -2 (* re (+ (/ 1 im) (/ (* -1/4 (* re re)) (* im (* im im))))))
(+.f64 #s(literal -2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im)))))
-2
#s(literal -2 binary64)
(* re (+ (/ 1 im) (/ (* -1/4 (* re re)) (* im (* im im)))))
(*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im))))
(+ (/ 1 im) (/ (* -1/4 (* re re)) (* im (* im im))))
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im))) im)
(/ 1 im)
(/.f64 #s(literal 1 binary64) im)
1
#s(literal 1 binary64)
(/ (* -1/4 (* re re)) (* im (* im im)))
(/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im (*.f64 im im)))
(* -1/4 (* re re))
(*.f64 re (*.f64 re #s(literal -1/4 binary64)))
-1/4
#s(literal -1/4 binary64)
(* re re)
(*.f64 re re)
(* im (* im im))
(*.f64 im (*.f64 im im))
(* im im)
(*.f64 im im)

localize180.0ms (1.7%)

Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
accuracy100.0%
(+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))))
accuracy99.9%
(*.f64 im (*.f64 im im))
accuracy99.9%
(*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))))
accuracy86.3%
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
accuracy100.0%
(*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))
accuracy100.0%
(*.f64 im #s(literal 2 binary64))
accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
accuracy100.0%
(sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))
accuracy100.0%
(-.f64 im re)
accuracy100.0%
(*.f64 #s(literal 2 binary64) (-.f64 im re))
accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re))))
accuracy100.0%
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re)))
accuracy100.0%
(*.f64 im #s(literal 2 binary64))
accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
accuracy100.0%
(sqrt.f64 (*.f64 im #s(literal 2 binary64)))
accuracy100.0%
(-.f64 (hypot.f64 re im) re)
accuracy100.0%
(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
accuracy99.7%
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
Results
63.0ms127×0valid
60.0ms129×0invalid
Compiler

Compiled 349 to 41 computations (88.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 83.0ms
ival-mult: 34.0ms (41.2% of total)
ival-pow: 12.0ms (14.5% of total)
ival-sqrt: 11.0ms (13.3% of total)
compiled-spec: 9.0ms (10.9% of total)
ival-add: 7.0ms (8.5% of total)
ival-div: 6.0ms (7.3% of total)
ival-sub: 3.0ms (3.6% of total)
const: 1.0ms (1.2% of total)
backward-pass: 0.0ms (0% of total)

series64.0ms (0.6%)

Counts
24 → 528
Calls
Call 1
Inputs
#<alt (* 1/2 (pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/4) 2))>
#<alt (pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/4) 2)>
#<alt (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/4)>
#<alt (* 2 (- (sqrt (+ (* re re) (* im im))) re))>
#<alt (* 1/2 (sqrt (* im 2)))>
#<alt (sqrt (* im 2))>
#<alt (* im 2)>
#<alt (* 1/2 (sqrt (* 2 (- im re))))>
#<alt (sqrt (* 2 (- im re)))>
#<alt (* 2 (- im re))>
#<alt (- im re)>
#<alt (* 1/2 (sqrt (+ (* im 2) (* re (+ -2 (/ re im))))))>
#<alt (sqrt (+ (* im 2) (* re (+ -2 (/ re im)))))>
#<alt (+ (* im 2) (* re (+ -2 (/ re im))))>
#<alt (* 1/2 (sqrt (+ (* im 2) (* re (+ -2 (* re (+ (/ 1 im) (/ (* -1/4 (* re re)) (* im (* im im))))))))))>
#<alt (sqrt (+ (* im 2) (* re (+ -2 (* re (+ (/ 1 im) (/ (* -1/4 (* re re)) (* im (* im im)))))))))>
#<alt (+ (* im 2) (* re (+ -2 (* re (+ (/ 1 im) (/ (* -1/4 (* re re)) (* im (* im im))))))))>
#<alt (* re (+ -2 (* re (+ (/ 1 im) (/ (* -1/4 (* re re)) (* im (* im im)))))))>
#<alt (- (sqrt (+ (* re re) (* im im))) re)>
#<alt (* re (+ -2 (/ re im)))>
#<alt (/ (* -1/4 (* re re)) (* im (* im im)))>
#<alt (* re (+ (/ 1 im) (/ (* -1/4 (* re re)) (* im (* im im)))))>
#<alt (* im (* im im))>
#<alt (+ (/ 1 im) (/ (* -1/4 (* re re)) (* im (* im im))))>
Outputs
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))>
#<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)))))))>
#<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))))))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<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)))))>
#<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))))))>
#<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)))))))>
#<alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<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))))))>
#<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)))))))>
#<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))))))))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<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))))))>
#<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)))))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<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))))))))>
#<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))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (* im (sqrt (/ 1 re))))>
#<alt (+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re)))))>
#<alt (+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* -1/128 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re))))))>
#<alt (* -2 (* (sqrt re) (sqrt -1)))>
#<alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<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))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (+ (sqrt (/ 1 re)) (* -1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))>
#<alt (* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* 7/128 (* (pow im 2) (sqrt (/ 1 (pow re 9)))))))))>
#<alt (* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* (pow im 2) (+ (* -33/1024 (* (pow im 2) (sqrt (/ 1 (pow re 13))))) (* 7/128 (sqrt (/ 1 (pow re 9))))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt 2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (pow (* 2 im) 1/4)>
#<alt (+ (* -1/4 (* (pow (/ 2 (pow im 3)) 1/4) re)) (pow (* 2 im) 1/4))>
#<alt (+ (* re (+ (* -1/4 (pow (/ 2 (pow im 3)) 1/4)) (* 1/32 (* (pow (/ 2 (pow im 7)) 1/4) re)))) (pow (* 2 im) 1/4))>
#<alt (+ (* re (+ (* -1/4 (pow (/ 2 (pow im 3)) 1/4)) (* re (+ (* 1/32 (pow (/ 2 (pow im 7)) 1/4)) (* 5/128 (* (pow (/ 2 (pow im 11)) 1/4) re)))))) (pow (* 2 im) 1/4))>
#<alt (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))>
#<alt (+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))))>
#<alt (+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))>
#<alt (+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/1536 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/24576 (pow im 6)) (* 1/2880 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))>
#<alt (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))>
#<alt (+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))))>
#<alt (+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))>
#<alt (+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/24576 (pow im 6)) (+ (* 1/2880 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6))))) (* 1/1536 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (pow re 6)) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))>
#<alt (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))>
#<alt (+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 2))))>
#<alt (+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/16 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* 13/512 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 4))))))>
#<alt (+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/16 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* (pow im 2) (+ (* -119/8192 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 6))) (* 13/512 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 4))))))))>
#<alt (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))>
#<alt (+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))>
#<alt (+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))>
#<alt (+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/384 (pow re 3)) (* 1/24 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) (pow im 3)) (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))>
#<alt (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))>
#<alt (+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* 1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))>
#<alt (+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* -1/4 (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))>
#<alt (+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* -1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/384 (pow re 3)) (* 1/24 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) im)) (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* -1/4 (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))>
#<alt (* 2 im)>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (+ (* 2 im) (* re (- (/ re im) 2)))>
#<alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))>
#<alt (/ (pow im 2) re)>
#<alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)>
#<alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)>
#<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)>
#<alt (* -4 re)>
#<alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))>
#<alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))>
#<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)))))))>
#<alt (/ (pow im 2) re)>
#<alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))>
#<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)))>
#<alt (* 2 im)>
#<alt (* im (+ 2 (* -2 (/ re im))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))>
#<alt (* -2 im)>
#<alt (* -1 (* im (+ 2 (* 2 (/ re im)))))>
#<alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))>
#<alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 re)))) (* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2)))))>
#<alt (+ (* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2)))) (* im (+ (* -1/16 (* (/ (* im (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (sqrt (/ 1 re)) (/ (sqrt 2) (sqrt -1)))))))>
#<alt (+ (* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2)))) (* im (+ (* 1/4 (* (sqrt (/ 1 re)) (/ (sqrt 2) (sqrt -1)))) (* im (+ (* -1/16 (* (sqrt (/ 1 (pow re 3))) (/ (sqrt 2) (pow (sqrt -1) 3)))) (* 1/32 (* (/ (* im (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 5))))))))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<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/2 (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<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/32 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))>
#<alt (* -1 (* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))>
#<alt (* -1 (* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/32 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (* (sqrt -2) (sqrt -1))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))>
#<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)))))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))) (* -1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))))))))>
#<alt (* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (* re (+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))>
#<alt (* re (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* re (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 3) (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))))>
#<alt (* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* re (+ (* 1/4 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* -1 (* re (+ (* -1/16 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))))>
#<alt (* -1 (* re (+ (* -1/16 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 7))))) (+ (* 1/4 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))))>
#<alt (* (sqrt re) (* (sqrt -1) (sqrt 2)))>
#<alt (+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 re)))) (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (+ (* im (+ (* -1/8 (* (/ (* im (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (/ (sqrt 2) (sqrt -1)))))) (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (+ (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (/ (sqrt 2) (sqrt -1)))) (* im (+ (* -1/8 (* (sqrt (/ 1 (pow re 3))) (/ (sqrt 2) (pow (sqrt -1) 3)))) (* 1/16 (* (/ (* im (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 5))))))))) (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<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/16 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))>
#<alt (* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))>
#<alt (* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/16 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (* (sqrt -2) (sqrt -1))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* -1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))) (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))))))) (* (sqrt im) (sqrt 2)))>
#<alt (* (sqrt re) (* (sqrt -1) (sqrt 2)))>
#<alt (* re (+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))>
#<alt (* re (+ (* -1/8 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))>
#<alt (* re (+ (* -1/8 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (/ (* (pow im 3) (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* re (+ (* 1/2 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))>
#<alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))))>
#<alt (* -2 re)>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (* 2 im)>
#<alt (* im (+ 2 (* -2 (/ re im))))>
#<alt (* im (+ 2 (* -2 (/ re im))))>
#<alt (* im (+ 2 (* -2 (/ re im))))>
#<alt (* 2 im)>
#<alt (* -1 (* im (- (* 2 (/ re im)) 2)))>
#<alt (* -1 (* im (- (* 2 (/ re im)) 2)))>
#<alt (* -1 (* im (- (* 2 (/ re im)) 2)))>
#<alt (* 2 im)>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (* -2 re)>
#<alt (* re (- (* 2 (/ im re)) 2))>
#<alt (* re (- (* 2 (/ im re)) 2))>
#<alt (* re (- (* 2 (/ im re)) 2))>
#<alt (* -2 re)>
#<alt (* -1 (* re (+ 2 (* -2 (/ im re)))))>
#<alt (* -1 (* re (+ 2 (* -2 (/ im re)))))>
#<alt (* -1 (* re (+ 2 (* -2 (/ im re)))))>
#<alt (* -1 re)>
#<alt (- im re)>
#<alt (- im re)>
#<alt (- im re)>
#<alt im>
#<alt (* im (+ 1 (* -1 (/ re im))))>
#<alt (* im (+ 1 (* -1 (/ re im))))>
#<alt (* im (+ 1 (* -1 (/ re im))))>
#<alt im>
#<alt (* -1 (* im (- (/ re im) 1)))>
#<alt (* -1 (* im (- (/ re im) 1)))>
#<alt (* -1 (* im (- (/ re im) 1)))>
#<alt im>
#<alt (+ im (* -1 re))>
#<alt (+ im (* -1 re))>
#<alt (+ im (* -1 re))>
#<alt (* -1 re)>
#<alt (* re (- (/ im re) 1))>
#<alt (* re (- (/ im re) 1))>
#<alt (* re (- (/ im re) 1))>
#<alt (* -1 re)>
#<alt (* -1 (* re (+ 1 (* -1 (/ im re)))))>
#<alt (* -1 (* re (+ 1 (* -1 (/ im re)))))>
#<alt (* -1 (* re (+ 1 (* -1 (/ im re)))))>
#<alt (* 1/2 (* (sqrt (/ 1 im)) re))>
#<alt (/ (+ (* -1/2 (sqrt (pow im 3))) (* 1/2 (* (sqrt im) re))) im)>
#<alt (/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* -1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re)))))) im)>
#<alt (/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* -1/2 (sqrt (/ 1 im))) (* im (+ (* -1/4 (* (sqrt (/ 1 im)) (/ 1 re))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 re)))))))) im)>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))>
#<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)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))>
#<alt (* -1 (* im (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (+ (* -1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))))>
#<alt (* 1/2 (* (sqrt (/ 1 im)) re))>
#<alt (* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im)))))>
#<alt (* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* 1/2 (sqrt (/ 1 im))))))>
#<alt (* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (+ (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3)))) (* 1/2 (sqrt (/ 1 im)))))))>
#<alt (* -1/2 (* (sqrt (/ 1 im)) re))>
#<alt (* -1 (* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (- (* 2 im) im) re))) (* 1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (sqrt im) (- (* 2 im) im))) (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re)))) re)) (* 1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))>
#<alt (* (sqrt (/ 1 im)) re)>
#<alt (/ (+ (* -1 (sqrt (pow im 3))) (* (sqrt im) re)) im)>
#<alt (/ (+ (* (sqrt im) re) (* (pow im 2) (+ (* -1 (sqrt (/ 1 im))) (* (sqrt im) (/ 1 re))))) im)>
#<alt (/ (+ (* (sqrt im) re) (* (pow im 2) (+ (* -1 (sqrt (/ 1 im))) (* im (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 re))) (* (sqrt (/ 1 im)) (/ 1 re))))))) im)>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))>
#<alt (* (sqrt (/ 1 im)) re)>
#<alt (* re (+ (sqrt (/ 1 im)) (* -1 (* (sqrt im) (/ 1 re)))))>
#<alt (* re (+ (sqrt (/ 1 im)) (+ (* -1 (* (sqrt im) (/ 1 re))) (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))))))>
#<alt (* re (+ (sqrt (/ 1 im)) (+ (* -1 (* (sqrt im) (/ 1 re))) (+ (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3))))))))>
#<alt (* -1 (* (sqrt (/ 1 im)) re))>
#<alt (* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (* (sqrt im) (/ 1 re))))))>
#<alt (* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (sqrt im) (* -1/2 (* (sqrt im) (/ (- (* 2 im) im) re)))) re)))))>
#<alt (* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (sqrt im) (* -1 (/ (+ (* 1/2 (* (sqrt im) (- (* 2 im) im))) (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re)))) re))) re)))))>
#<alt (/ (pow re 2) im)>
#<alt (/ (+ (* -2 (* im re)) (pow re 2)) im)>
#<alt (/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)>
#<alt (/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)>
#<alt (* 2 im)>
#<alt (* im (+ 2 (* -2 (/ re im))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))>
#<alt (* 2 im)>
#<alt (* -1 (* im (- (* 2 (/ re im)) 2)))>
#<alt (* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))>
#<alt (* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))>
#<alt (* 2 im)>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (+ (* 2 im) (* re (- (/ re im) 2)))>
#<alt (+ (* 2 im) (* re (- (/ re im) 2)))>
#<alt (/ (pow re 2) im)>
#<alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))>
#<alt (* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re))))>
#<alt (* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re))))>
#<alt (/ (pow re 2) im)>
#<alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))>
#<alt (* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im)))>
#<alt (* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im)))>
#<alt (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))>
#<alt (/ (+ (* 1/4 (* (sqrt (pow im 5)) (/ 1 (sqrt -1/4)))) (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4))))) (pow im 2))>
#<alt (/ (+ (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (* (pow im 3) (+ (* -1/2 (* (sqrt im) (/ 1 (* re (sqrt -1/4))))) (* 1/4 (* (sqrt (/ 1 im)) (/ 1 (sqrt -1/4))))))) (pow im 2))>
#<alt (/ (+ (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (* (pow im 3) (+ (* 1/4 (* (sqrt (/ 1 im)) (/ 1 (sqrt -1/4)))) (* im (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (* re (sqrt -1/4))))) (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4)))))))))) (pow im 2))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))>
#<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)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))>
#<alt (* -1 (* im (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (+ (* -1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))))>
#<alt (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))>
#<alt (* (pow re 2) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))>
#<alt (* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))>
#<alt (* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* (pow re 4) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))))>
#<alt (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))>
#<alt (* (pow re 2) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))>
#<alt (* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))>
#<alt (* (pow re 2) (+ (* -1 (/ (+ (* -1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* re (sqrt -1/4))))) (* 1/2 (* (sqrt (pow im 3)) (/ 1 (sqrt -1/4))))) (pow re 3))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))>
#<alt (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))>
#<alt (/ (+ (* 1/2 (* (sqrt (pow im 5)) (/ 1 (sqrt -1/4)))) (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (pow im 2))>
#<alt (/ (+ (* (sqrt im) (* (pow re 2) (sqrt -1/4))) (* (pow im 3) (+ (* -1 (* (sqrt im) (/ 1 (* re (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt -1/4))))))) (pow im 2))>
#<alt (/ (+ (* (sqrt im) (* (pow re 2) (sqrt -1/4))) (* (pow im 3) (+ (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt -1/4)))) (* im (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (* re (sqrt -1/4))))) (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))))))) (pow im 2))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))>
#<alt (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))>
#<alt (* (pow re 2) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))>
#<alt (* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))>
#<alt (* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* (pow re 4) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))>
#<alt (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))>
#<alt (* (pow re 2) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))>
#<alt (* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))>
#<alt (* (pow re 2) (+ (* -1 (/ (+ (* -1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* re (sqrt -1/4))))) (* (sqrt (pow im 3)) (/ 1 (sqrt -1/4)))) (pow re 3))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))>
#<alt (* -1/4 (/ (pow re 4) (pow im 3)))>
#<alt (/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (pow re 2))) (pow im 3))>
#<alt (/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (+ (* -2 (* im re)) (pow re 2)))) (pow im 3))>
#<alt (/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)))) (pow im 3))>
#<alt (* 2 im)>
#<alt (* im (+ 2 (* -2 (/ re im))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))>
#<alt (* 2 im)>
#<alt (* -1 (* im (- (* 2 (/ re im)) 2)))>
#<alt (* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))>
#<alt (* -1 (* im (- (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1 (pow re 2)) (* 1/4 (/ (pow re 4) (pow im 2)))) im))) im)) 2)))>
#<alt (* 2 im)>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (+ (* 2 im) (* re (- (/ re im) 2)))>
#<alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))>
#<alt (* -1/4 (/ (pow re 4) (pow im 3)))>
#<alt (* (pow re 4) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))>
#<alt (* (pow re 4) (- (/ 1 (* im (pow re 2))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))>
#<alt (* (pow re 4) (- (+ (* 2 (/ im (pow re 4))) (/ 1 (* im (pow re 2)))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))>
#<alt (* -1/4 (/ (pow re 4) (pow im 3)))>
#<alt (* (pow re 4) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))>
#<alt (* (pow re 4) (- (/ 1 (* im (pow re 2))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))>
#<alt (* (pow re 4) (- (+ (* -1 (/ (+ 2 (* -2 (/ im re))) (pow re 3))) (/ 1 (* im (pow re 2)))) (* 1/4 (/ 1 (pow im 3)))))>
#<alt (* -2 re)>
#<alt (* re (- (/ re im) 2))>
#<alt (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2))>
#<alt (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2))>
#<alt (* -1/4 (/ (pow re 4) (pow im 3)))>
#<alt (* (pow re 4) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))>
#<alt (* (pow re 4) (- (/ 1 (* im (pow re 2))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))>
#<alt (* (pow re 4) (- (/ 1 (* im (pow re 2))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))>
#<alt (* -1/4 (/ (pow re 4) (pow im 3)))>
#<alt (* (pow re 4) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))>
#<alt (* (pow re 4) (- (/ 1 (* im (pow re 2))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))>
#<alt (* (pow re 4) (- (/ 1 (* im (pow re 2))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))>
#<alt (* -1/4 (/ (pow re 4) (pow im 3)))>
#<alt (/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (pow re 2))) (pow im 3))>
#<alt (/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (+ (* -2 (* im re)) (pow re 2)))) (pow im 3))>
#<alt (/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (+ (* -2 (* im re)) (pow re 2)))) (pow im 3))>
#<alt (* -2 re)>
#<alt (+ (* -2 re) (/ (pow re 2) im))>
#<alt (+ (* -2 re) (+ (* -1/4 (/ (pow re 4) (pow im 3))) (/ (pow re 2) im)))>
#<alt (+ (* -2 re) (+ (* -1/4 (/ (pow re 4) (pow im 3))) (/ (pow re 2) im)))>
#<alt (* -2 re)>
#<alt (+ (* -2 re) (/ (pow re 2) im))>
#<alt (+ (* -2 re) (* -1 (/ (+ (* -1 (pow re 2)) (* 1/4 (/ (pow re 4) (pow im 2)))) im)))>
#<alt (+ (* -2 re) (* -1 (/ (+ (* -1 (pow re 2)) (* 1/4 (/ (pow re 4) (pow im 2)))) im)))>
#<alt im>
#<alt (+ im (* -1 re))>
#<alt (+ im (* re (- (* 1/2 (/ re im)) 1)))>
#<alt (+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))>
#<alt (* 1/2 (/ (pow im 2) re))>
#<alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)>
#<alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)>
#<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)>
#<alt (* -2 re)>
#<alt (* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))>
#<alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))>
#<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))))))))>
#<alt (* 1/2 (/ (pow im 2) re))>
#<alt (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))>
#<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))))>
#<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))))>
#<alt im>
#<alt (* im (+ 1 (* -1 (/ re im))))>
#<alt (* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))>
#<alt (* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))>
#<alt (* -1 im)>
#<alt (* -1 (* im (+ 1 (/ re im))))>
#<alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))>
#<alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))>
#<alt (* -2 re)>
#<alt (* re (- (/ re im) 2))>
#<alt (* re (- (/ re im) 2))>
#<alt (* re (- (/ re im) 2))>
#<alt (/ (pow re 2) im)>
#<alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))>
#<alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))>
#<alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))>
#<alt (/ (pow re 2) im)>
#<alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))>
#<alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))>
#<alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))>
#<alt (/ (pow re 2) im)>
#<alt (/ (+ (* -2 (* im re)) (pow re 2)) im)>
#<alt (/ (+ (* -2 (* im re)) (pow re 2)) im)>
#<alt (/ (+ (* -2 (* im re)) (pow re 2)) im)>
#<alt (* -2 re)>
#<alt (+ (* -2 re) (/ (pow re 2) im))>
#<alt (+ (* -2 re) (/ (pow re 2) im))>
#<alt (+ (* -2 re) (/ (pow re 2) im))>
#<alt (* -2 re)>
#<alt (+ (* -2 re) (/ (pow re 2) im))>
#<alt (+ (* -2 re) (/ (pow re 2) im))>
#<alt (+ (* -2 re) (/ (pow re 2) im))>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (/ re im)>
#<alt (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im)))>
#<alt (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im)))>
#<alt (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im)))>
#<alt (* -1/4 (/ (pow re 3) (pow im 3)))>
#<alt (* (pow re 3) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))>
#<alt (* (pow re 3) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))>
#<alt (* (pow re 3) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))>
#<alt (* -1/4 (/ (pow re 3) (pow im 3)))>
#<alt (* -1 (* (pow re 3) (- (* 1/4 (/ 1 (pow im 3))) (/ 1 (* im (pow re 2))))))>
#<alt (* -1 (* (pow re 3) (- (* 1/4 (/ 1 (pow im 3))) (/ 1 (* im (pow re 2))))))>
#<alt (* -1 (* (pow re 3) (- (* 1/4 (/ 1 (pow im 3))) (/ 1 (* im (pow re 2))))))>
#<alt (* -1/4 (/ (pow re 3) (pow im 3)))>
#<alt (/ (+ (* -1/4 (pow re 3)) (* (pow im 2) re)) (pow im 3))>
#<alt (/ (+ (* -1/4 (pow re 3)) (* (pow im 2) re)) (pow im 3))>
#<alt (/ (+ (* -1/4 (pow re 3)) (* (pow im 2) re)) (pow im 3))>
#<alt (/ re im)>
#<alt (/ (+ re (* -1/4 (/ (pow re 3) (pow im 2)))) im)>
#<alt (/ (+ re (* -1/4 (/ (pow re 3) (pow im 2)))) im)>
#<alt (/ (+ re (* -1/4 (/ (pow re 3) (pow im 2)))) im)>
#<alt (/ re im)>
#<alt (* -1 (/ (+ (* -1 re) (* 1/4 (/ (pow re 3) (pow im 2)))) im))>
#<alt (* -1 (/ (+ (* -1 re) (* 1/4 (/ (pow re 3) (pow im 2)))) im))>
#<alt (* -1 (/ (+ (* -1 re) (* 1/4 (/ (pow re 3) (pow im 2)))) im))>
#<alt (pow im 3)>
#<alt (pow im 3)>
#<alt (pow im 3)>
#<alt (pow im 3)>
#<alt (pow im 3)>
#<alt (pow im 3)>
#<alt (pow im 3)>
#<alt (pow im 3)>
#<alt (pow im 3)>
#<alt (pow im 3)>
#<alt (pow im 3)>
#<alt (pow im 3)>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (/ (+ (* -1/4 (pow re 2)) (pow im 2)) (pow im 3))>
#<alt (/ (+ (* -1/4 (pow re 2)) (pow im 2)) (pow im 3))>
#<alt (/ (+ (* -1/4 (pow re 2)) (pow im 2)) (pow im 3))>
#<alt (/ 1 im)>
#<alt (/ (+ 1 (* -1/4 (/ (pow re 2) (pow im 2)))) im)>
#<alt (/ (+ 1 (* -1/4 (/ (pow re 2) (pow im 2)))) im)>
#<alt (/ (+ 1 (* -1/4 (/ (pow re 2) (pow im 2)))) im)>
#<alt (/ 1 im)>
#<alt (* -1 (/ (- (* 1/4 (/ (pow re 2) (pow im 2))) 1) im))>
#<alt (* -1 (/ (- (* 1/4 (/ (pow re 2) (pow im 2))) 1) im))>
#<alt (* -1 (/ (- (* 1/4 (/ (pow re 2) (pow im 2))) 1) im))>
#<alt (/ 1 im)>
#<alt (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))>
#<alt (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))>
#<alt (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (* (pow re 2) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))>
#<alt (* (pow re 2) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))>
#<alt (* (pow re 2) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))>
#<alt (* -1/4 (/ (pow re 2) (pow im 3)))>
#<alt (* (pow re 2) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))>
#<alt (* (pow re 2) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))>
#<alt (* (pow re 2) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))>
Calls

132 calls:

TimeVariablePointExpression
4.0ms
re
@inf
(sqrt (+ (* im 2) (* re (+ -2 (/ re im)))))
3.0ms
re
@-inf
(pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/4)
2.0ms
im
@-inf
(* 1/2 (sqrt (* 2 (- im re))))
2.0ms
re
@0
(- im re)
2.0ms
re
@inf
(pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/4)

rewrite447.0ms (4.3%)

Algorithm
batch-egg-rewrite
Rules
5918×*-lowering-*.f32
5918×*-lowering-*.f64
3280×/-lowering-/.f32
3280×/-lowering-/.f64
2558×+-lowering-+.f64
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
041240
1240228
22402228
010147228
Stop Event
iter limit
node limit
Counts
24 → 635
Calls
Call 1
Inputs
(* 1/2 (pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/4) 2))
(pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/4) 2)
(pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/4)
(* 2 (- (sqrt (+ (* re re) (* im im))) re))
(* 1/2 (sqrt (* im 2)))
(sqrt (* im 2))
(* im 2)
(* 1/2 (sqrt (* 2 (- im re))))
(sqrt (* 2 (- im re)))
(* 2 (- im re))
(- im re)
(* 1/2 (sqrt (+ (* im 2) (* re (+ -2 (/ re im))))))
(sqrt (+ (* im 2) (* re (+ -2 (/ re im)))))
(+ (* im 2) (* re (+ -2 (/ re im))))
(* 1/2 (sqrt (+ (* im 2) (* re (+ -2 (* re (+ (/ 1 im) (/ (* -1/4 (* re re)) (* im (* im im))))))))))
(sqrt (+ (* im 2) (* re (+ -2 (* re (+ (/ 1 im) (/ (* -1/4 (* re re)) (* im (* im im)))))))))
(+ (* im 2) (* re (+ -2 (* re (+ (/ 1 im) (/ (* -1/4 (* re re)) (* im (* im im))))))))
(* re (+ -2 (* re (+ (/ 1 im) (/ (* -1/4 (* re re)) (* im (* im im)))))))
(- (sqrt (+ (* re re) (* im im))) re)
(* re (+ -2 (/ re im)))
(/ (* -1/4 (* re re)) (* im (* im im)))
(* re (+ (/ 1 im) (/ (* -1/4 (* re re)) (* im (* im im)))))
(* im (* im im))
(+ (/ 1 im) (/ (* -1/4 (* re re)) (* im (* im im))))
Outputs
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))))
(exp.f64 (log.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))) #s(literal 1 binary64)))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))) (sqrt.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)))) (sqrt.f64 (+.f64 re (hypot.f64 re im))))
(/.f64 (sqrt.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) #s(literal 2 binary64))) (sqrt.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (sqrt.f64 (*.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)) #s(literal 2 binary64))) (sqrt.f64 (+.f64 re (hypot.f64 re im))))
(pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 4 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64))) #s(literal 1/8 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 3/8 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 3/8 binary64)) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 3/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 3/8 binary64)) #s(literal 1 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))))
(exp.f64 (*.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/8 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64))) #s(literal 1/8 binary64)))
(pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 1 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64)) #s(literal 1/8 binary64))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)))
(+.f64 (*.f64 #s(literal 2 binary64) (hypot.f64 re im)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) re)))
(+.f64 (*.f64 (hypot.f64 re im) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)))
(exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
(fma.f64 #s(literal 2 binary64) (hypot.f64 re im) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) re)))
(fma.f64 (hypot.f64 re im) #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re))) (+.f64 re (hypot.f64 re im)))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) #s(literal 2 binary64)) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))
(/.f64 (*.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)) #s(literal 2 binary64)) (+.f64 re (hypot.f64 re im)))
(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
(*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))
(*.f64 (exp.f64 (log.f64 #s(literal 2 binary64))) (exp.f64 (log.f64 (-.f64 (hypot.f64 re im) re))))
(*.f64 (exp.f64 (log.f64 (-.f64 (hypot.f64 re im) re))) (exp.f64 (log.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) im)) #s(literal 1/2 binary64)))
(sqrt.f64 (*.f64 #s(literal 2 binary64) im))
(pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64)))
(*.f64 #s(literal 2 binary64) im)
(*.f64 im #s(literal 2 binary64))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re))))
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (-.f64 im re)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 im re)))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re))) #s(literal 1/2 binary64)))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re)))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))))) (sqrt.f64 (+.f64 (*.f64 im im) (*.f64 re (+.f64 re im)))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 im im) (*.f64 re re)))) (sqrt.f64 (+.f64 re im)))
(/.f64 (sqrt.f64 (*.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) #s(literal 2 binary64))) (sqrt.f64 (+.f64 (*.f64 im im) (*.f64 re (+.f64 re im)))))
(/.f64 (sqrt.f64 (*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) #s(literal 2 binary64))) (sqrt.f64 (+.f64 re im)))
(pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re)) (*.f64 #s(literal 2 binary64) (-.f64 im re))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re)))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (-.f64 im re)))
(*.f64 (sqrt.f64 (-.f64 im re)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re)) #s(literal 1/4 binary64)))
(+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) re)))
(+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) im (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) re)))
(fma.f64 #s(literal 2 binary64) im (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)))
(fma.f64 im #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) re)))
(fma.f64 im #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re im))))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 im im) (*.f64 re re))) (+.f64 re im))
(/.f64 (*.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) #s(literal 2 binary64)) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re im))))
(/.f64 (*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) #s(literal 2 binary64)) (+.f64 re im))
(*.f64 #s(literal 2 binary64) (-.f64 im re))
(*.f64 (-.f64 im re) #s(literal 2 binary64))
(+.f64 im (-.f64 #s(literal 0 binary64) re))
(+.f64 (-.f64 #s(literal 0 binary64) re) im)
(-.f64 im re)
(-.f64 (/.f64 (*.f64 im (*.f64 im im)) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re im)))) (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re im)))))
(-.f64 (/.f64 (*.f64 im im) (+.f64 re im)) (/.f64 (*.f64 re re) (+.f64 re im)))
(fma.f64 im #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re))
(fma.f64 #s(literal -1 binary64) re im)
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 im im) (*.f64 re (+.f64 re im))) (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re im) (-.f64 (*.f64 im im) (*.f64 re re))))
(/.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re im))))
(/.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 im im) (-.f64 (*.f64 re re) (*.f64 im (-.f64 #s(literal 0 binary64) re)))))
(/.f64 (-.f64 (*.f64 im im) (*.f64 re re)) (+.f64 re im))
(/.f64 (-.f64 (*.f64 im im) (*.f64 re re)) (-.f64 im (-.f64 #s(literal 0 binary64) re)))
(/.f64 (neg.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))) (neg.f64 (+.f64 (*.f64 im im) (*.f64 re (+.f64 re im)))))
(/.f64 (neg.f64 (-.f64 (*.f64 im im) (*.f64 re re))) (neg.f64 (+.f64 re im)))
(pow.f64 (/.f64 (+.f64 (*.f64 im im) (*.f64 re (+.f64 re im))) (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 re im) (-.f64 (*.f64 im im) (*.f64 re re))) #s(literal -1 binary64))
(*.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re im)))))
(*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) (/.f64 #s(literal 1 binary64) (+.f64 re im)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) #s(literal 1/2 binary64)))
(sqrt.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 #s(literal 2 binary64) im)))) (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im))))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im))))))) (sqrt.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 #s(literal 2 binary64) im))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im))))))) (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) im) re) (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im)))))) (sqrt.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 #s(literal 2 binary64) im)))))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im))))))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (*.f64 (*.f64 im im) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 #s(literal 2 binary64) im))))
(pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im))))))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 #s(literal 2 binary64) im))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 #s(literal 2 binary64) im)))))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im)))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))
(*.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) #s(literal 1/4 binary64)))
(+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))
(+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 #s(literal 2 binary64) im))
(+.f64 (*.f64 re #s(literal -2 binary64)) (+.f64 (/.f64 re (/.f64 im re)) (*.f64 #s(literal 2 binary64) im)))
(+.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re #s(literal -2 binary64))) (/.f64 re (/.f64 im re)))
(-.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (/.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.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 re #s(literal -2 binary64) (+.f64 (/.f64 re (/.f64 im re)) (*.f64 #s(literal 2 binary64) im)))
(fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 #s(literal 2 binary64) im))
(fma.f64 im #s(literal 2 binary64) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))
(fma.f64 #s(literal -2 binary64) re (+.f64 (/.f64 re (/.f64 im re)) (*.f64 #s(literal 2 binary64) im)))
(fma.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) re (*.f64 #s(literal 2 binary64) im))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 #s(literal 2 binary64) im)))) (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))
(/.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im)))))) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 #s(literal 2 binary64) im)))))
(/.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im)))))) (+.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) im) re) (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
(/.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im))))))) (neg.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 #s(literal 2 binary64) im))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im)))))) (neg.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
(/.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (*.f64 (*.f64 im im) #s(literal 4 binary64))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 #s(literal 2 binary64) im)))
(pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 #s(literal 2 binary64) im)))) (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im)))))) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im)))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 #s(literal 2 binary64) im))))))
(*.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) #s(literal 1/2 binary64)))
(sqrt.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 #s(literal 2 binary64) im)))) (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))) (sqrt.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 #s(literal 2 binary64) im))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))) (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 #s(literal 2 binary64) im)))))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (*.f64 (*.f64 im im) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 #s(literal 2 binary64) im))))
(pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 #s(literal 2 binary64) im))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 #s(literal 2 binary64) im)))))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))
(*.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal 1/4 binary64)))
(+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))
(+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 #s(literal 2 binary64) im))
(+.f64 (*.f64 re #s(literal -2 binary64)) (+.f64 (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))) (*.f64 #s(literal 2 binary64) im)))
(+.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re #s(literal -2 binary64))) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))
(-.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) (/.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))
(fma.f64 #s(literal 2 binary64) im (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))
(fma.f64 re #s(literal -2 binary64) (+.f64 (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))) (*.f64 #s(literal 2 binary64) im)))
(fma.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (*.f64 #s(literal 2 binary64) im))
(fma.f64 im #s(literal 2 binary64) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))
(fma.f64 #s(literal -2 binary64) re (+.f64 (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))) (*.f64 #s(literal 2 binary64) im)))
(fma.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) re (*.f64 #s(literal 2 binary64) im))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 #s(literal 2 binary64) im)))) (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))
(/.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 #s(literal 2 binary64) im)))))
(/.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (+.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))
(/.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))) (neg.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 #s(literal 2 binary64) im))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (neg.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))
(/.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (*.f64 (*.f64 im im) #s(literal 4 binary64))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 #s(literal 2 binary64) im)))
(pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 #s(literal 2 binary64) im)))) (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 #s(literal 2 binary64) im))))))
(*.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))
(+.f64 (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))) (*.f64 re #s(literal -2 binary64)))
(+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))
(fma.f64 re #s(literal -2 binary64) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))
(fma.f64 re (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))) (*.f64 re #s(literal -2 binary64)))
(fma.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))) (*.f64 re #s(literal -2 binary64)))
(fma.f64 #s(literal -2 binary64) re (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))
(fma.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))) (*.f64 re re) (*.f64 re #s(literal -2 binary64)))
(fma.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))) re (*.f64 re #s(literal -2 binary64)))
(/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (+.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 re #s(literal -2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (*.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 re #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (-.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))
(/.f64 (*.f64 re (+.f64 #s(literal -8 binary64) (*.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) (+.f64 #s(literal 4 binary64) (*.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))) (-.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))) #s(literal -2 binary64)))))
(/.f64 (*.f64 re (-.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (-.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))
(/.f64 (*.f64 (+.f64 #s(literal -8 binary64) (*.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) re) (+.f64 #s(literal 4 binary64) (*.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))) (-.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))) #s(literal -2 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 4 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) re) (-.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))
(*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))
(*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) re)
(+.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re))
(+.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im))
(-.f64 (hypot.f64 re im) re)
(-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))) (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(-.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im))) (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im))))
(fma.f64 #s(literal -1 binary64) re (hypot.f64 re im))
(fma.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)) (-.f64 #s(literal 0 binary64) re))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re (hypot.f64 re im)) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re re) (*.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re)))))
(/.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)) (+.f64 re (hypot.f64 re im)))
(/.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)) (-.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (neg.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (neg.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re))) (neg.f64 (+.f64 re (hypot.f64 re im))))
(pow.f64 (/.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 re (hypot.f64 re im)) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(*.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)) (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))))
(+.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 re (/.f64 im re)))
(+.f64 (/.f64 re (/.f64 im re)) (*.f64 re #s(literal -2 binary64)))
(fma.f64 re #s(literal -2 binary64) (/.f64 re (/.f64 im re)))
(fma.f64 re (/.f64 re im) (*.f64 re #s(literal -2 binary64)))
(fma.f64 (*.f64 re re) (/.f64 #s(literal 1 binary64) im) (*.f64 re #s(literal -2 binary64)))
(fma.f64 #s(literal -2 binary64) re (/.f64 re (/.f64 im re)))
(fma.f64 (/.f64 re im) re (*.f64 re #s(literal -2 binary64)))
(/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 re (*.f64 re re))) (/.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im im)))) (+.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 re #s(literal -2 binary64))) (-.f64 (*.f64 (/.f64 re (/.f64 im re)) (/.f64 re (/.f64 im re))) (*.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 re (/.f64 im re))))))
(/.f64 (-.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 re #s(literal -2 binary64))) (*.f64 (/.f64 re (/.f64 im re)) (/.f64 re (/.f64 im re)))) (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 re (/.f64 im re))))
(/.f64 (*.f64 re (+.f64 #s(literal -8 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))))) (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 re im) #s(literal -2 binary64)) (/.f64 im re))))
(/.f64 (*.f64 re (-.f64 #s(literal 4 binary64) (/.f64 (*.f64 re re) (*.f64 im im)))) (-.f64 #s(literal -2 binary64) (/.f64 re im)))
(/.f64 (*.f64 (+.f64 #s(literal -8 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))) re) (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 re im) #s(literal -2 binary64)) (/.f64 im re))))
(/.f64 (*.f64 (-.f64 #s(literal 4 binary64) (/.f64 (*.f64 re re) (*.f64 im im))) re) (-.f64 #s(literal -2 binary64) (/.f64 re im)))
(*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))
(*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) re)
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))))
(neg.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64)) (*.f64 im (*.f64 im im))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 im im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)))
(/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))))
(/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) (*.f64 im im))
(/.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (*.f64 im (*.f64 im im)))
(/.f64 (neg.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))))
(/.f64 (neg.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)) (neg.f64 (*.f64 im im)))
(/.f64 (*.f64 (/.f64 #s(literal -1/4 binary64) im) (*.f64 re re)) (*.f64 im im))
(/.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re re) (*.f64 im im))) im)
(/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im im)) im)
(/.f64 (/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) im) im)
(pow.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 im im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)) #s(literal -1 binary64))
(*.f64 (*.f64 re re) (*.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))
(*.f64 (*.f64 re re) (/.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 im im))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))
(*.f64 (/.f64 #s(literal 1 binary64) im) (pow.f64 (/.f64 (*.f64 im im) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal -1 binary64)))
(*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re re) (*.f64 im (*.f64 im im))))
(*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))
(*.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))))
(*.f64 (/.f64 #s(literal -1/4 binary64) im) (/.f64 (*.f64 re re) (*.f64 im im)))
(*.f64 (/.f64 (*.f64 re re) (*.f64 im im)) (/.f64 #s(literal -1/4 binary64) im))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal -1 binary64)))
(*.f64 (/.f64 re (/.f64 im re)) (/.f64 #s(literal -1/4 binary64) (*.f64 im im)))
(*.f64 (*.f64 re #s(literal -1/4 binary64)) (*.f64 re (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))
(*.f64 (*.f64 re #s(literal -1/4 binary64)) (/.f64 re (*.f64 im (*.f64 im im))))
(*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) (/.f64 #s(literal 1 binary64) (*.f64 im im)))
(*.f64 (/.f64 (*.f64 re re) (*.f64 im (*.f64 im im))) #s(literal -1/4 binary64))
(*.f64 (/.f64 #s(literal -1/4 binary64) (*.f64 im im)) (/.f64 re (/.f64 im re)))
(*.f64 (/.f64 (*.f64 re #s(literal -1/4 binary64)) im) (/.f64 re (*.f64 im im)))
(*.f64 (/.f64 (*.f64 re #s(literal -1/4 binary64)) (*.f64 im im)) (/.f64 re im))
(*.f64 (pow.f64 (/.f64 im (*.f64 re re)) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 im im) #s(literal -1/4 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 im im) #s(literal -1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (/.f64 im (*.f64 re re)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 im (*.f64 re #s(literal -1/4 binary64))) #s(literal -1 binary64)) (pow.f64 (/.f64 (*.f64 im im) re) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 im im) (*.f64 re #s(literal -1/4 binary64))) #s(literal -1 binary64)) (/.f64 re im))
(+.f64 (/.f64 re im) (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im (*.f64 im im))))
(+.f64 (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im (*.f64 im im))) (/.f64 re im))
(fma.f64 re (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im (*.f64 im im))))
(fma.f64 re (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))) (/.f64 re im))
(fma.f64 #s(literal 1 binary64) (/.f64 re im) (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im (*.f64 im im))))
(fma.f64 (/.f64 #s(literal 1 binary64) im) re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im (*.f64 im im))))
(fma.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (*.f64 re re) (*.f64 im (*.f64 im im))) re) (/.f64 re im))
(fma.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))) re) (/.f64 re im))
(fma.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))) re (/.f64 re im))
(fma.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) im)) (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im (*.f64 im im))))
(fma.f64 (/.f64 #s(literal -1/4 binary64) im) (*.f64 (/.f64 (*.f64 re re) (*.f64 im im)) re) (/.f64 re im))
(fma.f64 (*.f64 re #s(literal -1/4 binary64)) (/.f64 (*.f64 re re) (*.f64 im (*.f64 im im))) (/.f64 re im))
(fma.f64 (*.f64 re #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im (*.f64 im im))))
(fma.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))) (/.f64 re im))
(fma.f64 (*.f64 re (/.f64 #s(literal -1/4 binary64) im)) (/.f64 (*.f64 re re) (*.f64 im im)) (/.f64 re im))
(/.f64 (+.f64 (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (/.f64 (*.f64 re (*.f64 re re)) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) #s(literal -1/64 binary64))))) (+.f64 (/.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im (*.f64 im im))) (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im (*.f64 im im)))) (*.f64 (/.f64 re im) (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im (*.f64 im im)))))))
(/.f64 (-.f64 (/.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im (*.f64 im im))) (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im (*.f64 im im))))) (-.f64 (/.f64 re im) (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im (*.f64 im im)))))
(/.f64 (*.f64 re (+.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))) (*.f64 im (*.f64 im (*.f64 im im))))
(/.f64 (*.f64 re (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) #s(literal -1/64 binary64)) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im))))) (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) (/.f64 (/.f64 (-.f64 (/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) im) #s(literal 1 binary64)) im) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))))
(/.f64 (*.f64 re (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im))) (*.f64 im im))) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) im)) im))
(/.f64 (*.f64 (+.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) re) (*.f64 im (*.f64 im (*.f64 im im))))
(/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) #s(literal -1/64 binary64)) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im))))) (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) re) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) (/.f64 (/.f64 (-.f64 (/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) im) #s(literal 1 binary64)) im) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))))
(/.f64 (*.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im))) (*.f64 im im)) re) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) im)) im))
(/.f64 (+.f64 (*.f64 re (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 re im)) (*.f64 im (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 re (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 im (*.f64 re #s(literal 1 binary64)))) (*.f64 im (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 re (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 im (*.f64 #s(literal 1 binary64) re))) (*.f64 im (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 re (*.f64 im (*.f64 im im))) (*.f64 im (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))) (*.f64 im (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 re (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) (*.f64 im (*.f64 re (*.f64 (*.f64 re re) #s(literal 1/4 binary64))))) (*.f64 im (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 re (*.f64 im im)) (*.f64 im (*.f64 re (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)))) (*.f64 im (*.f64 im im)))
(/.f64 (+.f64 (*.f64 re (*.f64 im (*.f64 im im))) (*.f64 im (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) re))) (*.f64 im (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 re (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) (*.f64 im (*.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64)) re))) (*.f64 im (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 re (*.f64 im im)) (*.f64 im (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) re))) (*.f64 im (*.f64 im im)))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 (/.f64 im re) re)) (*.f64 (/.f64 im re) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 (/.f64 im re) (*.f64 re #s(literal 1 binary64)))) (*.f64 (/.f64 im re) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 (/.f64 im re) (*.f64 #s(literal 1 binary64) re))) (*.f64 (/.f64 im re) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 im (*.f64 im im)) (*.f64 (/.f64 im re) (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))) (*.f64 (/.f64 im re) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (/.f64 im re) (*.f64 re (*.f64 (*.f64 re re) #s(literal 1/4 binary64))))) (*.f64 (/.f64 im re) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (*.f64 im im)) (*.f64 (/.f64 im re) (*.f64 re (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)))) (*.f64 (/.f64 im re) (*.f64 im im)))
(/.f64 (+.f64 (*.f64 im (*.f64 im im)) (*.f64 (/.f64 im re) (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) re))) (*.f64 (/.f64 im re) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (/.f64 im re) (*.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64)) re))) (*.f64 (/.f64 im re) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (*.f64 im im)) (*.f64 (/.f64 im re) (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) re))) (*.f64 (/.f64 im re) (*.f64 im im)))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 (/.f64 (/.f64 im re) #s(literal 1 binary64)) re)) (*.f64 (/.f64 (/.f64 im re) #s(literal 1 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 (/.f64 (/.f64 im re) #s(literal 1 binary64)) (*.f64 re #s(literal 1 binary64)))) (*.f64 (/.f64 (/.f64 im re) #s(literal 1 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 (/.f64 (/.f64 im re) #s(literal 1 binary64)) (*.f64 #s(literal 1 binary64) re))) (*.f64 (/.f64 (/.f64 im re) #s(literal 1 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 im (*.f64 im im)) (*.f64 (/.f64 (/.f64 im re) #s(literal 1 binary64)) (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))) (*.f64 (/.f64 (/.f64 im re) #s(literal 1 binary64)) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (/.f64 (/.f64 im re) #s(literal 1 binary64)) (*.f64 re (*.f64 (*.f64 re re) #s(literal 1/4 binary64))))) (*.f64 (/.f64 (/.f64 im re) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (*.f64 im im)) (*.f64 (/.f64 (/.f64 im re) #s(literal 1 binary64)) (*.f64 re (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)))) (*.f64 (/.f64 (/.f64 im re) #s(literal 1 binary64)) (*.f64 im im)))
(/.f64 (+.f64 (*.f64 im (*.f64 im im)) (*.f64 (/.f64 (/.f64 im re) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) re))) (*.f64 (/.f64 (/.f64 im re) #s(literal 1 binary64)) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (/.f64 (/.f64 im re) #s(literal 1 binary64)) (*.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64)) re))) (*.f64 (/.f64 (/.f64 im re) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (*.f64 im im)) (*.f64 (/.f64 (/.f64 im re) #s(literal 1 binary64)) (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) re))) (*.f64 (/.f64 (/.f64 im re) #s(literal 1 binary64)) (*.f64 im im)))
(/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 (neg.f64 (/.f64 im re)) re)) (*.f64 (neg.f64 (/.f64 im re)) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 (neg.f64 (/.f64 im re)) (*.f64 re #s(literal 1 binary64)))) (*.f64 (neg.f64 (/.f64 im re)) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 (neg.f64 (/.f64 im re)) (*.f64 #s(literal 1 binary64) re))) (*.f64 (neg.f64 (/.f64 im re)) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (*.f64 (neg.f64 (/.f64 im re)) (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))) (*.f64 (neg.f64 (/.f64 im re)) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (neg.f64 (/.f64 im re)) (*.f64 re (*.f64 (*.f64 re re) #s(literal 1/4 binary64))))) (*.f64 (neg.f64 (/.f64 im re)) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) (*.f64 (neg.f64 (/.f64 im re)) (*.f64 re (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)))) (*.f64 (neg.f64 (/.f64 im re)) (*.f64 im im)))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (*.f64 (neg.f64 (/.f64 im re)) (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) re))) (*.f64 (neg.f64 (/.f64 im re)) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (neg.f64 (/.f64 im re)) (*.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64)) re))) (*.f64 (neg.f64 (/.f64 im re)) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) (*.f64 (neg.f64 (/.f64 im re)) (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) re))) (*.f64 (neg.f64 (/.f64 im re)) (*.f64 im im)))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) im) re)) (*.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 re #s(literal 1 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 #s(literal 1 binary64) re))) (*.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 im (*.f64 im im))) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 re (*.f64 (*.f64 re re) #s(literal 1/4 binary64))))) (*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 im im)) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 re (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)))) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 im (*.f64 im im))) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) re))) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64)) re))) (*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 im im)) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) re))) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal 1 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 re im)) (*.f64 im (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal 1 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 im (*.f64 re #s(literal 1 binary64)))) (*.f64 im (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal 1 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 im (*.f64 #s(literal 1 binary64) re))) (*.f64 im (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal 1 binary64)) (*.f64 im (*.f64 im im))) (*.f64 im (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))) (*.f64 im (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) (*.f64 im (*.f64 re (*.f64 (*.f64 re re) #s(literal 1/4 binary64))))) (*.f64 im (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal 1 binary64)) (*.f64 im im)) (*.f64 im (*.f64 re (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)))) (*.f64 im (*.f64 im im)))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal 1 binary64)) (*.f64 im (*.f64 im im))) (*.f64 im (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) re))) (*.f64 im (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) (*.f64 im (*.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64)) re))) (*.f64 im (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal 1 binary64)) (*.f64 im im)) (*.f64 im (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) re))) (*.f64 im (*.f64 im im)))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 re im)) (*.f64 im (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 im (*.f64 re #s(literal 1 binary64)))) (*.f64 im (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 im (*.f64 #s(literal 1 binary64) re))) (*.f64 im (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1 binary64) re) (*.f64 im (*.f64 im im))) (*.f64 im (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))) (*.f64 im (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1 binary64) re) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) (*.f64 im (*.f64 re (*.f64 (*.f64 re re) #s(literal 1/4 binary64))))) (*.f64 im (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1 binary64) re) (*.f64 im im)) (*.f64 im (*.f64 re (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)))) (*.f64 im (*.f64 im im)))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1 binary64) re) (*.f64 im (*.f64 im im))) (*.f64 im (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) re))) (*.f64 im (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1 binary64) re) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) (*.f64 im (*.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64)) re))) (*.f64 im (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1 binary64) re) (*.f64 im im)) (*.f64 im (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) re))) (*.f64 im (*.f64 im im)))
(/.f64 (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) re)) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) re)) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) re)) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (*.f64 re #s(literal 1 binary64)))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) re)) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (*.f64 #s(literal 1 binary64) re))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) re)) (*.f64 im (*.f64 im im))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) re)) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (*.f64 re (*.f64 (*.f64 re re) #s(literal 1/4 binary64))))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) re)) (*.f64 im im)) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (*.f64 re (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (*.f64 im im)))
(/.f64 (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) re)) (*.f64 im (*.f64 im im))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) re))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) re)) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (*.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64)) re))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) re)) (*.f64 im im)) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) re))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (*.f64 im im)))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal -1 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) im) re)) (*.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal -1 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 re #s(literal 1 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal -1 binary64)) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 #s(literal 1 binary64) re))) (*.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal -1 binary64)) (*.f64 im (*.f64 im im))) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 re (*.f64 (*.f64 re re) #s(literal 1/4 binary64))))) (*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal -1 binary64)) (*.f64 im im)) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 re (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)))) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal -1 binary64)) (*.f64 im (*.f64 im im))) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) re))) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64)) re))) (*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal -1 binary64)) (*.f64 im im)) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) re))) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 re im) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) re)) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) im))
(/.f64 (+.f64 (*.f64 re (/.f64 im re)) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (/.f64 im re)))
(/.f64 (+.f64 (*.f64 re (/.f64 (/.f64 im re) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (/.f64 (/.f64 im re) #s(literal 1 binary64))))
(/.f64 (+.f64 (*.f64 re (neg.f64 (/.f64 im re))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal -1 binary64))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (neg.f64 (/.f64 im re))))
(/.f64 (+.f64 (*.f64 re (-.f64 #s(literal 0 binary64) im)) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (-.f64 #s(literal 0 binary64) re))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 re im) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 re #s(literal 1 binary64)))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) im))
(/.f64 (+.f64 (*.f64 re im) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 #s(literal 1 binary64) re))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) im))
(/.f64 (+.f64 (*.f64 re (neg.f64 (-.f64 #s(literal 0 binary64) im))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) re)))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(/.f64 (+.f64 (*.f64 re (-.f64 #s(literal 0 binary64) im)) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 re #s(literal -1 binary64)))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal 1 binary64)) im) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) re)) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) im))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal 1 binary64)) (/.f64 im re)) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (/.f64 im re)))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal 1 binary64)) (/.f64 (/.f64 im re) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (/.f64 (/.f64 im re) #s(literal 1 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal 1 binary64)) (neg.f64 (/.f64 im re))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal -1 binary64))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (neg.f64 (/.f64 im re))))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) im)) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (-.f64 #s(literal 0 binary64) re))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal 1 binary64)) im) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 re #s(literal 1 binary64)))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) im))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal 1 binary64)) im) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 #s(literal 1 binary64) re))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) im))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal 1 binary64)) (neg.f64 (-.f64 #s(literal 0 binary64) im))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) re)))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(/.f64 (+.f64 (*.f64 (*.f64 re #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) im)) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 re #s(literal -1 binary64)))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1 binary64) re) im) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) re)) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) im))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1 binary64) re) (/.f64 im re)) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (/.f64 im re)))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1 binary64) re) (/.f64 (/.f64 im re) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (/.f64 (/.f64 im re) #s(literal 1 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1 binary64) re) (neg.f64 (/.f64 im re))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal -1 binary64))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (neg.f64 (/.f64 im re))))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1 binary64) re) (-.f64 #s(literal 0 binary64) im)) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (-.f64 #s(literal 0 binary64) re))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1 binary64) re) im) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 re #s(literal 1 binary64)))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) im))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1 binary64) re) im) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 #s(literal 1 binary64) re))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) im))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1 binary64) re) (neg.f64 (-.f64 #s(literal 0 binary64) im))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) re)))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1 binary64) re) (-.f64 #s(literal 0 binary64) im)) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 re #s(literal -1 binary64)))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) im) (*.f64 (*.f64 im (*.f64 im im)) re)) (*.f64 im (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (/.f64 im re)) (*.f64 im (*.f64 im im))) (*.f64 (*.f64 im (*.f64 im im)) (/.f64 im re)))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (/.f64 (/.f64 im re) #s(literal 1 binary64))) (*.f64 im (*.f64 im im))) (*.f64 (*.f64 im (*.f64 im im)) (/.f64 (/.f64 im re) #s(literal 1 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (neg.f64 (/.f64 im re))) (*.f64 (*.f64 im (*.f64 im im)) #s(literal -1 binary64))) (*.f64 (*.f64 im (*.f64 im im)) (neg.f64 (/.f64 im re))))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (-.f64 #s(literal 0 binary64) im)) (*.f64 (*.f64 im (*.f64 im im)) (-.f64 #s(literal 0 binary64) re))) (*.f64 (*.f64 im (*.f64 im im)) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) im) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 re #s(literal 1 binary64)))) (*.f64 im (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) im) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 #s(literal 1 binary64) re))) (*.f64 im (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) im))) (*.f64 (*.f64 im (*.f64 im im)) (neg.f64 (-.f64 #s(literal 0 binary64) re)))) (*.f64 (*.f64 im (*.f64 im im)) (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (-.f64 #s(literal 0 binary64) im)) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 re #s(literal -1 binary64)))) (*.f64 (*.f64 im (*.f64 im im)) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal 1/4 binary64))) im) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) re)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) im))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal 1/4 binary64))) (/.f64 im re)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (/.f64 im re)))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal 1/4 binary64))) (/.f64 (/.f64 im re) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (/.f64 (/.f64 im re) #s(literal 1 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal 1/4 binary64))) (neg.f64 (/.f64 im re))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) #s(literal -1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (neg.f64 (/.f64 im re))))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal 1/4 binary64))) (-.f64 #s(literal 0 binary64) im)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (-.f64 #s(literal 0 binary64) re))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal 1/4 binary64))) im) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (*.f64 re #s(literal 1 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) im))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal 1/4 binary64))) im) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (*.f64 #s(literal 1 binary64) re))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) im))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal 1/4 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) im))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (neg.f64 (-.f64 #s(literal 0 binary64) re)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal 1/4 binary64))) (-.f64 #s(literal 0 binary64) im)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (*.f64 re #s(literal -1 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (*.f64 re (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)) im) (*.f64 (*.f64 im im) re)) (*.f64 im (*.f64 im im)))
(/.f64 (+.f64 (*.f64 (*.f64 re (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)) (/.f64 im re)) (*.f64 im im)) (*.f64 (*.f64 im im) (/.f64 im re)))
(/.f64 (+.f64 (*.f64 (*.f64 re (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)) (/.f64 (/.f64 im re) #s(literal 1 binary64))) (*.f64 im im)) (*.f64 (*.f64 im im) (/.f64 (/.f64 im re) #s(literal 1 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 re (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)) (neg.f64 (/.f64 im re))) (*.f64 (*.f64 im im) #s(literal -1 binary64))) (*.f64 (*.f64 im im) (neg.f64 (/.f64 im re))))
(/.f64 (+.f64 (*.f64 (*.f64 re (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)) (-.f64 #s(literal 0 binary64) im)) (*.f64 (*.f64 im im) (-.f64 #s(literal 0 binary64) re))) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (*.f64 re (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)) im) (*.f64 (*.f64 im im) (*.f64 re #s(literal 1 binary64)))) (*.f64 im (*.f64 im im)))
(/.f64 (+.f64 (*.f64 (*.f64 re (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)) im) (*.f64 (*.f64 im im) (*.f64 #s(literal 1 binary64) re))) (*.f64 im (*.f64 im im)))
(/.f64 (+.f64 (*.f64 (*.f64 re (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)) (neg.f64 (-.f64 #s(literal 0 binary64) im))) (*.f64 (*.f64 im im) (neg.f64 (-.f64 #s(literal 0 binary64) re)))) (*.f64 (*.f64 im im) (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(/.f64 (+.f64 (*.f64 (*.f64 re (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)) (-.f64 #s(literal 0 binary64) im)) (*.f64 (*.f64 im im) (*.f64 re #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) re) im) (*.f64 (*.f64 im (*.f64 im im)) re)) (*.f64 im (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) re) (/.f64 im re)) (*.f64 im (*.f64 im im))) (*.f64 (*.f64 im (*.f64 im im)) (/.f64 im re)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) re) (/.f64 (/.f64 im re) #s(literal 1 binary64))) (*.f64 im (*.f64 im im))) (*.f64 (*.f64 im (*.f64 im im)) (/.f64 (/.f64 im re) #s(literal 1 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) re) (neg.f64 (/.f64 im re))) (*.f64 (*.f64 im (*.f64 im im)) #s(literal -1 binary64))) (*.f64 (*.f64 im (*.f64 im im)) (neg.f64 (/.f64 im re))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) re) (-.f64 #s(literal 0 binary64) im)) (*.f64 (*.f64 im (*.f64 im im)) (-.f64 #s(literal 0 binary64) re))) (*.f64 (*.f64 im (*.f64 im im)) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) re) im) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 re #s(literal 1 binary64)))) (*.f64 im (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) re) im) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 #s(literal 1 binary64) re))) (*.f64 im (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) re) (neg.f64 (-.f64 #s(literal 0 binary64) im))) (*.f64 (*.f64 im (*.f64 im im)) (neg.f64 (-.f64 #s(literal 0 binary64) re)))) (*.f64 (*.f64 im (*.f64 im im)) (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) re) (-.f64 #s(literal 0 binary64) im)) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 re #s(literal -1 binary64)))) (*.f64 (*.f64 im (*.f64 im im)) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64)) re) im) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) re)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) im))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64)) re) (/.f64 im re)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (/.f64 im re)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64)) re) (/.f64 (/.f64 im re) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (/.f64 (/.f64 im re) #s(literal 1 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64)) re) (neg.f64 (/.f64 im re))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) #s(literal -1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (neg.f64 (/.f64 im re))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64)) re) (-.f64 #s(literal 0 binary64) im)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (-.f64 #s(literal 0 binary64) re))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64)) re) im) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (*.f64 re #s(literal 1 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) im))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64)) re) im) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (*.f64 #s(literal 1 binary64) re))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) im))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64)) re) (neg.f64 (-.f64 #s(literal 0 binary64) im))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (neg.f64 (-.f64 #s(literal 0 binary64) re)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64)) re) (-.f64 #s(literal 0 binary64) im)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (*.f64 re #s(literal -1 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) re) im) (*.f64 (*.f64 im im) re)) (*.f64 im (*.f64 im im)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) re) (/.f64 im re)) (*.f64 im im)) (*.f64 (*.f64 im im) (/.f64 im re)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) re) (/.f64 (/.f64 im re) #s(literal 1 binary64))) (*.f64 im im)) (*.f64 (*.f64 im im) (/.f64 (/.f64 im re) #s(literal 1 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) re) (neg.f64 (/.f64 im re))) (*.f64 (*.f64 im im) #s(literal -1 binary64))) (*.f64 (*.f64 im im) (neg.f64 (/.f64 im re))))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) re) (-.f64 #s(literal 0 binary64) im)) (*.f64 (*.f64 im im) (-.f64 #s(literal 0 binary64) re))) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) re) im) (*.f64 (*.f64 im im) (*.f64 re #s(literal 1 binary64)))) (*.f64 im (*.f64 im im)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) re) im) (*.f64 (*.f64 im im) (*.f64 #s(literal 1 binary64) re))) (*.f64 im (*.f64 im im)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) re) (neg.f64 (-.f64 #s(literal 0 binary64) im))) (*.f64 (*.f64 im im) (neg.f64 (-.f64 #s(literal 0 binary64) re)))) (*.f64 (*.f64 im im) (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) re) (-.f64 #s(literal 0 binary64) im)) (*.f64 (*.f64 im im) (*.f64 re #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))))
(*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))
(*.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))) re)
(exp.f64 (*.f64 (log.f64 im) #s(literal 3 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) #s(literal 3/2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))
(/.f64 (*.f64 im (*.f64 im im)) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) #s(literal -1 binary64))
(pow.f64 im #s(literal 3 binary64))
(pow.f64 (*.f64 im im) #s(literal 3/2 binary64))
(pow.f64 (pow.f64 im #s(literal 3/2 binary64)) #s(literal 2 binary64))
(*.f64 im (*.f64 im im))
(*.f64 (*.f64 im im) im)
(*.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))
(*.f64 (*.f64 im (*.f64 im im)) #s(literal 1 binary64))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 im im)) im)
(*.f64 (*.f64 #s(literal 1 binary64) im) (*.f64 im im))
(*.f64 (pow.f64 im #s(literal 3/2 binary64)) (pow.f64 im #s(literal 3/2 binary64)))
(+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))
(+.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1 binary64) im))
(-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))))
(-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64)) (*.f64 im (*.f64 im im))))
(-.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))) (/.f64 #s(literal -1 binary64) im))
(-.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) im)) im)) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 re re) (*.f64 im (*.f64 im im))) (/.f64 (*.f64 re re) (*.f64 im (*.f64 im im))))) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) im)) im)))
(fma.f64 (*.f64 re re) (*.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 #s(literal 1 binary64) im))
(fma.f64 (*.f64 re re) (/.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1 binary64) im))
(fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1 binary64) im))
(fma.f64 (/.f64 #s(literal 1 binary64) im) #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))
(fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re re) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1 binary64) im))
(fma.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1 binary64) im))
(fma.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) im)) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))
(fma.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) (/.f64 #s(literal 1 binary64) im))
(fma.f64 (/.f64 #s(literal -1/4 binary64) im) (/.f64 (*.f64 re re) (*.f64 im im)) (/.f64 #s(literal 1 binary64) im))
(fma.f64 (/.f64 (*.f64 re re) (*.f64 im im)) (/.f64 #s(literal -1/4 binary64) im) (/.f64 #s(literal 1 binary64) im))
(fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (/.f64 #s(literal 1 binary64) im))
(fma.f64 (/.f64 re (/.f64 im re)) (/.f64 #s(literal -1/4 binary64) (*.f64 im im)) (/.f64 #s(literal 1 binary64) im))
(fma.f64 (*.f64 re #s(literal -1/4 binary64)) (*.f64 re (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 #s(literal 1 binary64) im))
(fma.f64 (*.f64 re #s(literal -1/4 binary64)) (/.f64 re (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1 binary64) im))
(fma.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) (/.f64 #s(literal 1 binary64) (*.f64 im im)) (/.f64 #s(literal 1 binary64) im))
(fma.f64 (/.f64 (*.f64 re re) (*.f64 im (*.f64 im im))) #s(literal -1/4 binary64) (/.f64 #s(literal 1 binary64) im))
(fma.f64 (/.f64 #s(literal -1/4 binary64) (*.f64 im im)) (/.f64 re (/.f64 im re)) (/.f64 #s(literal 1 binary64) im))
(fma.f64 (/.f64 (*.f64 re #s(literal -1/4 binary64)) im) (/.f64 re (*.f64 im im)) (/.f64 #s(literal 1 binary64) im))
(fma.f64 (/.f64 (*.f64 re #s(literal -1/4 binary64)) (*.f64 im im)) (/.f64 re im) (/.f64 #s(literal 1 binary64) im))
(fma.f64 (pow.f64 im #s(literal -1/2 binary64)) (pow.f64 im #s(literal -1/2 binary64)) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (+.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) (/.f64 (/.f64 (-.f64 (/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) im) #s(literal 1 binary64)) im) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) #s(literal -1/64 binary64)) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im))))) (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) im)) im) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im))) (*.f64 im im))))
(/.f64 (+.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 im (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) #s(literal -1/64 binary64)) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im))))) (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) (/.f64 (/.f64 (-.f64 (/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) im) #s(literal 1 binary64)) im) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))))
(/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) #s(literal -1/64 binary64)) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im))))) (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 re re) (*.f64 im (*.f64 im im))) (/.f64 (*.f64 re re) (*.f64 im (*.f64 im im))))) (/.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) im)) im) im)))
(/.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im))) (*.f64 im im)) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) im)) im))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) im) (*.f64 im (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) (*.f64 im (*.f64 (*.f64 re re) #s(literal 1/4 binary64)))) (*.f64 im (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (*.f64 im im)) (*.f64 im (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im))) (*.f64 im (*.f64 im im)))
(/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) im) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 (*.f64 re re) #s(literal 1/4 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) (*.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im))) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) im) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) im))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) im)) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal -1 binary64))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (-.f64 #s(literal 0 binary64) im)) (*.f64 (*.f64 im (*.f64 im im)) #s(literal -1 binary64))) (*.f64 (*.f64 im (*.f64 im im)) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64)) im) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) im))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64)) (-.f64 #s(literal 0 binary64) im)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) #s(literal -1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) im) (*.f64 im im)) (*.f64 im (*.f64 im im)))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) (-.f64 #s(literal 0 binary64) im)) (*.f64 (*.f64 im im) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))))
(/.f64 (neg.f64 (+.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))) (neg.f64 (*.f64 im (*.f64 im (*.f64 im im)))))
(/.f64 (neg.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) #s(literal -1/64 binary64)) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im))))) (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (neg.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) (/.f64 (/.f64 (-.f64 (/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) im) #s(literal 1 binary64)) im) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))))
(/.f64 (neg.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im))) (*.f64 im im))) (neg.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) im)) im)))
(/.f64 (/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)) #s(literal 1 binary64)) (*.f64 im im)) (/.f64 (-.f64 (/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) im) #s(literal 1 binary64)) im))
(/.f64 (/.f64 (+.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) im) (*.f64 im (*.f64 im im)))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal 1 binary64))) im) (*.f64 im (/.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal 1 binary64))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 im im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im))) im) (*.f64 im (/.f64 (*.f64 im im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))) (*.f64 im #s(literal -1 binary64))) (*.f64 im (neg.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))))
(/.f64 (+.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) #s(literal 1 binary64)))) (*.f64 im (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))))) (*.f64 im (neg.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64))))) (*.f64 im (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 im im))) (*.f64 im (neg.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)))) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (*.f64 im im)) (*.f64 im (*.f64 (/.f64 #s(literal -1/4 binary64) im) (*.f64 re re)))) (*.f64 im (*.f64 im im)))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) im) (*.f64 im (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re re) (*.f64 im im))))) (*.f64 im im))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) im) (*.f64 im (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im im)))) (*.f64 im im))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) im) (*.f64 im (/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) im))) (*.f64 im im))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) #s(literal 1 binary64))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal 1 binary64))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) #s(literal 1 binary64))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (/.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal 1 binary64))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 im im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) #s(literal 1 binary64))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (/.f64 (*.f64 im im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im))))
(/.f64 (+.f64 (*.f64 im (*.f64 im im)) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) #s(literal -1 binary64))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (neg.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (*.f64 (*.f64 re re) #s(literal 1/4 binary64)))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (*.f64 im im)) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (*.f64 im im)))
(/.f64 (+.f64 (*.f64 im (*.f64 im im)) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) #s(literal 1 binary64)))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (neg.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64))))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (*.f64 im im))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (neg.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (neg.f64 (*.f64 im im))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (*.f64 im im)) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (*.f64 (/.f64 #s(literal -1/4 binary64) im) (*.f64 re re)))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (*.f64 im im)))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) im) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re re) (*.f64 im im))))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) im))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) im) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im im)))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) im))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) im) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) im))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) im))
(/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) im) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal 1 binary64))))
(/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im))) (*.f64 (-.f64 #s(literal 0 binary64) im) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 (*.f64 im im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im))))
(/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))) (*.f64 (-.f64 #s(literal 0 binary64) im) #s(literal -1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) im) (neg.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) #s(literal 1 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))))) (*.f64 (-.f64 #s(literal 0 binary64) im) (neg.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64))))) (*.f64 (-.f64 #s(literal 0 binary64) im) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))))))
(/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (*.f64 im im))) (*.f64 (-.f64 #s(literal 0 binary64) im) (neg.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)))) (*.f64 (-.f64 #s(literal 0 binary64) im) (neg.f64 (*.f64 im im))))
(/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 (/.f64 #s(literal -1/4 binary64) im) (*.f64 re re)))) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re re) (*.f64 im im))))) (*.f64 (-.f64 #s(literal 0 binary64) im) im))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im im)))) (*.f64 (-.f64 #s(literal 0 binary64) im) im))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) im))) (*.f64 (-.f64 #s(literal 0 binary64) im) im))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) im))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) im) (*.f64 (/.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (/.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal 1 binary64)) im))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) im))) (*.f64 (/.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (/.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal 1 binary64)) (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) im)) (*.f64 (/.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal 1 binary64)) #s(literal -1 binary64))) (*.f64 (/.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) im) (*.f64 (/.f64 (*.f64 im im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 im im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)) im))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) im))) (*.f64 (/.f64 (*.f64 im im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 im im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)) (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) im)) (*.f64 (/.f64 (*.f64 im im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)) #s(literal -1 binary64))) (*.f64 (/.f64 (*.f64 im im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (neg.f64 (-.f64 #s(literal 0 binary64) im))) (*.f64 im (*.f64 im im))) (*.f64 (*.f64 im (*.f64 im im)) (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 (neg.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) #s(literal 1 binary64))) (*.f64 (neg.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) im))
(/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) im))) (*.f64 (neg.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) #s(literal 1 binary64))) (*.f64 (neg.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(/.f64 (+.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) im)) (*.f64 (neg.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) #s(literal -1 binary64))) (*.f64 (neg.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64)) (neg.f64 (-.f64 #s(literal 0 binary64) im))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))) (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) (neg.f64 (-.f64 #s(literal 0 binary64) im))) (*.f64 im im)) (*.f64 (*.f64 im im) (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) #s(literal 1 binary64)) im) (*.f64 im (*.f64 im im))) (*.f64 im (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (neg.f64 (-.f64 #s(literal 0 binary64) im))) (*.f64 im (*.f64 im im))) (*.f64 (*.f64 im (*.f64 im im)) (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) im)) (*.f64 (*.f64 im (*.f64 im im)) #s(literal -1 binary64))) (*.f64 (*.f64 im (*.f64 im im)) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64))) im) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) #s(literal 1 binary64))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) im))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) im))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) #s(literal 1 binary64))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(/.f64 (+.f64 (*.f64 (neg.f64 (*.f64 (*.f64 re re) #s(literal 1/4 binary64))) (-.f64 #s(literal 0 binary64) im)) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) #s(literal -1 binary64))) (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)) im) (*.f64 (neg.f64 (*.f64 im im)) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)) (neg.f64 (-.f64 #s(literal 0 binary64) im))) (*.f64 (neg.f64 (*.f64 im im)) #s(literal 1 binary64))) (*.f64 (neg.f64 (*.f64 im im)) (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(/.f64 (+.f64 (*.f64 (neg.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im)) (-.f64 #s(literal 0 binary64) im)) (*.f64 (neg.f64 (*.f64 im im)) #s(literal -1 binary64))) (*.f64 (neg.f64 (*.f64 im im)) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(literal -1/4 binary64) im) (*.f64 re re)) im) (*.f64 im im)) (*.f64 im (*.f64 im im)))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(literal -1/4 binary64) im) (*.f64 re re)) (neg.f64 (-.f64 #s(literal 0 binary64) im))) (*.f64 im im)) (*.f64 (*.f64 im im) (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(/.f64 (+.f64 (*.f64 (*.f64 (/.f64 #s(literal -1/4 binary64) im) (*.f64 re re)) (-.f64 #s(literal 0 binary64) im)) (*.f64 (*.f64 im im) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re re) (*.f64 im im))) im) im) (*.f64 im im))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re re) (*.f64 im im))) (neg.f64 (-.f64 #s(literal 0 binary64) im))) im) (*.f64 im (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re re) (*.f64 im im))) (-.f64 #s(literal 0 binary64) im)) (*.f64 im #s(literal -1 binary64))) (*.f64 im (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im im)) im) im) (*.f64 im im))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im im)) (neg.f64 (-.f64 #s(literal 0 binary64) im))) im) (*.f64 im (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im im)) (-.f64 #s(literal 0 binary64) im)) (*.f64 im #s(literal -1 binary64))) (*.f64 im (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) im) im) im) (*.f64 im im))
(/.f64 (+.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) im) (neg.f64 (-.f64 #s(literal 0 binary64) im))) im) (*.f64 im (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(/.f64 (+.f64 (*.f64 (/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) im) (-.f64 #s(literal 0 binary64) im)) (*.f64 im #s(literal -1 binary64))) (*.f64 im (-.f64 #s(literal 0 binary64) im)))
(pow.f64 (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (+.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) (/.f64 (/.f64 (-.f64 (/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) im) #s(literal 1 binary64)) im) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) #s(literal -1/64 binary64)) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im))))) (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) im)) im) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im))) (*.f64 im im))) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im (*.f64 im im)))))
(*.f64 (+.f64 (/.f64 (*.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) #s(literal -1/64 binary64)) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im))))) (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) (/.f64 (/.f64 (-.f64 (/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) im) #s(literal 1 binary64)) im) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))))
(*.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im))) (*.f64 im im)) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im) im)) im)))

simplify462.0ms (4.4%)

Algorithm
egg-herbie
Rules
6930×*-lowering-*.f32
6930×*-lowering-*.f64
4158×+-lowering-+.f64
4158×+-lowering-+.f32
1802×distribute-lft-in
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0134910139
147439803
081629803
Stop Event
iter limit
node limit
Counts
528 → 528
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))))))))
(* (sqrt im) (sqrt 2))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(* im (sqrt (/ 1 re)))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (* im (sqrt (/ 1 re))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re)))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* -1/128 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re))))))
(* -2 (* (sqrt re) (sqrt -1)))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -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))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* im (sqrt (/ 1 re)))
(* im (+ (sqrt (/ 1 re)) (* -1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* 7/128 (* (pow im 2) (sqrt (/ 1 (pow re 9)))))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* (pow im 2) (+ (* -33/1024 (* (pow im 2) (sqrt (/ 1 (pow re 13))))) (* 7/128 (sqrt (/ 1 (pow re 9))))))))))
(* (sqrt im) (sqrt 2))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (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 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt 2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(pow (* 2 im) 1/4)
(+ (* -1/4 (* (pow (/ 2 (pow im 3)) 1/4) re)) (pow (* 2 im) 1/4))
(+ (* re (+ (* -1/4 (pow (/ 2 (pow im 3)) 1/4)) (* 1/32 (* (pow (/ 2 (pow im 7)) 1/4) re)))) (pow (* 2 im) 1/4))
(+ (* re (+ (* -1/4 (pow (/ 2 (pow im 3)) 1/4)) (* re (+ (* 1/32 (pow (/ 2 (pow im 7)) 1/4)) (* 5/128 (* (pow (/ 2 (pow im 11)) 1/4) re)))))) (pow (* 2 im) 1/4))
(exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/1536 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/24576 (pow im 6)) (* 1/2880 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))
(exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/24576 (pow im 6)) (+ (* 1/2880 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6))))) (* 1/1536 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (pow re 6)) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))
(exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 2))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/16 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* 13/512 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 4))))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/16 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* (pow im 2) (+ (* -119/8192 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 6))) (* 13/512 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 4))))))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/384 (pow re 3)) (* 1/24 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) (pow im 3)) (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* 1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* -1/4 (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* -1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/384 (pow re 3)) (* 1/24 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) im)) (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* -1/4 (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(* 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/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* 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 re) (* (sqrt -1) (sqrt 2))))
(+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 re)))) (* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2)))))
(+ (* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2)))) (* im (+ (* -1/16 (* (/ (* im (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (sqrt (/ 1 re)) (/ (sqrt 2) (sqrt -1)))))))
(+ (* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2)))) (* im (+ (* 1/4 (* (sqrt (/ 1 re)) (/ (sqrt 2) (sqrt -1)))) (* im (+ (* -1/16 (* (sqrt (/ 1 (pow re 3))) (/ (sqrt 2) (pow (sqrt -1) 3)))) (* 1/32 (* (/ (* im (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 5))))))))))
(* 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/16 (* (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/32 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(* -1 (* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(* -1 (* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/32 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (* (sqrt -2) (sqrt -1))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))))
(* 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/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))) (* -1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))))))))
(* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* re (+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(* re (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(* re (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 3) (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* -1 (* re (+ (* 1/4 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* re (+ (* -1/16 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* re (+ (* -1/16 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 7))))) (+ (* 1/4 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))))
(* (sqrt re) (* (sqrt -1) (sqrt 2)))
(+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 re)))) (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(+ (* im (+ (* -1/8 (* (/ (* im (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (/ (sqrt 2) (sqrt -1)))))) (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(+ (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (/ (sqrt 2) (sqrt -1)))) (* im (+ (* -1/8 (* (sqrt (/ 1 (pow re 3))) (/ (sqrt 2) (pow (sqrt -1) 3)))) (* 1/16 (* (/ (* im (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 5))))))))) (* (sqrt re) (* (sqrt -1) (sqrt 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/8 (* (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/16 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))
(* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/16 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (* (sqrt -2) (sqrt -1))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(* (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/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))) (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))))))) (* (sqrt im) (sqrt 2)))
(* (sqrt re) (* (sqrt -1) (sqrt 2)))
(* re (+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))
(* re (+ (* -1/8 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(* re (+ (* -1/8 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (/ (* (pow im 3) (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* -1 (* re (+ (* 1/2 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))))
(* -2 re)
(+ (* -2 re) (* 2 im))
(+ (* -2 re) (* 2 im))
(+ (* -2 re) (* 2 im))
(* 2 im)
(* im (+ 2 (* -2 (/ re im))))
(* im (+ 2 (* -2 (/ re im))))
(* im (+ 2 (* -2 (/ re im))))
(* 2 im)
(* -1 (* im (- (* 2 (/ re im)) 2)))
(* -1 (* im (- (* 2 (/ re im)) 2)))
(* -1 (* im (- (* 2 (/ re im)) 2)))
(* 2 im)
(+ (* -2 re) (* 2 im))
(+ (* -2 re) (* 2 im))
(+ (* -2 re) (* 2 im))
(* -2 re)
(* re (- (* 2 (/ im re)) 2))
(* re (- (* 2 (/ im re)) 2))
(* re (- (* 2 (/ im re)) 2))
(* -2 re)
(* -1 (* re (+ 2 (* -2 (/ im re)))))
(* -1 (* re (+ 2 (* -2 (/ im re)))))
(* -1 (* re (+ 2 (* -2 (/ im re)))))
(* -1 re)
(- im re)
(- im re)
(- im re)
im
(* im (+ 1 (* -1 (/ re im))))
(* im (+ 1 (* -1 (/ re im))))
(* im (+ 1 (* -1 (/ re im))))
im
(* -1 (* im (- (/ re im) 1)))
(* -1 (* im (- (/ re im) 1)))
(* -1 (* im (- (/ re im) 1)))
im
(+ im (* -1 re))
(+ im (* -1 re))
(+ im (* -1 re))
(* -1 re)
(* re (- (/ im re) 1))
(* re (- (/ im re) 1))
(* re (- (/ im re) 1))
(* -1 re)
(* -1 (* re (+ 1 (* -1 (/ im re)))))
(* -1 (* re (+ 1 (* -1 (/ im re)))))
(* -1 (* re (+ 1 (* -1 (/ im re)))))
(* 1/2 (* (sqrt (/ 1 im)) re))
(/ (+ (* -1/2 (sqrt (pow im 3))) (* 1/2 (* (sqrt im) re))) im)
(/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* -1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re)))))) im)
(/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* -1/2 (sqrt (/ 1 im))) (* im (+ (* -1/4 (* (sqrt (/ 1 im)) (/ 1 re))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 re)))))))) im)
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* 1/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)))) (* 1/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) (pow (sqrt 2) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(* -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)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(* -1 (* im (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))))
(* 1/2 (* (sqrt (/ 1 im)) re))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im)))))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* 1/2 (sqrt (/ 1 im))))))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (+ (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3)))) (* 1/2 (sqrt (/ 1 im)))))))
(* -1/2 (* (sqrt (/ 1 im)) re))
(* -1 (* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (- (* 2 im) im) re))) (* 1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (sqrt im) (- (* 2 im) im))) (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re)))) re)) (* 1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))
(* (sqrt (/ 1 im)) re)
(/ (+ (* -1 (sqrt (pow im 3))) (* (sqrt im) re)) im)
(/ (+ (* (sqrt im) re) (* (pow im 2) (+ (* -1 (sqrt (/ 1 im))) (* (sqrt im) (/ 1 re))))) im)
(/ (+ (* (sqrt im) re) (* (pow im 2) (+ (* -1 (sqrt (/ 1 im))) (* im (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 re))) (* (sqrt (/ 1 im)) (/ 1 re))))))) im)
(* (sqrt im) (sqrt 2))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(* (sqrt im) (sqrt 2))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(* (sqrt (/ 1 im)) re)
(* re (+ (sqrt (/ 1 im)) (* -1 (* (sqrt im) (/ 1 re)))))
(* re (+ (sqrt (/ 1 im)) (+ (* -1 (* (sqrt im) (/ 1 re))) (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))))))
(* re (+ (sqrt (/ 1 im)) (+ (* -1 (* (sqrt im) (/ 1 re))) (+ (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3))))))))
(* -1 (* (sqrt (/ 1 im)) re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (* (sqrt im) (/ 1 re))))))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (sqrt im) (* -1/2 (* (sqrt im) (/ (- (* 2 im) im) re)))) re)))))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (sqrt im) (* -1 (/ (+ (* 1/2 (* (sqrt im) (- (* 2 im) im))) (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re)))) re))) re)))))
(/ (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)))
(* 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)))
(* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))
(/ (+ (* 1/4 (* (sqrt (pow im 5)) (/ 1 (sqrt -1/4)))) (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4))))) (pow im 2))
(/ (+ (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (* (pow im 3) (+ (* -1/2 (* (sqrt im) (/ 1 (* re (sqrt -1/4))))) (* 1/4 (* (sqrt (/ 1 im)) (/ 1 (sqrt -1/4))))))) (pow im 2))
(/ (+ (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (* (pow im 3) (+ (* 1/4 (* (sqrt (/ 1 im)) (/ 1 (sqrt -1/4)))) (* im (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (* re (sqrt -1/4))))) (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4)))))))))) (pow im 2))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* 1/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)))) (* 1/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) (pow (sqrt 2) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(* -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)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(* -1 (* im (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))))
(* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))
(* (pow re 2) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))
(* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* (pow re 4) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))))
(* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))
(* (pow re 2) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))
(* (pow re 2) (+ (* -1 (/ (+ (* -1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* re (sqrt -1/4))))) (* 1/2 (* (sqrt (pow im 3)) (/ 1 (sqrt -1/4))))) (pow re 3))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))
(* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))
(/ (+ (* 1/2 (* (sqrt (pow im 5)) (/ 1 (sqrt -1/4)))) (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (pow im 2))
(/ (+ (* (sqrt im) (* (pow re 2) (sqrt -1/4))) (* (pow im 3) (+ (* -1 (* (sqrt im) (/ 1 (* re (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt -1/4))))))) (pow im 2))
(/ (+ (* (sqrt im) (* (pow re 2) (sqrt -1/4))) (* (pow im 3) (+ (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt -1/4)))) (* im (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (* re (sqrt -1/4))))) (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))))))) (pow im 2))
(* (sqrt im) (sqrt 2))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(* (sqrt im) (sqrt 2))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))
(* (pow re 2) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))
(* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* (pow re 4) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))
(* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))
(* (pow re 2) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))
(* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(* (pow re 2) (+ (* -1 (/ (+ (* -1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* re (sqrt -1/4))))) (* (sqrt (pow im 3)) (/ 1 (sqrt -1/4)))) (pow re 3))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(* -1/4 (/ (pow re 4) (pow im 3)))
(/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (pow re 2))) (pow im 3))
(/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (+ (* -2 (* im re)) (pow re 2)))) (pow im 3))
(/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)))) (pow im 3))
(* 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 (/ re im)) 2)))
(* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))
(* -1 (* im (- (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1 (pow re 2)) (* 1/4 (/ (pow re 4) (pow im 2)))) im))) im)) 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)))
(* -1/4 (/ (pow re 4) (pow im 3)))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))
(* (pow re 4) (- (+ (* 2 (/ im (pow re 4))) (/ 1 (* im (pow re 2)))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))
(* -1/4 (/ (pow re 4) (pow im 3)))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))
(* (pow re 4) (- (+ (* -1 (/ (+ 2 (* -2 (/ im re))) (pow re 3))) (/ 1 (* im (pow re 2)))) (* 1/4 (/ 1 (pow im 3)))))
(* -2 re)
(* re (- (/ re im) 2))
(* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2))
(* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2))
(* -1/4 (/ (pow re 4) (pow im 3)))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))
(* -1/4 (/ (pow re 4) (pow im 3)))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))
(* -1/4 (/ (pow re 4) (pow im 3)))
(/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (pow re 2))) (pow im 3))
(/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (+ (* -2 (* im re)) (pow re 2)))) (pow im 3))
(/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (+ (* -2 (* im re)) (pow re 2)))) (pow im 3))
(* -2 re)
(+ (* -2 re) (/ (pow re 2) im))
(+ (* -2 re) (+ (* -1/4 (/ (pow re 4) (pow im 3))) (/ (pow re 2) im)))
(+ (* -2 re) (+ (* -1/4 (/ (pow re 4) (pow im 3))) (/ (pow re 2) im)))
(* -2 re)
(+ (* -2 re) (/ (pow re 2) im))
(+ (* -2 re) (* -1 (/ (+ (* -1 (pow re 2)) (* 1/4 (/ (pow re 4) (pow im 2)))) im)))
(+ (* -2 re) (* -1 (/ (+ (* -1 (pow re 2)) (* 1/4 (/ (pow re 4) (pow im 2)))) 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)))))
(* -2 re)
(* re (- (/ re im) 2))
(* re (- (/ re im) 2))
(* re (- (/ re im) 2))
(/ (pow re 2) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(/ (pow re 2) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(/ (pow re 2) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(* -2 re)
(+ (* -2 re) (/ (pow re 2) im))
(+ (* -2 re) (/ (pow re 2) im))
(+ (* -2 re) (/ (pow re 2) im))
(* -2 re)
(+ (* -2 re) (/ (pow re 2) im))
(+ (* -2 re) (/ (pow re 2) im))
(+ (* -2 re) (/ (pow re 2) im))
(* -1/4 (/ (pow re 2) (pow im 3)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/ re im)
(* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im)))
(* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im)))
(* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im)))
(* -1/4 (/ (pow re 3) (pow im 3)))
(* (pow re 3) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(* (pow re 3) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(* (pow re 3) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(* -1/4 (/ (pow re 3) (pow im 3)))
(* -1 (* (pow re 3) (- (* 1/4 (/ 1 (pow im 3))) (/ 1 (* im (pow re 2))))))
(* -1 (* (pow re 3) (- (* 1/4 (/ 1 (pow im 3))) (/ 1 (* im (pow re 2))))))
(* -1 (* (pow re 3) (- (* 1/4 (/ 1 (pow im 3))) (/ 1 (* im (pow re 2))))))
(* -1/4 (/ (pow re 3) (pow im 3)))
(/ (+ (* -1/4 (pow re 3)) (* (pow im 2) re)) (pow im 3))
(/ (+ (* -1/4 (pow re 3)) (* (pow im 2) re)) (pow im 3))
(/ (+ (* -1/4 (pow re 3)) (* (pow im 2) re)) (pow im 3))
(/ re im)
(/ (+ re (* -1/4 (/ (pow re 3) (pow im 2)))) im)
(/ (+ re (* -1/4 (/ (pow re 3) (pow im 2)))) im)
(/ (+ re (* -1/4 (/ (pow re 3) (pow im 2)))) im)
(/ re im)
(* -1 (/ (+ (* -1 re) (* 1/4 (/ (pow re 3) (pow im 2)))) im))
(* -1 (/ (+ (* -1 re) (* 1/4 (/ (pow re 3) (pow im 2)))) im))
(* -1 (/ (+ (* -1 re) (* 1/4 (/ (pow re 3) (pow im 2)))) im))
(pow im 3)
(pow im 3)
(pow im 3)
(pow im 3)
(pow im 3)
(pow im 3)
(pow im 3)
(pow im 3)
(pow im 3)
(pow im 3)
(pow im 3)
(pow im 3)
(* -1/4 (/ (pow re 2) (pow im 3)))
(/ (+ (* -1/4 (pow re 2)) (pow im 2)) (pow im 3))
(/ (+ (* -1/4 (pow re 2)) (pow im 2)) (pow im 3))
(/ (+ (* -1/4 (pow re 2)) (pow im 2)) (pow im 3))
(/ 1 im)
(/ (+ 1 (* -1/4 (/ (pow re 2) (pow im 2)))) im)
(/ (+ 1 (* -1/4 (/ (pow re 2) (pow im 2)))) im)
(/ (+ 1 (* -1/4 (/ (pow re 2) (pow im 2)))) im)
(/ 1 im)
(* -1 (/ (- (* 1/4 (/ (pow re 2) (pow im 2))) 1) im))
(* -1 (/ (- (* 1/4 (/ (pow re 2) (pow im 2))) 1) im))
(* -1 (/ (- (* 1/4 (/ (pow re 2) (pow im 2))) 1) im))
(/ 1 im)
(+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))
(+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))
(+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))
(* -1/4 (/ (pow re 2) (pow im 3)))
(* (pow re 2) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(* (pow re 2) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(* (pow re 2) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(* -1/4 (/ (pow re 2) (pow im 3)))
(* (pow re 2) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(* (pow re 2) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(* (pow re 2) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
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))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.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))))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 re (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))))) (*.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)))))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.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))))
(+ (* -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)))))
(+.f64 (*.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 (*.f64 (sqrt.f64 #s(literal 2 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)))))))
(+ (* -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))))))
(+.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 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 #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/64 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 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/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)))))))
(+.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 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/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/64 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 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))))))) (*.f64 #s(literal -1/1024 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (pow.f64 im #s(literal 5 binary64)) #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)))))))
(*.f64 (+.f64 (*.f64 #s(literal -1/8 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 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))))) (-.f64 #s(literal 0 binary64) 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 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (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))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) 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 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (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))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.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))))
(* 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 (+.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.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/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 (+.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/2 binary64)))) (*.f64 (*.f64 im im) (+.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) (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 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.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/256 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 5 binary64))))))) (sqrt.f64 re)) (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)))) (* (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 (+.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/2 binary64)))) (*.f64 (*.f64 im im) (+.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) (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 im im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.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/256 binary64) (*.f64 #s(literal 1/2 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 #s(literal 1/4 binary64) (/.f64 (*.f64 (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/256 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 5 binary64))))))) (sqrt.f64 #s(literal 1/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 (+.f64 (*.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)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (*.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)))))) (+.f64 (*.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/8 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 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 (+.f64 (*.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)))))) (+.f64 (+.f64 (*.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/8 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 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 (+.f64 (*.f64 #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 -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 #s(literal 0 binary64) 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 (+.f64 (*.f64 #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 -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (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/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)))))))) (-.f64 #s(literal 0 binary64) 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 #s(literal 0 binary64) (*.f64 im (-.f64 (+.f64 (*.f64 #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 -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) #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 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(-.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (-.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (* im (sqrt (/ 1 re))))
(+.f64 (*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re)))))
(+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (+.f64 (*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* -1/128 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re))))))
(+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (+.f64 (+.f64 (*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))) (*.f64 (*.f64 #s(literal -1/128 binary64) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(* -2 (* (sqrt re) (sqrt -1)))
(*.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -1 binary64)))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(*.f64 (+.f64 (*.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 #s(literal 2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 #s(literal 0 binary64) 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))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(*.f64 (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (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))))) (*.f64 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) #s(literal 1/4 binary64))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(*.f64 (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (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))))) (*.f64 (*.f64 #s(literal 1/64 binary64) (*.f64 (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)))))) (*.f64 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) #s(literal 1/4 binary64))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (+ (sqrt (/ 1 re)) (* -1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))
(*.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* 7/128 (* (pow im 2) (sqrt (/ 1 (pow re 9)))))))))
(*.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/8 binary64)) (*.f64 (*.f64 #s(literal 7/128 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* (pow im 2) (+ (* -33/1024 (* (pow im 2) (sqrt (/ 1 (pow re 13))))) (* 7/128 (sqrt (/ 1 (pow re 9))))))))))
(*.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/8 binary64)) (*.f64 (*.f64 im im) (+.f64 (*.f64 (*.f64 #s(literal -33/1024 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 13 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) #s(literal 7/128 binary64))))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(*.f64 im (-.f64 (*.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 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (-.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (-.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 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 0 binary64) im))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (-.f64 (+.f64 (*.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) (pow.f64 im #s(literal 5 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (sqrt.f64 #s(literal 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))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt 2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (-.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 im (*.f64 im im)))) (/.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))))))
(pow (* 2 im) 1/4)
(pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64))
(+ (* -1/4 (* (pow (/ 2 (pow im 3)) 1/4) re)) (pow (* 2 im) 1/4))
(+.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 re (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 im (*.f64 im im))) #s(literal 1/4 binary64)))))
(+ (* re (+ (* -1/4 (pow (/ 2 (pow im 3)) 1/4)) (* 1/32 (* (pow (/ 2 (pow im 7)) 1/4) re)))) (pow (* 2 im) 1/4))
(+.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) (*.f64 re (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 im (*.f64 im im))) #s(literal 1/4 binary64))) (*.f64 #s(literal 1/32 binary64) (*.f64 re (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 7 binary64))) #s(literal 1/4 binary64)))))))
(+ (* re (+ (* -1/4 (pow (/ 2 (pow im 3)) 1/4)) (* re (+ (* 1/32 (pow (/ 2 (pow im 7)) 1/4)) (* 5/128 (* (pow (/ 2 (pow im 11)) 1/4) re)))))) (pow (* 2 im) 1/4))
(+.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) (*.f64 re (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 im (*.f64 im im))) #s(literal 1/4 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 7 binary64))) #s(literal 1/4 binary64))) (*.f64 #s(literal 5/128 binary64) (*.f64 re (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 11 binary64))) #s(literal 1/4 binary64)))))))))
(exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))))) (*.f64 re re)))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))))) (*.f64 re re)) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (/.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64)))) (pow.f64 re #s(literal 4 binary64))))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/1536 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/24576 (pow im 6)) (* 1/2880 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))))) (*.f64 re re)) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (/.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64)))) (pow.f64 re #s(literal 4 binary64)))) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/1536 binary64) (*.f64 im im)) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64))) (+.f64 (*.f64 #s(literal -1/24576 binary64) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal 1/2880 binary64) (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (*.f64 im im))) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 75/4 binary64)))))) (pow.f64 re #s(literal 6 binary64)))))))
(exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re)))))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))))) (*.f64 re re)))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))))) (*.f64 re re)) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (/.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64)))) (pow.f64 re #s(literal 4 binary64))))))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/24576 (pow im 6)) (+ (* 1/2880 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6))))) (* 1/1536 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (pow re 6)) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))))) (*.f64 re re)) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (/.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64)))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 1/24576 binary64)) (+.f64 (*.f64 #s(literal 1/2880 binary64) (+.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 15/4 binary64)) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 135/4 binary64)))) (*.f64 (*.f64 #s(literal 1/1536 binary64) (*.f64 im im)) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64)))))) (pow.f64 re #s(literal 6 binary64))))))
(exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))))) (*.f64 re re)))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/16 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* 13/512 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 4))))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))) (*.f64 re re)) (/.f64 (*.f64 #s(literal 13/512 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))))) (pow.f64 re #s(literal 4 binary64))))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/16 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* (pow im 2) (+ (* -119/8192 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 6))) (* 13/512 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 4))))))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))) (*.f64 re re)) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -119/8192 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))))) (pow.f64 re #s(literal 6 binary64))) (/.f64 (*.f64 #s(literal 13/512 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))) (pow.f64 re #s(literal 4 binary64))))))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64)))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))))) im))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))))) im) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))) (/.f64 (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 re re)) #s(literal 0 binary64)) (*.f64 im im)))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/384 (pow re 3)) (* 1/24 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) (pow im 3)) (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))))) im) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))) (/.f64 (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 re re)) #s(literal 0 binary64)) (*.f64 im im))) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) re) #s(literal 0 binary64)) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/384 binary64)) (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/24 binary64)))) (*.f64 im (*.f64 im im)))))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* 1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))))) im))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* -1/4 (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(-.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) re) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 re re)) #s(literal 0 binary64)) im))) im))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* -1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/384 (pow re 3)) (* 1/24 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) im)) (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* -1/4 (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(-.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) re) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (-.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 re re)) #s(literal 0 binary64)) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) re) #s(literal 0 binary64)) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/384 binary64)) (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/24 binary64)))) im))) im)) im))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+.f64 (*.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)))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im 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 (+.f64 (*.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 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (+.f64 (*.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 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (+.f64 (*.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 (*.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 (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(*.f64 (+.f64 (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) 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 #s(literal 4 binary64) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 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)))) (/.f64 (*.f64 im im) (*.f64 re re)))) (-.f64 #s(literal 0 binary64) 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) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (*.f64 re (*.f64 re 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) (+.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re 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) (+.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 (*.f64 im im) (+.f64 (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -5/64 binary64) (*.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)))))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) (/.f64 (*.f64 re re) (*.f64 im im)))))
(* 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) (+.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) (+.f64 (/.f64 (*.f64 re re) (*.f64 im im)) (/.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)))))
(*.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im)) (-.f64 #s(literal 0 binary64) 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)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (+.f64 (*.f64 re re) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im))) im)) im)) (-.f64 #s(literal 0 binary64) im))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (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)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (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)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (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)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (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)))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 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 re) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))
(+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 re)))) (* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2)))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(+ (* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2)))) (* im (+ (* -1/16 (* (/ (* im (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (sqrt (/ 1 re)) (/ (sqrt 2) (sqrt -1)))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 im (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal -1 binary64)))))))
(+ (* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2)))) (* im (+ (* 1/4 (* (sqrt (/ 1 re)) (/ (sqrt 2) (sqrt -1)))) (* im (+ (* -1/16 (* (sqrt (/ 1 (pow re 3))) (/ (sqrt 2) (pow (sqrt -1) 3)))) (* 1/32 (* (/ (* im (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 5))))))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 im (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 im (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (*.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 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 (+.f64 (*.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)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (*.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)))))) (+.f64 (*.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/16 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 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/32 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(*.f64 im (+.f64 (*.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)))))) (+.f64 (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (*.f64 re re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))
(* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (*.f64 #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))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))))))
(* -1 (* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(*.f64 (+.f64 (+.f64 (*.f64 #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))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))) (*.f64 #s(literal -1/16 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 -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/32 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (* (sqrt -2) (sqrt -1))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))))
(*.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/16 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 -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))))) (*.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64)))) (*.f64 re (*.f64 re re))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))))) (+.f64 (*.f64 #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))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))))) (-.f64 #s(literal 0 binary64) 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))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* -1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.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/16 binary64)))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))) (* -1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 re (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) #s(literal -1/16 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) #s(literal -1/32 binary64)))))))
(* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))
(* re (+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(*.f64 re (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))
(* re (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 re (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im im)) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64))))))))
(* re (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 3) (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 re (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im im)) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))))) (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (*.f64 im im))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* re (+ (* 1/4 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(-.f64 #s(literal 0 binary64) (*.f64 re (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))))))
(* -1 (* re (+ (* -1/16 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1/16 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 7))))) (+ (* 1/4 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))))
(*.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (+.f64 (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (-.f64 #s(literal 0 binary64) re))
(* (sqrt re) (* (sqrt -1) (sqrt 2)))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))
(+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 re)))) (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(+.f64 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(+ (* im (+ (* -1/8 (* (/ (* im (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (/ (sqrt 2) (sqrt -1)))))) (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(+.f64 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 im (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))))) (*.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)))))))
(+ (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (/ (sqrt 2) (sqrt -1)))) (* im (+ (* -1/8 (* (sqrt (/ 1 (pow re 3))) (/ (sqrt 2) (pow (sqrt -1) 3)))) (* 1/16 (* (/ (* im (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 5))))))))) (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(+.f64 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 im (+.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 im (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))))))
(* (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 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.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/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)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (+.f64 (+.f64 (*.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/2 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (*.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/2 binary64)) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (*.f64 #s(literal -1/16 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (*.f64 re re))))))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))
(*.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(*.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/16 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (* (sqrt -2) (sqrt -1))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(*.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64)))) (*.f64 re (*.f64 re re))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (-.f64 #s(literal 0 binary64) 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)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.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)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.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/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))) (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) #s(literal -1/2 binary64)) (*.f64 re (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) #s(literal -1/8 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) #s(literal -1/16 binary64)))))))
(* (sqrt re) (* (sqrt -1) (sqrt 2)))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))
(* re (+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))
(*.f64 re (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))))
(* re (+ (* -1/8 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(*.f64 re (+.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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im im)) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64))))))))
(* re (+ (* -1/8 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (/ (* (pow im 3) (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 re (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im im)) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))))) (+.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 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (*.f64 im im))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))))))))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(* -1 (* re (+ (* 1/2 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (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 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (+.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 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.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 re (*.f64 re re)))) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))))) (-.f64 #s(literal 0 binary64) re))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* -1 (* im (- (* 2 (/ re im)) 2)))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) re) im) #s(literal -2 binary64))))
(* -1 (* im (- (* 2 (/ re im)) 2)))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) re) im) #s(literal -2 binary64))))
(* -1 (* im (- (* 2 (/ re im)) 2)))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) re) im) #s(literal -2 binary64))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* re (- (* 2 (/ im re)) 2))
(*.f64 re (+.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64)))
(* re (- (* 2 (/ im re)) 2))
(*.f64 re (+.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64)))
(* re (- (* 2 (/ im re)) 2))
(*.f64 re (+.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64)))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -1 (* re (+ 2 (* -2 (/ im re)))))
(*.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 im #s(literal -2 binary64)) re)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 2 (* -2 (/ im re)))))
(*.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 im #s(literal -2 binary64)) re)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 2 (* -2 (/ im re)))))
(*.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 im #s(literal -2 binary64)) re)) (-.f64 #s(literal 0 binary64) re))
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(- im re)
(-.f64 im re)
(- im re)
(-.f64 im re)
(- im re)
(-.f64 im re)
im
(* im (+ 1 (* -1 (/ re im))))
(*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(* im (+ 1 (* -1 (/ re im))))
(*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(* im (+ 1 (* -1 (/ re im))))
(*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))
im
(* -1 (* im (- (/ re im) 1)))
(*.f64 (+.f64 (/.f64 re im) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (- (/ re im) 1)))
(*.f64 (+.f64 (/.f64 re im) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (- (/ re im) 1)))
(*.f64 (+.f64 (/.f64 re im) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) im))
im
(+ im (* -1 re))
(-.f64 im re)
(+ im (* -1 re))
(-.f64 im re)
(+ im (* -1 re))
(-.f64 im re)
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* re (- (/ im re) 1))
(*.f64 re (+.f64 (/.f64 im re) #s(literal -1 binary64)))
(* re (- (/ im re) 1))
(*.f64 re (+.f64 (/.f64 im re) #s(literal -1 binary64)))
(* re (- (/ im re) 1))
(*.f64 re (+.f64 (/.f64 im re) #s(literal -1 binary64)))
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* -1 (* re (+ 1 (* -1 (/ im re)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 im re)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 1 (* -1 (/ im re)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 im re)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 1 (* -1 (/ im re)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 im re)) (-.f64 #s(literal 0 binary64) re))
(* 1/2 (* (sqrt (/ 1 im)) re))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re))
(/ (+ (* -1/2 (sqrt (pow im 3))) (* 1/2 (* (sqrt im) re))) im)
(/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) re)) im)
(/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* -1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re)))))) im)
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) re) (*.f64 (*.f64 im im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 im) re))))) im)
(/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* -1/2 (sqrt (/ 1 im))) (* im (+ (* -1/4 (* (sqrt (/ 1 im)) (/ 1 re))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 re)))))))) im)
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) re) (*.f64 (*.f64 im im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal -1/2 binary64)) (*.f64 im (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re) #s(literal 1/4 binary64)))))) im)
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (+.f64 (*.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/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 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)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (*.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 2 binary64))))) (+.f64 (*.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 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(*.f64 im (+.f64 (*.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 2 binary64))))) (+.f64 (+.f64 (*.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 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (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 re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (*.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)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(*.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (*.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 0 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)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(*.f64 (+.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (sqrt.f64 #s(literal -2 binary64))))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(*.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (*.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 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 im) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (sqrt.f64 #s(literal -2 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 im)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64)))))) (*.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 re (*.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))))))
(* 1/2 (* (sqrt (/ 1 im)) re))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im)))))
(*.f64 re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 im) re)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* 1/2 (sqrt (/ 1 im))))))
(*.f64 re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 im) re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 im)) (/.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) im) (*.f64 re re))))))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (+ (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3)))) (* 1/2 (sqrt (/ 1 im)))))))
(*.f64 re (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 im) re)) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 im)) (/.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) im) (*.f64 re re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (*.f64 im (*.f64 im im)))) (/.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) im) (*.f64 re (*.f64 re re)))))))
(* -1/2 (* (sqrt (/ 1 im)) re))
(*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re))
(* -1 (* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im))))))
(*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 im) re)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (- (* 2 im) im) re))) (* 1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))
(-.f64 #s(literal 0 binary64) (*.f64 re (-.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 im)) (/.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) im) re)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im))) re))))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (sqrt im) (- (* 2 im) im))) (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re)))) re)) (* 1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (*.f64 (sqrt.f64 im) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) (/.f64 (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) re))) re)) re)) (-.f64 #s(literal 0 binary64) re))
(* (sqrt (/ 1 im)) re)
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re)
(/ (+ (* -1 (sqrt (pow im 3))) (* (sqrt im) re)) im)
(/.f64 (-.f64 (*.f64 (sqrt.f64 im) re) (sqrt.f64 (*.f64 im (*.f64 im im)))) im)
(/ (+ (* (sqrt im) re) (* (pow im 2) (+ (* -1 (sqrt (/ 1 im))) (* (sqrt im) (/ 1 re))))) im)
(/.f64 (+.f64 (*.f64 (sqrt.f64 im) re) (*.f64 (*.f64 im im) (-.f64 (/.f64 (sqrt.f64 im) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))) im)
(/ (+ (* (sqrt im) re) (* (pow im 2) (+ (* -1 (sqrt (/ 1 im))) (* im (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 re))) (* (sqrt (/ 1 im)) (/ 1 re))))))) im)
(/.f64 (+.f64 (*.f64 (sqrt.f64 im) re) (*.f64 (*.f64 im im) (-.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))) im)
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(*.f64 im (-.f64 (*.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 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (-.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (-.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -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 0 binary64) im))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(*.f64 (-.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (sqrt.f64 #s(literal -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 0 binary64) im))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (-.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64)))))) (*.f64 im (*.f64 im im)))) (/.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))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(-.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (-.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(* (sqrt (/ 1 im)) re)
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re)
(* re (+ (sqrt (/ 1 im)) (* -1 (* (sqrt im) (/ 1 re)))))
(*.f64 re (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) re)))
(* re (+ (sqrt (/ 1 im)) (+ (* -1 (* (sqrt im) (/ 1 re))) (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))))))
(*.f64 re (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (/.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) im) (*.f64 re re))) (/.f64 (sqrt.f64 im) re))))
(* re (+ (sqrt (/ 1 im)) (+ (* -1 (* (sqrt im) (/ 1 re))) (+ (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3))))))))
(*.f64 re (+.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) re)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 im) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) (*.f64 re re)) (/.f64 (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) (*.f64 re (*.f64 re re)))))))
(* -1 (* (sqrt (/ 1 im)) re))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (* (sqrt im) (/ 1 re))))))
(*.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) re)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (sqrt im) (* -1/2 (* (sqrt im) (/ (- (* 2 im) im) re)))) re)))))
(*.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (+.f64 (sqrt.f64 im) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 im) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) re))) re)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (sqrt im) (* -1 (/ (+ (* 1/2 (* (sqrt im) (- (* 2 im) im))) (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re)))) re))) re)))))
(*.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (-.f64 (sqrt.f64 im) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 im) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) (/.f64 (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) re))) re)) re)) (-.f64 #s(literal 0 binary64) re))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/.f64 (+.f64 (*.f64 re re) (*.f64 (*.f64 im #s(literal -2 binary64)) re)) im)
(/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)
(/.f64 (+.f64 (*.f64 re re) (*.f64 im (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64))))) im)
(/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)
(/.f64 (+.f64 (*.f64 re re) (*.f64 im (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64))))) im)
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) (/.f64 (*.f64 re re) (*.f64 im im)))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) (/.f64 (*.f64 re re) (*.f64 im im)))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* -1 (* im (- (* 2 (/ re im)) 2)))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) re) im) #s(literal -2 binary64))))
(* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))
(*.f64 (+.f64 (/.f64 (+.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im)) (-.f64 #s(literal 0 binary64) im)) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))
(*.f64 (+.f64 (/.f64 (+.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im)) (-.f64 #s(literal 0 binary64) im)) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))
(/ (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 2 binary64) (/.f64 im (*.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 2 binary64) (/.f64 im (*.f64 re re))) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.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 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 im #s(literal -2 binary64)) re)) re)))
(* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im)))
(*.f64 (*.f64 re re) (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 im #s(literal -2 binary64)) re)) re)))
(* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))))
(/ (+ (* 1/4 (* (sqrt (pow im 5)) (/ 1 (sqrt -1/4)))) (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4))))) (pow im 2))
(/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal -1/4 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 im im))
(/ (+ (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (* (pow im 3) (+ (* -1/2 (* (sqrt im) (/ 1 (* re (sqrt -1/4))))) (* 1/4 (* (sqrt (/ 1 im)) (/ 1 (sqrt -1/4))))))) (pow im 2))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))) (*.f64 (*.f64 im (*.f64 im im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 im) (*.f64 re (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1/4 binary64))))))) (*.f64 im im))
(/ (+ (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (* (pow im 3) (+ (* 1/4 (* (sqrt (/ 1 im)) (/ 1 (sqrt -1/4)))) (* im (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (* re (sqrt -1/4))))) (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4)))))))))) (pow im 2))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))) (*.f64 (*.f64 im (*.f64 im im)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1/4 binary64)))) (*.f64 im (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 re (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))))))))) (*.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)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (+.f64 (*.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/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 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)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (*.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 2 binary64))))) (+.f64 (*.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 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(*.f64 im (+.f64 (*.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 2 binary64))))) (+.f64 (+.f64 (*.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 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (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 re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (*.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)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(*.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (*.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 0 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)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(*.f64 (+.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (sqrt.f64 #s(literal -2 binary64))))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(*.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (*.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 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 im) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (sqrt.f64 #s(literal -2 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 im)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64)))))) (*.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 re (*.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))))))
(* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))))
(* (pow re 2) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(*.f64 (*.f64 re re) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64))))))
(* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))
(*.f64 (*.f64 re re) (+.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 (*.f64 re (*.f64 re re)) (sqrt.f64 #s(literal -1/4 binary64)))))))
(* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* (pow re 4) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))))
(*.f64 (*.f64 re re) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 (*.f64 re (*.f64 re re)) (sqrt.f64 #s(literal -1/4 binary64))))) (+.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (sqrt.f64 #s(literal -1/4 binary64))) (/.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal 1/4 binary64) im) #s(literal 1/4 binary64))) (pow.f64 re #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64)))))))
(* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))))
(* (pow re 2) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(*.f64 (*.f64 re re) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64))))))
(* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))
(*.f64 (*.f64 re re) (+.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 (*.f64 re (*.f64 re re)) (sqrt.f64 #s(literal -1/4 binary64)))))))
(* (pow re 2) (+ (* -1 (/ (+ (* -1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* re (sqrt -1/4))))) (* 1/2 (* (sqrt (pow im 3)) (/ 1 (sqrt -1/4))))) (pow re 3))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))
(*.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64))))) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) re) (/.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal 1/4 binary64) im) #s(literal 1/4 binary64))) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 re (*.f64 re re)))))
(* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))
(/ (+ (* 1/2 (* (sqrt (pow im 5)) (/ 1 (sqrt -1/4)))) (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (pow im 2))
(/.f64 (+.f64 (*.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 im im))
(/ (+ (* (sqrt im) (* (pow re 2) (sqrt -1/4))) (* (pow im 3) (+ (* -1 (* (sqrt im) (/ 1 (* re (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt -1/4))))))) (pow im 2))
(/.f64 (+.f64 (*.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))) (*.f64 (*.f64 im (*.f64 im im)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1/4 binary64)))) (/.f64 (sqrt.f64 im) (*.f64 re (sqrt.f64 #s(literal -1/4 binary64))))))) (*.f64 im im))
(/ (+ (* (sqrt im) (* (pow re 2) (sqrt -1/4))) (* (pow im 3) (+ (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt -1/4)))) (* im (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (* re (sqrt -1/4))))) (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))))))) (pow im 2))
(/.f64 (+.f64 (*.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))) (*.f64 (*.f64 im (*.f64 im im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1/4 binary64)))) (*.f64 im (-.f64 (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 re (sqrt.f64 #s(literal -1/4 binary64))))))))) (*.f64 im im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(*.f64 im (-.f64 (*.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 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (-.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (-.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -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 0 binary64) im))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(*.f64 (-.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (sqrt.f64 #s(literal -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 0 binary64) im))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (-.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64)))))) (*.f64 im (*.f64 im im)))) (/.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))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(-.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (-.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))
(* (pow re 2) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))
(*.f64 (*.f64 re re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64)))))
(* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(*.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64)))) (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 (*.f64 re (*.f64 re re)) (sqrt.f64 #s(literal -1/4 binary64))))))
(* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* (pow re 4) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))
(*.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (sqrt.f64 #s(literal -1/4 binary64))) (/.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal 1/4 binary64) im) #s(literal 1/4 binary64))) (pow.f64 re #s(literal 4 binary64))))))) (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 (*.f64 re (*.f64 re re)) (sqrt.f64 #s(literal -1/4 binary64))))))
(* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))
(* (pow re 2) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))
(*.f64 (*.f64 re re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64)))))
(* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(*.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64)))) (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 (*.f64 re (*.f64 re re)) (sqrt.f64 #s(literal -1/4 binary64))))))
(* (pow re 2) (+ (* -1 (/ (+ (* -1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* re (sqrt -1/4))))) (* (sqrt (pow im 3)) (/ 1 (sqrt -1/4)))) (pow re 3))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(*.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64)))) (/.f64 (+.f64 (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (sqrt.f64 #s(literal -1/4 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) re) (/.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal 1/4 binary64) im) #s(literal 1/4 binary64))) (sqrt.f64 #s(literal -1/4 binary64)))))) (*.f64 re (*.f64 re re)))))
(* -1/4 (/ (pow re 4) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im (*.f64 im im)))
(/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (pow re 2))) (pow im 3))
(/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 (*.f64 im im) (*.f64 re re))) (*.f64 im (*.f64 im im)))
(/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (+ (* -2 (* im re)) (pow re 2)))) (pow im 3))
(/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 (*.f64 im im) (+.f64 (*.f64 re re) (*.f64 (*.f64 im #s(literal -2 binary64)) re)))) (*.f64 im (*.f64 im im)))
(/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)))) (pow im 3))
(/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 (*.f64 im im) (+.f64 (*.f64 re re) (*.f64 im (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64))))))) (*.f64 im (*.f64 im im)))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) (/.f64 (*.f64 re re) (*.f64 im im)))))
(* 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) (+.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) (+.f64 (/.f64 (*.f64 re re) (*.f64 im im)) (/.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 (/ re im)) 2)))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) re) im) #s(literal -2 binary64))))
(* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))
(*.f64 (+.f64 (/.f64 (+.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im)) (-.f64 #s(literal 0 binary64) im)) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (- (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1 (pow re 2)) (* 1/4 (/ (pow re 4) (pow im 2)))) im))) im)) 2)))
(*.f64 (+.f64 (/.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im)) (*.f64 re re)) im)) (-.f64 #s(literal 0 binary64) im)) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+.f64 (*.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)))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))))) #s(literal -2 binary64))))
(* -1/4 (/ (pow re 4) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im (*.f64 im im)))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(*.f64 (pow.f64 re #s(literal 4 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (/.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 im im)))))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))
(*.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 2 binary64) (*.f64 re (*.f64 re re))))))
(* (pow re 4) (- (+ (* 2 (/ im (pow re 4))) (/ 1 (* im (pow re 2)))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))
(*.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (/.f64 (*.f64 im #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64)))) (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 2 binary64) (*.f64 re (*.f64 re re))))))
(* -1/4 (/ (pow re 4) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im (*.f64 im im)))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(*.f64 (pow.f64 re #s(literal 4 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (/.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 im im)))))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))
(*.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 2 binary64) (*.f64 re (*.f64 re re))))))
(* (pow re 4) (- (+ (* -1 (/ (+ 2 (* -2 (/ im re))) (pow re 3))) (/ 1 (* im (pow re 2)))) (* 1/4 (/ 1 (pow im 3)))))
(*.f64 (pow.f64 re #s(literal 4 binary64)) (+.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (/.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 im #s(literal -2 binary64)) re)) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 im im)))))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* re (- (/ re im) 2))
(*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))
(* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2))
(*.f64 re (+.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))))) #s(literal -2 binary64)))
(* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2))
(*.f64 re (+.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))))) #s(literal -2 binary64)))
(* -1/4 (/ (pow re 4) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im (*.f64 im im)))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(*.f64 (pow.f64 re #s(literal 4 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (/.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 im im)))))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))
(*.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 2 binary64) (*.f64 re (*.f64 re re))))))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))
(*.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 2 binary64) (*.f64 re (*.f64 re re))))))
(* -1/4 (/ (pow re 4) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im (*.f64 im im)))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(*.f64 (pow.f64 re #s(literal 4 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (/.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 im im)))))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))
(*.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 2 binary64) (*.f64 re (*.f64 re re))))))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))
(*.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 2 binary64) (*.f64 re (*.f64 re re))))))
(* -1/4 (/ (pow re 4) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im (*.f64 im im)))
(/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (pow re 2))) (pow im 3))
(/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 (*.f64 im im) (*.f64 re re))) (*.f64 im (*.f64 im im)))
(/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (+ (* -2 (* im re)) (pow re 2)))) (pow im 3))
(/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 (*.f64 im im) (+.f64 (*.f64 re re) (*.f64 (*.f64 im #s(literal -2 binary64)) re)))) (*.f64 im (*.f64 im im)))
(/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (+ (* -2 (* im re)) (pow re 2)))) (pow im 3))
(/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 (*.f64 im im) (+.f64 (*.f64 re re) (*.f64 (*.f64 im #s(literal -2 binary64)) re)))) (*.f64 im (*.f64 im im)))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(+ (* -2 re) (/ (pow re 2) im))
(+.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im))
(+ (* -2 re) (+ (* -1/4 (/ (pow re 4) (pow im 3))) (/ (pow re 2) im)))
(+.f64 (+.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im (*.f64 im im)))) (/.f64 (*.f64 re re) im))
(+ (* -2 re) (+ (* -1/4 (/ (pow re 4) (pow im 3))) (/ (pow re 2) im)))
(+.f64 (+.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im (*.f64 im im)))) (/.f64 (*.f64 re re) im))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(+ (* -2 re) (/ (pow re 2) im))
(+.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im))
(+ (* -2 re) (* -1 (/ (+ (* -1 (pow re 2)) (* 1/4 (/ (pow re 4) (pow im 2)))) im)))
(-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im)) (*.f64 re re)) im))
(+ (* -2 re) (* -1 (/ (+ (* -1 (pow re 2)) (* 1/4 (/ (pow re 4) (pow im 2)))) im)))
(-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im)) (*.f64 re re)) im))
im
(+ im (* -1 re))
(-.f64 im re)
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+.f64 im (*.f64 re (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 re im)) #s(literal -1 binary64))))
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(+.f64 im (*.f64 re (+.f64 (*.f64 re (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1/2 binary64) im))) #s(literal -1 binary64))))
(* 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 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) 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 (+.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64))) (pow.f64 re #s(literal 6 binary64)))) re)
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(*.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(*.f64 (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) 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 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.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)))))) (-.f64 #s(literal 0 binary64) 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) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.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) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re 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) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (*.f64 (*.f64 im im) (+.f64 (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 (*.f64 #s(literal -5/128 binary64) (*.f64 im im)) (pow.f64 re #s(literal 7 binary64))))) (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re re)))))))
im
(* im (+ 1 (* -1 (/ re im))))
(*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(*.f64 im (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (/.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 (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))) (/.f64 re im)))
(* -1 im)
(-.f64 #s(literal 0 binary64) im)
(* -1 (* im (+ 1 (/ re im))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 re re)) im) re) im)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im)) (*.f64 #s(literal 1/2 binary64) (*.f64 re re))) (-.f64 #s(literal 0 binary64) im)) re) im)) (-.f64 #s(literal 0 binary64) im))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* re (- (/ re im) 2))
(*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))
(* re (- (/ re im) 2))
(*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))
(* re (- (/ re im) 2))
(*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))
(/ (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 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 im) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.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 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 im) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/.f64 (+.f64 (*.f64 re re) (*.f64 (*.f64 im #s(literal -2 binary64)) re)) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/.f64 (+.f64 (*.f64 re re) (*.f64 (*.f64 im #s(literal -2 binary64)) re)) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/.f64 (+.f64 (*.f64 re re) (*.f64 (*.f64 im #s(literal -2 binary64)) re)) im)
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(+ (* -2 re) (/ (pow re 2) im))
(+.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im))
(+ (* -2 re) (/ (pow re 2) im))
(+.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im))
(+ (* -2 re) (/ (pow re 2) im))
(+.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(+ (* -2 re) (/ (pow re 2) im))
(+.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im))
(+ (* -2 re) (/ (pow re 2) im))
(+.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im))
(+ (* -2 re) (/ (pow re 2) im))
(+.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(/ re im)
(/.f64 re im)
(* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im)))
(*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))))
(* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im)))
(*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))))
(* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im)))
(*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))))
(* -1/4 (/ (pow re 3) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im im)))
(* (pow re 3) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(*.f64 (*.f64 re (*.f64 re re)) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (/.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 im im)))))
(* (pow re 3) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(*.f64 (*.f64 re (*.f64 re re)) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (/.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 im im)))))
(* (pow re 3) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(*.f64 (*.f64 re (*.f64 re re)) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (/.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 im im)))))
(* -1/4 (/ (pow re 3) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im im)))
(* -1 (* (pow re 3) (- (* 1/4 (/ 1 (pow im 3))) (/ 1 (* im (pow re 2))))))
(*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 im (*.f64 im im))) (/.f64 #s(literal -1 binary64) (*.f64 im (*.f64 re re)))) (*.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re))))
(* -1 (* (pow re 3) (- (* 1/4 (/ 1 (pow im 3))) (/ 1 (* im (pow re 2))))))
(*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 im (*.f64 im im))) (/.f64 #s(literal -1 binary64) (*.f64 im (*.f64 re re)))) (*.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re))))
(* -1 (* (pow re 3) (- (* 1/4 (/ 1 (pow im 3))) (/ 1 (* im (pow re 2))))))
(*.f64 (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 im (*.f64 im im))) (/.f64 #s(literal -1 binary64) (*.f64 im (*.f64 re re)))) (*.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re))))
(* -1/4 (/ (pow re 3) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im im)))
(/ (+ (* -1/4 (pow re 3)) (* (pow im 2) re)) (pow im 3))
(/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 im im))) (*.f64 im (*.f64 im im)))
(/ (+ (* -1/4 (pow re 3)) (* (pow im 2) re)) (pow im 3))
(/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 im im))) (*.f64 im (*.f64 im im)))
(/ (+ (* -1/4 (pow re 3)) (* (pow im 2) re)) (pow im 3))
(/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 im im))) (*.f64 im (*.f64 im im)))
(/ re im)
(/.f64 re im)
(/ (+ re (* -1/4 (/ (pow re 3) (pow im 2)))) im)
(/.f64 (+.f64 re (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))) im)
(/ (+ re (* -1/4 (/ (pow re 3) (pow im 2)))) im)
(/.f64 (+.f64 re (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))) im)
(/ (+ re (* -1/4 (/ (pow re 3) (pow im 2)))) im)
(/.f64 (+.f64 re (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))) im)
(/ re im)
(/.f64 re im)
(* -1 (/ (+ (* -1 re) (* 1/4 (/ (pow re 3) (pow im 2)))) im))
(/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im)) re) (-.f64 #s(literal 0 binary64) im))
(* -1 (/ (+ (* -1 re) (* 1/4 (/ (pow re 3) (pow im 2)))) im))
(/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im)) re) (-.f64 #s(literal 0 binary64) im))
(* -1 (/ (+ (* -1 re) (* 1/4 (/ (pow re 3) (pow im 2)))) im))
(/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im)) re) (-.f64 #s(literal 0 binary64) im))
(pow im 3)
(*.f64 im (*.f64 im im))
(pow im 3)
(*.f64 im (*.f64 im im))
(pow im 3)
(*.f64 im (*.f64 im im))
(pow im 3)
(*.f64 im (*.f64 im im))
(pow im 3)
(*.f64 im (*.f64 im im))
(pow im 3)
(*.f64 im (*.f64 im im))
(pow im 3)
(*.f64 im (*.f64 im im))
(pow im 3)
(*.f64 im (*.f64 im im))
(pow im 3)
(*.f64 im (*.f64 im im))
(pow im 3)
(*.f64 im (*.f64 im im))
(pow im 3)
(*.f64 im (*.f64 im im))
(pow im 3)
(*.f64 im (*.f64 im im))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(/ (+ (* -1/4 (pow re 2)) (pow im 2)) (pow im 3))
(/.f64 (+.f64 (*.f64 im im) (*.f64 #s(literal -1/4 binary64) (*.f64 re re))) (*.f64 im (*.f64 im im)))
(/ (+ (* -1/4 (pow re 2)) (pow im 2)) (pow im 3))
(/.f64 (+.f64 (*.f64 im im) (*.f64 #s(literal -1/4 binary64) (*.f64 re re))) (*.f64 im (*.f64 im im)))
(/ (+ (* -1/4 (pow re 2)) (pow im 2)) (pow im 3))
(/.f64 (+.f64 (*.f64 im im) (*.f64 #s(literal -1/4 binary64) (*.f64 re re))) (*.f64 im (*.f64 im im)))
(/ 1 im)
(/.f64 #s(literal 1 binary64) im)
(/ (+ 1 (* -1/4 (/ (pow re 2) (pow im 2)))) im)
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im im))) im)
(/ (+ 1 (* -1/4 (/ (pow re 2) (pow im 2)))) im)
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im im))) im)
(/ (+ 1 (* -1/4 (/ (pow re 2) (pow im 2)))) im)
(/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im im))) im)
(/ 1 im)
(/.f64 #s(literal 1 binary64) im)
(* -1 (/ (- (* 1/4 (/ (pow re 2) (pow im 2))) 1) im))
(/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 re re)) (*.f64 im im)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) im))
(* -1 (/ (- (* 1/4 (/ (pow re 2) (pow im 2))) 1) im))
(/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 re re)) (*.f64 im im)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) im))
(* -1 (/ (- (* 1/4 (/ (pow re 2) (pow im 2))) 1) im))
(/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 re re)) (*.f64 im im)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) im))
(/ 1 im)
(/.f64 #s(literal 1 binary64) im)
(+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))
(+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))))
(+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))
(+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))))
(+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))
(+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(* (pow re 2) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (/.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 im im)))))
(* (pow re 2) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (/.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 im im)))))
(* (pow re 2) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (/.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 im im)))))
(* -1/4 (/ (pow re 2) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im)))
(* (pow re 2) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (/.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 im im)))))
(* (pow re 2) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (/.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 im im)))))
(* (pow re 2) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (/.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 im im)))))

eval177.0ms (1.7%)

Compiler

Compiled 38228 to 5823 computations (84.8% saved)

prune186.0ms (1.8%)

Pruning

17 alts after pruning (12 fresh and 5 done)

PrunedKeptTotal
New118381191
Fresh145
Picked145
Done011
Total1185171202
Accuracy
99.9%
Counts
1202 → 17
Alt Table
Click to see full alt table
StatusAccuracyProgram
30.9%
(*.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))))
24.8%
(*.f64 im (+.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.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/2 binary64))))))
73.8%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 2 binary64)) #s(literal 2 binary64)))
69.5%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 (exp.f64 (log.f64 (-.f64 (hypot.f64 re im) re))) (exp.f64 (log.f64 #s(literal 2 binary64)))) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
74.2%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
73.7%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 4 binary64)))
22.8%
(*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))))
31.2%
(*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
16.9%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 im im) re)))
39.4%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))) im))))))
51.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
19.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))))
21.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (*.f64 re re) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 im (*.f64 re re))) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))))
22.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64))))
52.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
74.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
53.5%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re))))
Compiler

Compiled 625 to 395 computations (36.8% saved)

simplify269.0ms (2.6%)

Algorithm
egg-herbie
Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
cost-diff384
(/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))
cost-diff384
(sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))
cost-diff384
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))))
cost-diff512
(*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))))
cost-diff0
(*.f64 re re)
cost-diff128
(*.f64 (*.f64 re re) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 im (*.f64 re re))) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))
cost-diff128
(sqrt.f64 (*.f64 (*.f64 re re) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 im (*.f64 re re))) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))))
cost-diff128
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (*.f64 re re) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 im (*.f64 re re))) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))))
cost-diff0
(/.f64 #s(literal 1 binary64) re)
cost-diff0
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
cost-diff0
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
cost-diff0
(*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
cost-diff0
(*.f64 re #s(literal -4 binary64))
cost-diff0
(sqrt.f64 (*.f64 re #s(literal -4 binary64)))
cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64))))
cost-diff0
(pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64))
cost-diff6464
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 2 binary64))
cost-diff12992
(pow.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 2 binary64)) #s(literal 2 binary64))
cost-diff12992
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 2 binary64)) #s(literal 2 binary64)))
Rules
3182×fma-lowering-fma.f32
3182×fma-lowering-fma.f64
2612×*-lowering-*.f32
2612×*-lowering-*.f64
1734×fmm-def
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
053700
1157650
2561645
32241637
47799637
08632637
Stop Event
iter limit
node limit
Calls
Call 1
Inputs
(* 1/2 (pow (pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8) 2) 2))
1/2
(pow (pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8) 2) 2)
(pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8) 2)
(pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8)
(* 2 (- (sqrt (+ (* re re) (* im im))) re))
2
(- (sqrt (+ (* re re) (* im im))) re)
(sqrt (+ (* re re) (* im im)))
re
im
1/8
(* 1/2 (sqrt (* re -4)))
1/2
(sqrt (* re -4))
(* re -4)
re
-4
(* 1/2 (* im (sqrt (/ 1 re))))
1/2
(* im (sqrt (/ 1 re)))
im
(sqrt (/ 1 re))
(/ 1 re)
1
re
(* 1/2 (sqrt (* (* re re) (+ (* 2 (/ im (* re re))) (+ (/ 1 im) (/ -2 re))))))
1/2
(sqrt (* (* re re) (+ (* 2 (/ im (* re re))) (+ (/ 1 im) (/ -2 re)))))
(* (* re re) (+ (* 2 (/ im (* re re))) (+ (/ 1 im) (/ -2 re))))
(* re re)
re
(+ (* 2 (/ im (* re re))) (+ (/ 1 im) (/ -2 re)))
(* 2 (/ im (* re re)))
2
(/ im (* re re))
im
(+ (/ 1 im) (/ -2 re))
(/ 1 im)
1
(/ -2 re)
-2
(* 1/2 (/ 1 (sqrt (/ (- (* 2 im) (* re (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))) (- (* (* im im) 4) (* (* re re) (* (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))) (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))))))))
1/2
(/ 1 (sqrt (/ (- (* 2 im) (* re (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))) (- (* (* im im) 4) (* (* re re) (* (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))) (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im))))))))))))
1
(sqrt (/ (- (* 2 im) (* re (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))) (- (* (* im im) 4) (* (* re re) (* (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))) (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))))))
(/ (- (* 2 im) (* re (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))) (- (* (* im im) 4) (* (* re re) (* (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))) (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im))))))))))
(- (* 2 im) (* re (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im))))))))
(* 2 im)
2
im
(* re (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))
re
(+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im))))))
-2
(* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))
(+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im))))
(/ 1 im)
(/ (* (* re re) -1/4) (* im (* im im)))
(* (* re re) -1/4)
(* re re)
-1/4
(* im (* im im))
(* im im)
(- (* (* im im) 4) (* (* re re) (* (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))) (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))))
(* (* im im) 4)
4
(* (* re re) (* (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))) (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im))))))))
(* (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))) (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))
Outputs
(* 1/2 (pow (pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8) 2) 2))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
1/2
#s(literal 1/2 binary64)
(pow (pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8) 2) 2)
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))
(pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8) 2)
(pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64))
(pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8)
(pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64))
(* 2 (- (sqrt (+ (* re re) (* im im))) re))
(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
2
#s(literal 2 binary64)
(- (sqrt (+ (* re re) (* im im))) re)
(-.f64 (hypot.f64 re im) re)
(sqrt (+ (* re re) (* im im)))
(hypot.f64 re im)
re
im
1/8
#s(literal 1/8 binary64)
(* 1/2 (sqrt (* re -4)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64))))
1/2
#s(literal 1/2 binary64)
(sqrt (* re -4))
(sqrt.f64 (*.f64 re #s(literal -4 binary64)))
(* re -4)
(*.f64 re #s(literal -4 binary64))
re
-4
#s(literal -4 binary64)
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
1/2
#s(literal 1/2 binary64)
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
im
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
1
#s(literal 1 binary64)
re
(* 1/2 (sqrt (* (* re re) (+ (* 2 (/ im (* re re))) (+ (/ 1 im) (/ -2 re))))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 im #s(literal 1 binary64))) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))))
1/2
#s(literal 1/2 binary64)
(sqrt (* (* re re) (+ (* 2 (/ im (* re re))) (+ (/ 1 im) (/ -2 re)))))
(sqrt.f64 (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 im #s(literal 1 binary64))) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))))
(* (* re re) (+ (* 2 (/ im (* re re))) (+ (/ 1 im) (/ -2 re))))
(+.f64 (*.f64 #s(literal 2 binary64) (*.f64 im #s(literal 1 binary64))) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))
(* re re)
(*.f64 re re)
re
(+ (* 2 (/ im (* re re))) (+ (/ 1 im) (/ -2 re)))
(+.f64 (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re)) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))
(* 2 (/ im (* re re)))
(/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re))
2
#s(literal 2 binary64)
(/ im (* re re))
(/.f64 im (*.f64 re re))
im
(+ (/ 1 im) (/ -2 re))
(+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))
(/ 1 im)
(/.f64 #s(literal 1 binary64) im)
1
#s(literal 1 binary64)
(/ -2 re)
(/.f64 #s(literal -2 binary64) re)
-2
#s(literal -2 binary64)
(* 1/2 (/ 1 (sqrt (/ (- (* 2 im) (* re (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))) (- (* (* im im) 4) (* (* re re) (* (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))) (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))))))))
(/.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im))))))) (+.f64 (*.f64 im (*.f64 im #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im))))) (*.f64 (*.f64 re re) (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im)))))))))))
1/2
#s(literal 1/2 binary64)
(/ 1 (sqrt (/ (- (* 2 im) (* re (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))) (- (* (* im im) 4) (* (* re re) (* (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))) (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im))))))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im))))))) (+.f64 (*.f64 im (*.f64 im #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im))))) (*.f64 (*.f64 re re) (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im)))))))))))
1
#s(literal 1 binary64)
(sqrt (/ (- (* 2 im) (* re (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))) (- (* (* im im) 4) (* (* re re) (* (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))) (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))))))
(sqrt.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im))))))) (+.f64 (*.f64 im (*.f64 im #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im))))) (*.f64 (*.f64 re re) (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im))))))))))
(/ (- (* 2 im) (* re (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))) (- (* (* im im) 4) (* (* re re) (* (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))) (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im))))))))))
(/.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im))))))) (+.f64 (*.f64 im (*.f64 im #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im))))) (*.f64 (*.f64 re re) (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im)))))))))
(- (* 2 im) (* re (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im))))))))
(+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im)))))))
(* 2 im)
(*.f64 #s(literal 2 binary64) im)
2
#s(literal 2 binary64)
im
(* re (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))
(*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im))))))
re
(+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im))))))
(+.f64 #s(literal -2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im)))))
-2
#s(literal -2 binary64)
(* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))
(*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im))))
(+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im))))
(+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im (*.f64 im im))))
(/ 1 im)
(/.f64 #s(literal 1 binary64) im)
(/ (* (* re re) -1/4) (* im (* im im)))
(/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im (*.f64 im im)))
(* (* re re) -1/4)
(*.f64 re (*.f64 re #s(literal -1/4 binary64)))
(* re re)
(*.f64 re re)
-1/4
#s(literal -1/4 binary64)
(* im (* im im))
(*.f64 im (*.f64 im im))
(* im im)
(*.f64 im im)
(- (* (* im im) 4) (* (* re re) (* (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))) (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))))
(+.f64 (*.f64 im (*.f64 im #s(literal 4 binary64))) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im))))) (*.f64 (*.f64 re re) (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im))))))))
(* (* im im) 4)
(*.f64 im (*.f64 im #s(literal 4 binary64)))
4
#s(literal 4 binary64)
(* (* re re) (* (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))) (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im))))))))
(*.f64 (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im))))) (*.f64 (*.f64 re re) (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im)))))))
(* (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))) (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))
(*.f64 (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im))))) (+.f64 #s(literal -2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im))))))

localize247.0ms (2.4%)

Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
accuracy100.0%
(*.f64 im im)
accuracy100.0%
(*.f64 #s(literal 2 binary64) im)
accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))))
accuracy100.0%
(sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))
accuracy100.0%
(*.f64 re re)
accuracy100.0%
(*.f64 #s(literal 2 binary64) (/.f64 im (*.f64 re re)))
accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (*.f64 re re) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 im (*.f64 re re))) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))))
accuracy100.0%
(sqrt.f64 (*.f64 (*.f64 re re) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 im (*.f64 re re))) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))))
accuracy100.0%
(/.f64 #s(literal 1 binary64) re)
accuracy100.0%
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
accuracy100.0%
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
accuracy100.0%
(*.f64 re #s(literal -4 binary64))
accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64))))
accuracy100.0%
(sqrt.f64 (*.f64 re #s(literal -4 binary64)))
accuracy100.0%
(hypot.f64 re im)
accuracy100.0%
(-.f64 (hypot.f64 re im) re)
accuracy100.0%
(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 2 binary64)) #s(literal 2 binary64)))
Results
147.0ms256×0invalid
Compiler

Compiled 805 to 53 computations (93.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 97.0ms
ival-mult: 34.0ms (35% of total)
ival-pow: 19.0ms (19.6% of total)
ival-sqrt: 12.0ms (12.3% of total)
ival-div: 11.0ms (11.3% of total)
compiled-spec: 9.0ms (9.3% of total)
ival-add: 6.0ms (6.2% of total)
ival-sub: 5.0ms (5.1% of total)
const: 1.0ms (1% of total)
backward-pass: 0.0ms (0% of total)

series78.0ms (0.7%)

Counts
25 → 504
Calls
Call 1
Inputs
#<alt (* 1/2 (pow (pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8) 2) 2))>
#<alt (pow (pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8) 2) 2)>
#<alt (pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8) 2)>
#<alt (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8)>
#<alt (* 1/2 (sqrt (* re -4)))>
#<alt (sqrt (* re -4))>
#<alt (* re -4)>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (sqrt (/ 1 re))>
#<alt (/ 1 re)>
#<alt (* 1/2 (sqrt (* (* re re) (+ (* 2 (/ im (* re re))) (+ (/ 1 im) (/ -2 re))))))>
#<alt (sqrt (* (* re re) (+ (* 2 (/ im (* re re))) (+ (/ 1 im) (/ -2 re)))))>
#<alt (* (* re re) (+ (* 2 (/ im (* re re))) (+ (/ 1 im) (/ -2 re))))>
#<alt (* re re)>
#<alt (* 1/2 (/ 1 (sqrt (/ (- (* 2 im) (* re (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))) (- (* (* im im) 4) (* (* re re) (* (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))) (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))))))))>
#<alt (/ 1 (sqrt (/ (- (* 2 im) (* re (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))) (- (* (* im im) 4) (* (* re re) (* (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))) (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im))))))))))))>
#<alt (sqrt (/ (- (* 2 im) (* re (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))) (- (* (* im im) 4) (* (* re re) (* (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))) (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))))))>
#<alt (/ (- (* 2 im) (* re (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))) (- (* (* im im) 4) (* (* re re) (* (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))) (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im))))))))))>
#<alt (* 2 (- (sqrt (+ (* re re) (* im im))) re))>
#<alt (- (sqrt (+ (* re re) (* im im))) re)>
#<alt (sqrt (+ (* re re) (* im im)))>
#<alt (* 2 (/ im (* re re)))>
#<alt (* 2 im)>
#<alt (* im im)>
Outputs
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))>
#<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)))))))>
#<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))))))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<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)))))>
#<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))))))>
#<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)))))))>
#<alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<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))))))>
#<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)))))))>
#<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))))))))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<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))))))>
#<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)))))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<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))))))))>
#<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))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (* im (sqrt (/ 1 re))))>
#<alt (+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re)))))>
#<alt (+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* -1/128 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re))))))>
#<alt (* -2 (* (sqrt re) (sqrt -1)))>
#<alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<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))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (+ (sqrt (/ 1 re)) (* -1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))>
#<alt (* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* 7/128 (* (pow im 2) (sqrt (/ 1 (pow re 9)))))))))>
#<alt (* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* (pow im 2) (+ (* -33/1024 (* (pow im 2) (sqrt (/ 1 (pow re 13))))) (* 7/128 (sqrt (/ 1 (pow re 9))))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt 2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (pow (* 2 im) 1/4)>
#<alt (+ (* -1/4 (* (pow (/ 2 (pow im 3)) 1/4) re)) (pow (* 2 im) 1/4))>
#<alt (+ (* re (+ (* -1/4 (pow (/ 2 (pow im 3)) 1/4)) (* 1/32 (* (pow (/ 2 (pow im 7)) 1/4) re)))) (pow (* 2 im) 1/4))>
#<alt (+ (* re (+ (* -1/4 (pow (/ 2 (pow im 3)) 1/4)) (* re (+ (* 1/32 (pow (/ 2 (pow im 7)) 1/4)) (* 5/128 (* (pow (/ 2 (pow im 11)) 1/4) re)))))) (pow (* 2 im) 1/4))>
#<alt (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))>
#<alt (+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))))>
#<alt (+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))>
#<alt (+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/1536 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/24576 (pow im 6)) (* 1/2880 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))>
#<alt (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))>
#<alt (+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))))>
#<alt (+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))>
#<alt (+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/24576 (pow im 6)) (+ (* 1/2880 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6))))) (* 1/1536 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (pow re 6)) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))>
#<alt (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))>
#<alt (+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 2))))>
#<alt (+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/16 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* 13/512 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 4))))))>
#<alt (+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/16 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* (pow im 2) (+ (* -119/8192 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 6))) (* 13/512 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 4))))))))>
#<alt (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))>
#<alt (+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))>
#<alt (+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))>
#<alt (+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/384 (pow re 3)) (* 1/24 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) (pow im 3)) (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))>
#<alt (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))>
#<alt (+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* 1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))>
#<alt (+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* -1/4 (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))>
#<alt (+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* -1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/384 (pow re 3)) (* 1/24 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) im)) (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* -1/4 (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))>
#<alt (pow (* 2 im) 1/8)>
#<alt (+ (* -1/8 (* (pow (/ 2 (pow im 7)) 1/8) re)) (pow (* 2 im) 1/8))>
#<alt (+ (* re (+ (* -1/8 (pow (/ 2 (pow im 7)) 1/8)) (* 1/128 (* (pow (/ 2 (pow im 15)) 1/8) re)))) (pow (* 2 im) 1/8))>
#<alt (+ (* re (+ (* -1/8 (pow (/ 2 (pow im 7)) 1/8)) (* re (+ (* 1/128 (pow (/ 2 (pow im 15)) 1/8)) (* 21/1024 (* (pow (/ 2 (pow im 23)) 1/8) re)))))) (pow (* 2 im) 1/8))>
#<alt (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))>
#<alt (+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))))>
#<alt (+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))>
#<alt (+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/6144 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/196608 (pow im 6)) (* 1/5760 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))>
#<alt (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))>
#<alt (+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))))>
#<alt (+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))>
#<alt (+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/196608 (pow im 6)) (+ (* 1/6144 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))))) (* 1/5760 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))>
#<alt (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))>
#<alt (+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 2))))>
#<alt (+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/32 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* 25/2048 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 4))))))>
#<alt (+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/32 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* (pow im 2) (+ (* -451/65536 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 6))) (* 25/2048 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 4))))))))>
#<alt (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))>
#<alt (+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))>
#<alt (+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))>
#<alt (+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/128 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/3072 (pow re 3)) (* 1/48 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) (pow im 3)) (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))>
#<alt (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))>
#<alt (+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* 1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))>
#<alt (+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* -1/8 (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))>
#<alt (+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* -1/128 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/3072 (pow re 3)) (* 1/48 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) im)) (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* -1/8 (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -4)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -4)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -4)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -4)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -4)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -4)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -4)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -4)))>
#<alt (* -1 (* (sqrt re) (sqrt -1)))>
#<alt (* -1 (* (sqrt re) (sqrt -1)))>
#<alt (* -1 (* (sqrt re) (sqrt -1)))>
#<alt (* -1 (* (sqrt re) (sqrt -1)))>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (* -2 (* (sqrt re) (sqrt -1)))>
#<alt (* -2 (* (sqrt re) (sqrt -1)))>
#<alt (* -2 (* (sqrt re) (sqrt -1)))>
#<alt (* -2 (* (sqrt re) (sqrt -1)))>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))>
#<alt (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))>
#<alt (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))>
#<alt (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))>
#<alt (sqrt (/ 1 re))>
#<alt (sqrt (/ 1 re))>
#<alt (sqrt (/ 1 re))>
#<alt (sqrt (/ 1 re))>
#<alt (sqrt (/ 1 re))>
#<alt (sqrt (/ 1 re))>
#<alt (sqrt (/ 1 re))>
#<alt (sqrt (/ 1 re))>
#<alt (* (sqrt (/ 1 re)) (pow (sqrt -1) 2))>
#<alt (* (sqrt (/ 1 re)) (pow (sqrt -1) 2))>
#<alt (* (sqrt (/ 1 re)) (pow (sqrt -1) 2))>
#<alt (* (sqrt (/ 1 re)) (pow (sqrt -1) 2))>
#<alt (/ 1 re)>
#<alt (/ 1 re)>
#<alt (/ 1 re)>
#<alt (/ 1 re)>
#<alt (/ 1 re)>
#<alt (/ 1 re)>
#<alt (/ 1 re)>
#<alt (/ 1 re)>
#<alt (/ 1 re)>
#<alt (/ 1 re)>
#<alt (/ 1 re)>
#<alt (/ 1 re)>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (+ (* -1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))))>
#<alt (* 1/2 (* (sqrt (/ 1 im)) re))>
#<alt (* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im)))))>
#<alt (* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* 1/2 (sqrt (/ 1 im))))))>
#<alt (* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (+ (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3)))) (* 1/2 (sqrt (/ 1 im)))))))>
#<alt (* -1/2 (* (sqrt (/ 1 im)) re))>
#<alt (* -1 (* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (- (* 2 im) im) re))) (* 1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (sqrt im) (- (* 2 im) im))) (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re)))) re)) (* 1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))>
#<alt (* 1/2 (* (sqrt (/ 1 im)) re))>
#<alt (/ (+ (* -1/2 (sqrt (pow im 3))) (* 1/2 (* (sqrt im) re))) im)>
#<alt (/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* -1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re)))))) im)>
#<alt (/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* -1/2 (sqrt (/ 1 im))) (* im (+ (* -1/4 (* (sqrt (/ 1 im)) (/ 1 re))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 re)))))))) im)>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))>
#<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)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))>
#<alt (* -1 (* im (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))>
#<alt (* (sqrt (/ 1 im)) re)>
#<alt (* re (+ (sqrt (/ 1 im)) (* -1 (* (sqrt im) (/ 1 re)))))>
#<alt (* re (+ (sqrt (/ 1 im)) (+ (* -1 (* (sqrt im) (/ 1 re))) (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))))))>
#<alt (* re (+ (sqrt (/ 1 im)) (+ (* -1 (* (sqrt im) (/ 1 re))) (+ (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3))))))))>
#<alt (* -1 (* (sqrt (/ 1 im)) re))>
#<alt (* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (* (sqrt im) (/ 1 re))))))>
#<alt (* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (sqrt im) (* -1/2 (* (sqrt im) (/ (- (* 2 im) im) re)))) re)))))>
#<alt (* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (sqrt im) (* -1 (/ (+ (* 1/2 (* (sqrt im) (- (* 2 im) im))) (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re)))) re))) re)))))>
#<alt (* (sqrt (/ 1 im)) re)>
#<alt (/ (+ (* -1 (sqrt (pow im 3))) (* (sqrt im) re)) im)>
#<alt (/ (+ (* (sqrt im) re) (* (pow im 2) (+ (* -1 (sqrt (/ 1 im))) (* (sqrt im) (/ 1 re))))) im)>
#<alt (/ (+ (* (sqrt im) re) (* (pow im 2) (+ (* -1 (sqrt (/ 1 im))) (* im (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 re))) (* (sqrt (/ 1 im)) (/ 1 re))))))) im)>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))>
#<alt (* 2 im)>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (+ (* 2 im) (* re (- (/ re im) 2)))>
#<alt (+ (* 2 im) (* re (- (/ re im) 2)))>
#<alt (/ (pow re 2) im)>
#<alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))>
#<alt (* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re))))>
#<alt (* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re))))>
#<alt (/ (pow re 2) im)>
#<alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))>
#<alt (* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im)))>
#<alt (* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im)))>
#<alt (/ (pow re 2) im)>
#<alt (/ (+ (* -2 (* im re)) (pow re 2)) im)>
#<alt (/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)>
#<alt (/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)>
#<alt (* 2 im)>
#<alt (* im (+ 2 (* -2 (/ re im))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))>
#<alt (* 2 im)>
#<alt (* -1 (* im (- (* 2 (/ re im)) 2)))>
#<alt (* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))>
#<alt (* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))>
#<alt (pow re 2)>
#<alt (pow re 2)>
#<alt (pow re 2)>
#<alt (pow re 2)>
#<alt (pow re 2)>
#<alt (pow re 2)>
#<alt (pow re 2)>
#<alt (pow re 2)>
#<alt (pow re 2)>
#<alt (pow re 2)>
#<alt (pow re 2)>
#<alt (pow re 2)>
#<alt (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))>
#<alt (/ (+ (* 1/4 (* (sqrt (pow im 5)) (/ (- (* 2 (pow re 2)) (pow re 2)) (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4))))) (pow im 2))>
#<alt (/ (+ (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (* (pow im 3) (+ (* 1/4 (* (sqrt im) (/ (- (* -4 re) (* -2 re)) (* (pow re 2) (sqrt -1/4))))) (* 1/4 (* (sqrt (/ 1 im)) (/ (- (* 2 (pow re 2)) (pow re 2)) (* (pow re 2) (sqrt -1/4)))))))) (pow im 2))>
#<alt (/ (+ (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (* (pow im 3) (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (- (* 2 (pow re 2)) (pow re 2)) (* (pow re 2) (sqrt -1/4))))) (* im (+ (* -1/4 (* (sqrt im) (/ (+ 2 (* -4 (/ (- (* 2 (pow re 2)) (pow re 2)) (pow re 2)))) (* (pow re 2) (sqrt -1/4))))) (* 1/4 (* (sqrt (/ 1 im)) (/ (- (* -4 re) (* -2 re)) (* (pow re 2) (sqrt -1/4)))))))))) (pow im 2))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))>
#<alt (* -1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))))>
#<alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2))))))))>
#<alt (* -1 (* im (+ (* -1 (/ (+ (* 1/4 (* (sqrt im) (/ (pow re 2) (sqrt 2)))) (* 1/4 (* (sqrt im) (/ (pow re 2) (pow (sqrt 2) 3))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2))))))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (+ (* -1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))))>
#<alt (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))>
#<alt (* (pow re 2) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))>
#<alt (* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))>
#<alt (* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* -1/4 (* (sqrt (pow im 3)) (/ (+ (* -2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* (pow re 4) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))))>
#<alt (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))>
#<alt (* (pow re 2) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))>
#<alt (* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))>
#<alt (* (pow re 2) (+ (* -1 (/ (+ (* 1/4 (* (sqrt (pow im 3)) (/ (+ (* -2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* re (sqrt -1/4))))) (* 1/2 (* (sqrt (pow im 3)) (/ 1 (sqrt -1/4))))) (pow re 3))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))>
#<alt (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))>
#<alt (/ (+ (* 1/2 (* (sqrt (pow im 5)) (/ (- (* 2 (pow re 2)) (pow re 2)) (* (pow re 2) (sqrt -1/4))))) (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (pow im 2))>
#<alt (/ (+ (* (sqrt im) (* (pow re 2) (sqrt -1/4))) (* (pow im 3) (+ (* 1/2 (* (sqrt im) (/ (- (* -4 re) (* -2 re)) (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 im)) (/ (- (* 2 (pow re 2)) (pow re 2)) (* (pow re 2) (sqrt -1/4)))))))) (pow im 2))>
#<alt (/ (+ (* (sqrt im) (* (pow re 2) (sqrt -1/4))) (* (pow im 3) (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (* 2 (pow re 2)) (pow re 2)) (* (pow re 2) (sqrt -1/4))))) (* im (+ (* -1/2 (* (sqrt im) (/ (+ 2 (* -4 (/ (- (* 2 (pow re 2)) (pow re 2)) (pow re 2)))) (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 im)) (/ (- (* -4 re) (* -2 re)) (* (pow re 2) (sqrt -1/4)))))))))) (pow im 2))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* -1 (* (sqrt im) (sqrt 2)))>
#<alt (* -1 (* im (+ (* (sqrt (/ 1 im)) (sqrt 2)) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2))))))>
#<alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (+ (* (sqrt (/ 1 im)) (sqrt 2)) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))))>
#<alt (* -1 (* im (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (pow re 2) (pow (sqrt 2) 3))))) (pow im 3))) (+ (* (sqrt (/ 1 im)) (sqrt 2)) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))>
#<alt (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))>
#<alt (* (pow re 2) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))>
#<alt (* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))>
#<alt (* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* -1/2 (* (sqrt (pow im 3)) (/ (+ (* -2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* (pow re 4) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))>
#<alt (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))>
#<alt (* (pow re 2) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))>
#<alt (* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))>
#<alt (* (pow re 2) (+ (* -1 (/ (+ (* 1/2 (* (sqrt (pow im 3)) (/ (+ (* -2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* re (sqrt -1/4))))) (* (sqrt (pow im 3)) (/ 1 (sqrt -1/4)))) (pow re 3))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))>
#<alt (* (sqrt (pow im 3)) (/ (sqrt -4) (pow re 2)))>
#<alt (* im (+ (* -8 (* (sqrt (pow im 5)) (/ 1 (* (pow re 4) (sqrt -4))))) (* (sqrt im) (/ (sqrt -4) (pow re 2)))))>
#<alt (* im (+ (* (sqrt im) (/ (sqrt -4) (pow re 2))) (* (pow im 3) (+ (* -8 (* (sqrt (/ 1 im)) (/ 1 (* (pow re 4) (sqrt -4))))) (* 16 (* (sqrt im) (/ 1 (* (pow re 5) (sqrt -4)))))))))>
#<alt (* im (+ (* (sqrt im) (/ (sqrt -4) (pow re 2))) (* (pow im 3) (+ (* -8 (* (sqrt (/ 1 im)) (/ 1 (* (pow re 4) (sqrt -4))))) (* im (+ (* -48 (* (sqrt im) (/ 1 (* (pow re 6) (sqrt -4))))) (* 16 (* (sqrt (/ 1 im)) (/ 1 (* (pow re 5) (sqrt -4)))))))))))>
#<alt (* (sqrt (/ 1 im)) (sqrt 1/2))>
#<alt (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 1/2)))) (* (sqrt (/ 1 im)) (sqrt 1/2)))>
#<alt (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 1/2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (- (* -1/4 (pow re 2)) (* -1/2 (pow re 2))) (sqrt 1/2)))) (* (sqrt (/ 1 im)) (sqrt 1/2))))>
#<alt (+ (* -1/2 (* (sqrt (/ 1 (pow im 7))) (/ (+ (* -1/2 (pow re 3)) (+ (* 1/16 (/ (* im (pow re 2)) (pow (sqrt 1/2) 2))) (* 1/2 (pow re 3)))) (sqrt 1/2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 1/2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (- (* -1/4 (pow re 2)) (* -1/2 (pow re 2))) (sqrt 1/2)))) (* (sqrt (/ 1 im)) (sqrt 1/2)))))>
#<alt (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 1/2)))>
#<alt (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 1/2)))) (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 1/2))))>
#<alt (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow (sqrt -1) 2) (- (* -1/4 (pow re 2)) (* -1/2 (pow re 2)))) (sqrt 1/2)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 1/2)))) (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 1/2)))))>
#<alt (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow (sqrt -1) 2) (- (* -1/4 (pow re 2)) (* -1/2 (pow re 2)))) (sqrt 1/2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* (pow (sqrt -1) 2) (+ (* -1/2 (pow re 3)) (+ (* -1/16 (/ (* im (pow re 2)) (pow (sqrt 1/2) 2))) (* 1/2 (pow re 3))))) (sqrt 1/2))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 1/2)))) (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 1/2)))))>
#<alt (* (sqrt (/ 1 im)) (sqrt 1/2))>
#<alt (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 1/2)))) (* (sqrt (/ 1 im)) (sqrt 1/2)))>
#<alt (+ (* re (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ 1 (sqrt 1/2)))) (* 1/2 (* (sqrt im) (/ (* re (- (* 1/4 (/ 1 (pow im 3))) (* 1/16 (/ 1 (* (pow im 3) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))) (* (sqrt (/ 1 im)) (sqrt 1/2)))>
#<alt (+ (* re (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ 1 (sqrt 1/2)))) (* re (+ (* -1/8 (* (sqrt (/ 1 im)) (/ (* re (- (* 1/4 (/ 1 (pow im 3))) (* 1/16 (/ 1 (* (pow im 3) (pow (sqrt 1/2) 2)))))) (pow (sqrt 1/2) 3)))) (* 1/2 (* (sqrt im) (/ (- (* 1/4 (/ 1 (pow im 3))) (* 1/16 (/ 1 (* (pow im 3) (pow (sqrt 1/2) 2))))) (sqrt 1/2)))))))) (* (sqrt (/ 1 im)) (sqrt 1/2)))>
#<alt (* (sqrt (pow im 3)) (/ (sqrt -4) (pow re 2)))>
#<alt (/ (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* 16 (pow im 5)) (* 32 (pow im 5))) (* (pow re 2) (sqrt -4))))) (* (sqrt (pow im 3)) (sqrt -4))) (pow re 2))>
#<alt (/ (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* -32 (pow im 6)) (* -64 (pow im 6))) (* (pow re 3) (sqrt -4))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* 16 (pow im 5)) (* 32 (pow im 5))) (* (pow re 2) (sqrt -4))))) (* (sqrt (pow im 3)) (sqrt -4)))) (pow re 2))>
#<alt (/ (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* -32 (pow im 6)) (* -64 (pow im 6))) (* (pow re 3) (sqrt -4))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* -32 (pow im 7)) (+ (* -64 (pow im 7)) (+ (* -8 (* (pow im 2) (- (* 16 (pow im 5)) (* 32 (pow im 5))))) (* 1/4 (/ (pow (- (* 16 (pow im 5)) (* 32 (pow im 5))) 2) (* (pow im 3) (pow (sqrt -4) 2))))))) (* (pow re 4) (sqrt -4))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* 16 (pow im 5)) (* 32 (pow im 5))) (* (pow re 2) (sqrt -4))))) (* (sqrt (pow im 3)) (sqrt -4))))) (pow re 2))>
#<alt (* (sqrt (pow im 3)) (/ (sqrt -4) (pow re 2)))>
#<alt (/ (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* 16 (pow im 5)) (* 32 (pow im 5))) (* (pow re 2) (sqrt -4))))) (* (sqrt (pow im 3)) (sqrt -4))) (pow re 2))>
#<alt (/ (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* 32 (pow im 6)) (* 64 (pow im 6))) (* (pow re 3) (sqrt -4))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* 16 (pow im 5)) (* 32 (pow im 5))) (* (pow re 2) (sqrt -4))))) (* (sqrt (pow im 3)) (sqrt -4)))) (pow re 2))>
#<alt (/ (+ (* -1 (/ (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* -32 (pow im 7)) (+ (* -64 (pow im 7)) (+ (* -8 (* (pow im 2) (- (* 16 (pow im 5)) (* 32 (pow im 5))))) (* 1/4 (/ (pow (- (* 16 (pow im 5)) (* 32 (pow im 5))) 2) (* (pow im 3) (pow (sqrt -4) 2))))))) (* re (sqrt -4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* 32 (pow im 6)) (* 64 (pow im 6))) (sqrt -4))))) (pow re 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* 16 (pow im 5)) (* 32 (pow im 5))) (* (pow re 2) (sqrt -4))))) (* (sqrt (pow im 3)) (sqrt -4)))) (pow re 2))>
#<alt (* -4 (/ (pow im 3) (pow re 4)))>
#<alt (* (pow im 3) (- (* -16 (/ (pow im 2) (pow re 6))) (* 4 (/ 1 (pow re 4)))))>
#<alt (* (pow im 3) (- (* (pow im 2) (- (* 32 (/ im (pow re 7))) (* 16 (/ 1 (pow re 6))))) (* 4 (/ 1 (pow re 4)))))>
#<alt (* (pow im 3) (- (* (pow im 2) (- (* im (+ (* -96 (/ im (pow re 8))) (* 32 (/ 1 (pow re 7))))) (* 16 (/ 1 (pow re 6))))) (* 4 (/ 1 (pow re 4)))))>
#<alt (/ 1/2 im)>
#<alt (/ (+ 1/2 (* 1/2 (/ re im))) im)>
#<alt (/ (- (+ 1/2 (+ (* -1/4 (/ (pow re 2) (pow im 2))) (* 1/2 (/ re im)))) (* -1/2 (/ (pow re 2) (pow im 2)))) im)>
#<alt (/ (- (+ 1/2 (+ (* -1 (/ (+ (* -1/2 (pow re 3)) (* 1/2 (pow re 3))) (pow im 3))) (+ (* -1/4 (/ (pow re 2) (pow im 2))) (* 1/2 (/ re im))))) (* -1/2 (/ (pow re 2) (pow im 2)))) im)>
#<alt (/ 1/2 im)>
#<alt (* -1 (/ (- (* -1/2 (/ re im)) 1/2) im))>
#<alt (* -1 (/ (- (* -1 (/ (- (+ (* -1/4 (/ (pow re 2) im)) (* 1/2 re)) (* -1/2 (/ (pow re 2) im))) im)) 1/2) im))>
#<alt (* -1 (/ (- (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (* -1/4 (pow re 2)) (* -1/2 (pow re 2)))) (* -1 (/ (+ (* -1/2 (pow re 3)) (* 1/2 (pow re 3))) im))) im)) (* 1/2 re)) im)) 1/2) im))>
#<alt (/ 1/2 im)>
#<alt (+ (* 1/2 (/ re (pow im 2))) (* 1/2 (/ 1 im)))>
#<alt (+ (* re (+ (* 1/4 (/ re (pow im 3))) (* 1/2 (/ 1 (pow im 2))))) (* 1/2 (/ 1 im)))>
#<alt (+ (* re (+ (* re (+ (* -1/16 (/ (pow re 2) (pow im 5))) (* 1/4 (/ 1 (pow im 3))))) (* 1/2 (/ 1 (pow im 2))))) (* 1/2 (/ 1 im)))>
#<alt (* -4 (/ (pow im 3) (pow re 4)))>
#<alt (/ (- (+ (* -4 (pow im 3)) (* 16 (/ (pow im 5) (pow re 2)))) (* 32 (/ (pow im 5) (pow re 2)))) (pow re 4))>
#<alt (/ (- (+ (* -32 (/ (pow im 6) (pow re 3))) (+ (* -4 (pow im 3)) (* 16 (/ (pow im 5) (pow re 2))))) (+ (* -64 (/ (pow im 6) (pow re 3))) (* 32 (/ (pow im 5) (pow re 2))))) (pow re 4))>
#<alt (/ (- (+ (* -32 (/ (pow im 6) (pow re 3))) (+ (* -32 (/ (pow im 7) (pow re 4))) (+ (* -4 (pow im 3)) (* 16 (/ (pow im 5) (pow re 2)))))) (+ (* -64 (/ (pow im 6) (pow re 3))) (+ (* -64 (/ (pow im 7) (pow re 4))) (+ (* -8 (/ (* (pow im 2) (- (* 16 (pow im 5)) (* 32 (pow im 5)))) (pow re 4))) (* 32 (/ (pow im 5) (pow re 2))))))) (pow re 4))>
#<alt (* -4 (/ (pow im 3) (pow re 4)))>
#<alt (/ (- (+ (* -4 (pow im 3)) (* 16 (/ (pow im 5) (pow re 2)))) (* 32 (/ (pow im 5) (pow re 2)))) (pow re 4))>
#<alt (/ (- (+ (* -4 (pow im 3)) (+ (* -1 (/ (- (* 32 (pow im 6)) (* 64 (pow im 6))) (pow re 3))) (* 16 (/ (pow im 5) (pow re 2))))) (* 32 (/ (pow im 5) (pow re 2)))) (pow re 4))>
#<alt (/ (- (+ (* -4 (pow im 3)) (+ (* -1 (/ (- (+ (* -1 (/ (- (* -32 (pow im 7)) (+ (* -64 (pow im 7)) (* -8 (* (pow im 2) (- (* 16 (pow im 5)) (* 32 (pow im 5))))))) re)) (* 32 (pow im 6))) (* 64 (pow im 6))) (pow re 3))) (* 16 (/ (pow im 5) (pow re 2))))) (* 32 (/ (pow im 5) (pow re 2)))) (pow re 4))>
#<alt (* 2 im)>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (+ (* 2 im) (* re (- (/ re im) 2)))>
#<alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))>
#<alt (/ (pow im 2) re)>
#<alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)>
#<alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)>
#<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)>
#<alt (* -4 re)>
#<alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))>
#<alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))>
#<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)))))))>
#<alt (/ (pow im 2) re)>
#<alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))>
#<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)))>
#<alt (* 2 im)>
#<alt (* im (+ 2 (* -2 (/ re im))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))>
#<alt (* -2 im)>
#<alt (* -1 (* im (+ 2 (* 2 (/ re im)))))>
#<alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))>
#<alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))>
#<alt im>
#<alt (+ im (* -1 re))>
#<alt (+ im (* re (- (* 1/2 (/ re im)) 1)))>
#<alt (+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))>
#<alt (* 1/2 (/ (pow im 2) re))>
#<alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)>
#<alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)>
#<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)>
#<alt (* -2 re)>
#<alt (* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))>
#<alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))>
#<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))))))))>
#<alt (* 1/2 (/ (pow im 2) re))>
#<alt (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))>
#<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))))>
#<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))))>
#<alt im>
#<alt (* im (+ 1 (* -1 (/ re im))))>
#<alt (* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))>
#<alt (* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))>
#<alt (* -1 im)>
#<alt (* -1 (* im (+ 1 (/ re im))))>
#<alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))>
#<alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))>
#<alt im>
#<alt (+ im (* 1/2 (/ (pow re 2) im)))>
#<alt (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))>
#<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)))))>
#<alt re>
#<alt (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))>
#<alt (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))>
#<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)))))))>
#<alt (* -1 re)>
#<alt (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))>
#<alt (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))>
#<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))))))))>
#<alt re>
#<alt (+ re (* 1/2 (/ (pow im 2) re)))>
#<alt (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))>
#<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)))))>
#<alt im>
#<alt (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))>
#<alt (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))>
#<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)))))))>
#<alt (* -1 im)>
#<alt (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))>
#<alt (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))>
#<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))))))))>
#<alt (* 2 (/ im (pow re 2)))>
#<alt (* 2 (/ im (pow re 2)))>
#<alt (* 2 (/ im (pow re 2)))>
#<alt (* 2 (/ im (pow re 2)))>
#<alt (* 2 (/ im (pow re 2)))>
#<alt (* 2 (/ im (pow re 2)))>
#<alt (* 2 (/ im (pow re 2)))>
#<alt (* 2 (/ im (pow re 2)))>
#<alt (* 2 (/ im (pow re 2)))>
#<alt (* 2 (/ im (pow re 2)))>
#<alt (* 2 (/ im (pow re 2)))>
#<alt (* 2 (/ im (pow re 2)))>
#<alt (* 2 (/ im (pow re 2)))>
#<alt (* 2 (/ im (pow re 2)))>
#<alt (* 2 (/ im (pow re 2)))>
#<alt (* 2 (/ im (pow re 2)))>
#<alt (* 2 (/ im (pow re 2)))>
#<alt (* 2 (/ im (pow re 2)))>
#<alt (* 2 (/ im (pow re 2)))>
#<alt (* 2 (/ im (pow re 2)))>
#<alt (* 2 (/ im (pow re 2)))>
#<alt (* 2 (/ im (pow re 2)))>
#<alt (* 2 (/ im (pow re 2)))>
#<alt (* 2 (/ im (pow re 2)))>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
Calls

126 calls:

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

rewrite444.0ms (4.2%)

Algorithm
batch-egg-rewrite
Rules
3814×*-lowering-*.f32
3814×*-lowering-*.f64
2662×fma-lowering-fma.f32
2662×fma-lowering-fma.f64
1718×fma-define
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
053359
1363234
23660232
08820232
Stop Event
iter limit
node limit
Counts
25 → 354
Calls
Call 1
Inputs
(* 1/2 (pow (pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8) 2) 2))
(pow (pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8) 2) 2)
(pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8) 2)
(pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8)
(* 1/2 (sqrt (* re -4)))
(sqrt (* re -4))
(* re -4)
(* 1/2 (* im (sqrt (/ 1 re))))
(* im (sqrt (/ 1 re)))
(sqrt (/ 1 re))
(/ 1 re)
(* 1/2 (sqrt (* (* re re) (+ (* 2 (/ im (* re re))) (+ (/ 1 im) (/ -2 re))))))
(sqrt (* (* re re) (+ (* 2 (/ im (* re re))) (+ (/ 1 im) (/ -2 re)))))
(* (* re re) (+ (* 2 (/ im (* re re))) (+ (/ 1 im) (/ -2 re))))
(* re re)
(* 1/2 (/ 1 (sqrt (/ (- (* 2 im) (* re (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))) (- (* (* im im) 4) (* (* re re) (* (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))) (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))))))))
(/ 1 (sqrt (/ (- (* 2 im) (* re (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))) (- (* (* im im) 4) (* (* re re) (* (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))) (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im))))))))))))
(sqrt (/ (- (* 2 im) (* re (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))) (- (* (* im im) 4) (* (* re re) (* (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))) (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))))))
(/ (- (* 2 im) (* re (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))))) (- (* (* im im) 4) (* (* re re) (* (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im)))))) (+ -2 (* re (+ (/ 1 im) (/ (* (* re re) -1/4) (* im (* im im))))))))))
(* 2 (- (sqrt (+ (* re re) (* im im))) re))
(- (sqrt (+ (* re re) (* im im))) re)
(sqrt (+ (* re re) (* im im)))
(* 2 (/ im (* re re)))
(* 2 im)
(* im im)
Outputs
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #s(literal 4 binary64)))
(exp.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))))
(exp.f64 (log.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (*.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 1/4 binary64)))
(pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 4 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)) #s(literal 8 binary64))
(pow.f64 (*.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 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) (pow.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64))) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) (pow.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 (*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64))) #s(literal 2 binary64)))
(*.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64))) #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64))) #s(literal 2 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64))) #s(literal 1 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (*.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 1/8 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #s(literal 4 binary64)))
(pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 1 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)) #s(literal 4 binary64))
(pow.f64 (*.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 1/8 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #s(literal 1/4 binary64))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) (*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) (pow.f64 (*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64))))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)) (pow.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64))) (*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64))))
(*.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64))) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)))
(*.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64))) #s(literal 1 binary64)) (pow.f64 (*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64))) #s(literal 1 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64))) #s(literal 1 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/16 binary64)) #s(literal 4 binary64)) (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/16 binary64)) #s(literal 4 binary64)))
(*.f64 (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/16 binary64)) #s(literal 4 binary64)) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/16 binary64)) #s(literal 4 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/32 binary64)) #s(literal 4 binary64)) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/32 binary64)) #s(literal 4 binary64)))
(exp.f64 (*.f64 #s(literal 1/8 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))))
(exp.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.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 1/16 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))) #s(literal 1/8 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #s(literal 1/2 binary64)))
(pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 1 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)) #s(literal 2 binary64))
(pow.f64 (*.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 1/16 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #s(literal 1/8 binary64))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/16 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/16 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/16 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/16 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/32 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/32 binary64)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)) (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64))) #s(literal 1/2 binary64)) (pow.f64 (*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64))) #s(literal 1/2 binary64)) (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64))) #s(literal 1/2 binary64)) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64))))
(*.f64 (sqrt.f64 (*.f64 re #s(literal -4 binary64))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 re #s(literal -4 binary64))) #s(literal 1/2 binary64)))
(sqrt.f64 (*.f64 re #s(literal -4 binary64)))
(pow.f64 (*.f64 re #s(literal -4 binary64)) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(*.f64 (sqrt.f64 #s(literal -4 binary64)) (sqrt.f64 re))
(*.f64 (pow.f64 (*.f64 re #s(literal -4 binary64)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 re #s(literal -4 binary64)) #s(literal 1/4 binary64)))
(*.f64 re #s(literal -4 binary64))
(*.f64 #s(literal -4 binary64) re)
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) #s(literal 1 binary64)) (sqrt.f64 re))
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
(*.f64 im (*.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) im))
(*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1/2 binary64))) im)
(/.f64 im (sqrt.f64 re))
(/.f64 (*.f64 #s(literal 1 binary64) im) (sqrt.f64 re))
(*.f64 im (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) im)
(exp.f64 (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 re)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 re) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 re)) #s(literal -1 binary64)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(/.f64 #s(literal 1 binary64) (sqrt.f64 re))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 re)))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (-.f64 #s(literal 0 binary64) re)))
(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 (/.f64 (sqrt.f64 re) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal 1 binary64))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (pow.f64 re #s(literal -1/4 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal -1/2 binary64)) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 re) #s(literal -1 binary64)))
(neg.f64 (/.f64 #s(literal -1 binary64) re))
(/.f64 #s(literal 1 binary64) re)
(/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) re)))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) re))
(pow.f64 re #s(literal -1 binary64))
(pow.f64 (neg.f64 (-.f64 #s(literal 0 binary64) re)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) re))
(*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 1 binary64))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (+.f64 (/.f64 #s(literal -2 binary64) re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re))))))))
(*.f64 (sqrt.f64 (*.f64 re (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (+.f64 (/.f64 #s(literal -2 binary64) re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re))))))) #s(literal 1/2 binary64))
(*.f64 (fabs.f64 re) (*.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (+.f64 (/.f64 #s(literal -2 binary64) re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re))))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (fabs.f64 re)) (sqrt.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (+.f64 (/.f64 #s(literal -2 binary64) re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re))))))
(exp.f64 (*.f64 (log.f64 (*.f64 re (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (+.f64 (/.f64 #s(literal -2 binary64) re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re))))))) #s(literal 1/2 binary64)))
(sqrt.f64 (*.f64 re (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (+.f64 (/.f64 #s(literal -2 binary64) re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re)))))))
(pow.f64 (*.f64 re (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (+.f64 (/.f64 #s(literal -2 binary64) re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re)))))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 re) (pow.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (+.f64 (/.f64 #s(literal -2 binary64) re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 re) (sqrt.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (+.f64 (/.f64 #s(literal -2 binary64) re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re)))))))
(*.f64 (pow.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (+.f64 (/.f64 #s(literal -2 binary64) re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re))))) #s(literal 1/2 binary64)) (sqrt.f64 re))
(*.f64 (fabs.f64 re) (sqrt.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (+.f64 (/.f64 #s(literal -2 binary64) re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re))))))
(*.f64 (sqrt.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (+.f64 (/.f64 #s(literal -2 binary64) re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re))))) (fabs.f64 re))
(*.f64 (pow.f64 (*.f64 re (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (+.f64 (/.f64 #s(literal -2 binary64) re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re)))))) #s(literal 1/4 binary64)) (pow.f64 (*.f64 re (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (+.f64 (/.f64 #s(literal -2 binary64) re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re)))))) #s(literal 1/4 binary64)))
(+.f64 (*.f64 (*.f64 re re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re))) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))
(+.f64 (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))) (*.f64 (*.f64 re re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re))))
(+.f64 (*.f64 (*.f64 re re) (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re)) (/.f64 #s(literal 1 binary64) im))) (*.f64 (*.f64 re re) (/.f64 #s(literal -2 binary64) re)))
(+.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re)) (/.f64 #s(literal 1 binary64) im)) (*.f64 re re)) (*.f64 (/.f64 #s(literal -2 binary64) re) (*.f64 re re)))
(fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 im (*.f64 re re)) (*.f64 re re)) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))
(fma.f64 re (*.f64 re (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re))) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))
(fma.f64 re (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))) (*.f64 (*.f64 re re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re))))
(fma.f64 (*.f64 re re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re)) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))
(fma.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)) (*.f64 (*.f64 re re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re))))
(fma.f64 (*.f64 re re) (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re)) (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 re re) (/.f64 #s(literal -2 binary64) re)))
(fma.f64 (/.f64 im (*.f64 re re)) (*.f64 #s(literal 2 binary64) (*.f64 re re)) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re)) (*.f64 re re) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))
(fma.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)) (*.f64 re re) (*.f64 (*.f64 re re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re))))
(fma.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re)) (/.f64 #s(literal 1 binary64) im)) (*.f64 re re) (*.f64 (/.f64 #s(literal -2 binary64) re) (*.f64 re re)))
(fma.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re)) re) re (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))
(fma.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)) re) re (*.f64 (*.f64 re re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re))))
(fma.f64 (*.f64 (*.f64 re re) #s(literal 2 binary64)) (/.f64 im (*.f64 re re)) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))
(fma.f64 (*.f64 (*.f64 re re) (/.f64 im (*.f64 re re))) #s(literal 2 binary64) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))))) (+.f64 (*.f64 (*.f64 (*.f64 re re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re))) (*.f64 (*.f64 re re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re)))) (-.f64 (*.f64 (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))) (*.f64 (*.f64 (*.f64 re re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re))) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 re re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re))) (*.f64 (*.f64 re re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re)))) (*.f64 (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))) (-.f64 (*.f64 (*.f64 re re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re))) (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))))
(/.f64 (*.f64 (*.f64 re re) (+.f64 (/.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))))) (+.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re))))))
(/.f64 (*.f64 (*.f64 re re) (-.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re)) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))
(/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))) (*.f64 re re)) (+.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)) (-.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re))))))
(/.f64 (*.f64 (-.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))) (*.f64 re re)) (-.f64 (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re)) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))
(*.f64 re (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (+.f64 (/.f64 #s(literal -2 binary64) re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re))))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (+.f64 (/.f64 #s(literal -2 binary64) re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re)))))
(*.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (+.f64 (/.f64 #s(literal -2 binary64) re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re)))) (*.f64 re re))
(*.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (+.f64 (/.f64 #s(literal -2 binary64) re) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re))))) re)
(exp.f64 (*.f64 (log.f64 re) #s(literal 2 binary64)))
(pow.f64 re #s(literal 2 binary64))
(*.f64 re re)
(*.f64 (*.f64 re re) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 re re))
(*.f64 (fabs.f64 re) (fabs.f64 re))
(/.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal -1/2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64)))
(/.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal -1/2 binary64))))
(pow.f64 (/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal -1/2 binary64))))
(*.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))
(exp.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) #s(literal -1/2 binary64)))
(neg.f64 (/.f64 #s(literal -1 binary64) (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal -1/2 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal -1/2 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal -1/2 binary64)))))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal -1/2 binary64))))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) #s(literal -1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal -1/2 binary64)) #s(literal -1 binary64))
(pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal 1/2 binary64))
(pow.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal -1/2 binary64)))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal -1/2 binary64)))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) #s(literal -1/4 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) #s(literal -1/4 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (pow.f64 (pow.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (pow.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (pow.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal -1/2 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) #s(literal -1/2 binary64)) (pow.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (-.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) #s(literal 64 binary64)) (*.f64 (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (*.f64 (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))) #s(literal -1/2 binary64)) (pow.f64 (+.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) #s(literal 16 binary64)) (*.f64 (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (-.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) #s(literal 16 binary64)) (*.f64 (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))) #s(literal -1/2 binary64)) (pow.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal -1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal -1/4 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) #s(literal 1/2 binary64)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal 1/2 binary64)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))
(/.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(/.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) (*.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal -1/2 binary64))) #s(literal -1 binary64))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (neg.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal 1/2 binary64)) #s(literal -1 binary64))
(pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal -1/2 binary64))
(pow.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (sqrt.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(*.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) (pow.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) #s(literal -1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))))
(*.f64 (pow.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) #s(literal -1/2 binary64)) (sqrt.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))
(*.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal -1/4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal -1/4 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (-.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) #s(literal 64 binary64)) (*.f64 (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (*.f64 (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))) #s(literal 1/2 binary64)) (pow.f64 (+.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) #s(literal 16 binary64)) (*.f64 (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (-.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) #s(literal 16 binary64)) (*.f64 (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))) #s(literal 1/2 binary64)) (pow.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) #s(literal 1/2 binary64)))
(+.f64 (/.f64 (*.f64 #s(literal 2 binary64) im) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (neg.f64 (/.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))))
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) #s(literal -1 binary64)))
(-.f64 (/.f64 (*.f64 #s(literal 2 binary64) im) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (/.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))
(fma.f64 #s(literal 2 binary64) (/.f64 im (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (neg.f64 (/.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))))
(fma.f64 im (/.f64 #s(literal 2 binary64) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (neg.f64 (/.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))))
(fma.f64 (*.f64 #s(literal 2 binary64) im) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (neg.f64 (/.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) im) (-.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) #s(literal 64 binary64)) (*.f64 (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (*.f64 (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))) (+.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) #s(literal 16 binary64)) (*.f64 (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))) (neg.f64 (/.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))))
(fma.f64 (/.f64 (*.f64 #s(literal 2 binary64) im) (-.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) #s(literal 16 binary64)) (*.f64 (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) (neg.f64 (/.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))))
(neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))
(/.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal 1 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))
(/.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) (*.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))
(/.f64 (-.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (*.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) im) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (*.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) (*.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) im) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) im) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (/.f64 (*.f64 #s(literal 2 binary64) im) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))) (+.f64 (*.f64 (/.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (/.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))) (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) im) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (/.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) im) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (/.f64 (*.f64 #s(literal 2 binary64) im) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))) (*.f64 (/.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (/.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))) (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) im) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (/.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))))
(/.f64 (*.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal 1 binary64)) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))) (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))
(pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))
(*.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) #s(literal -1 binary64)))
(*.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (-.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) #s(literal 64 binary64)) (*.f64 (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (*.f64 (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))) (+.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) #s(literal 16 binary64)) (*.f64 (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))))
(*.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (-.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) #s(literal 16 binary64)) (*.f64 (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))
(*.f64 (pow.f64 (/.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) (-.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))))
(*.f64 (pow.f64 (/.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im))))))))))
(+.f64 (*.f64 #s(literal 2 binary64) (hypot.f64 re im)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) re)))
(+.f64 (*.f64 (hypot.f64 re im) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) (hypot.f64 re im) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) re)))
(fma.f64 (hypot.f64 re im) #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re))) (+.f64 re (hypot.f64 re im)))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) #s(literal 2 binary64)) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))
(/.f64 (*.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)) #s(literal 2 binary64)) (+.f64 re (hypot.f64 re im)))
(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
(*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))
(+.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re))
(+.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im))
(-.f64 (hypot.f64 re im) re)
(-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))) (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(-.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im))) (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im))))
(fma.f64 #s(literal -1 binary64) re (hypot.f64 re im))
(fma.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)) (-.f64 #s(literal 0 binary64) re))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re (hypot.f64 re im)) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))
(/.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)) (+.f64 re (hypot.f64 re im)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (neg.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (neg.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re))) (neg.f64 (+.f64 re (hypot.f64 re im))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re)))) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 0 binary64) re)) (*.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re)))))
(/.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 0 binary64) re))) (-.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re)))
(pow.f64 (/.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 re (hypot.f64 re im)) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(*.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)) (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))))
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #s(literal 1/2 binary64)))
(hypot.f64 re im)
(hypot.f64 re (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 im re)
(hypot.f64 im (fabs.f64 re))
(hypot.f64 (fabs.f64 re) im)
(hypot.f64 (fabs.f64 re) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) re)
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (fabs.f64 re))
(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
(/.f64 (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im)))) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))))
(pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 binary64))
(pow.f64 (hypot.f64 re im) #s(literal 1 binary64))
(pow.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) #s(literal 1/4 binary64))
(*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im))) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re re) (*.f64 im im))) #s(literal 1/2 binary64)))
(/.f64 #s(literal 2 binary64) (/.f64 (*.f64 re re) im))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) im)))
(/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) im) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re re)))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) im)) (-.f64 #s(literal 0 binary64) (*.f64 re re)))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) im)) (-.f64 #s(literal 0 binary64) (*.f64 re re)))
(/.f64 (*.f64 #s(literal 2 binary64) (/.f64 im re)) re)
(/.f64 (*.f64 (/.f64 im re) #s(literal 2 binary64)) re)
(/.f64 (/.f64 (*.f64 #s(literal 2 binary64) im) re) re)
(pow.f64 (/.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) im)) #s(literal -1 binary64))
(*.f64 #s(literal 2 binary64) (/.f64 im (*.f64 re re)))
(*.f64 im (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) #s(literal 2 binary64)))
(*.f64 im (/.f64 #s(literal 2 binary64) (*.f64 re re)))
(*.f64 (/.f64 im (*.f64 re re)) #s(literal 2 binary64))
(*.f64 (*.f64 #s(literal 2 binary64) im) (/.f64 #s(literal 1 binary64) (*.f64 re re)))
(*.f64 (/.f64 im re) (/.f64 #s(literal 2 binary64) re))
(*.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 im re))
(*.f64 #s(literal 2 binary64) im)
(*.f64 im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 im) #s(literal 2 binary64)))
(pow.f64 im #s(literal 2 binary64))
(*.f64 im im)
(*.f64 (*.f64 im im) #s(literal 1 binary64))
(*.f64 (pow.f64 im #s(literal 1 binary64)) (pow.f64 im #s(literal 1 binary64)))

simplify470.0ms (4.5%)

Algorithm
egg-herbie
Rules
6680×*-lowering-*.f32
6680×*-lowering-*.f64
2984×+-lowering-+.f64
2984×+-lowering-+.f32
1600×*-commutative
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0162010327
156629751
081739751
Stop Event
iter limit
node limit
Counts
504 → 504
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))))))))
(* (sqrt im) (sqrt 2))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(* im (sqrt (/ 1 re)))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (* im (sqrt (/ 1 re))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re)))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* -1/128 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re))))))
(* -2 (* (sqrt re) (sqrt -1)))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -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))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* im (sqrt (/ 1 re)))
(* im (+ (sqrt (/ 1 re)) (* -1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* 7/128 (* (pow im 2) (sqrt (/ 1 (pow re 9)))))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* (pow im 2) (+ (* -33/1024 (* (pow im 2) (sqrt (/ 1 (pow re 13))))) (* 7/128 (sqrt (/ 1 (pow re 9))))))))))
(* (sqrt im) (sqrt 2))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (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 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt 2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(pow (* 2 im) 1/4)
(+ (* -1/4 (* (pow (/ 2 (pow im 3)) 1/4) re)) (pow (* 2 im) 1/4))
(+ (* re (+ (* -1/4 (pow (/ 2 (pow im 3)) 1/4)) (* 1/32 (* (pow (/ 2 (pow im 7)) 1/4) re)))) (pow (* 2 im) 1/4))
(+ (* re (+ (* -1/4 (pow (/ 2 (pow im 3)) 1/4)) (* re (+ (* 1/32 (pow (/ 2 (pow im 7)) 1/4)) (* 5/128 (* (pow (/ 2 (pow im 11)) 1/4) re)))))) (pow (* 2 im) 1/4))
(exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/1536 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/24576 (pow im 6)) (* 1/2880 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))
(exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/24576 (pow im 6)) (+ (* 1/2880 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6))))) (* 1/1536 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (pow re 6)) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))
(exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 2))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/16 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* 13/512 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 4))))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/16 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* (pow im 2) (+ (* -119/8192 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 6))) (* 13/512 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 4))))))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/384 (pow re 3)) (* 1/24 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) (pow im 3)) (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* 1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* -1/4 (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* -1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/384 (pow re 3)) (* 1/24 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) im)) (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* -1/4 (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(pow (* 2 im) 1/8)
(+ (* -1/8 (* (pow (/ 2 (pow im 7)) 1/8) re)) (pow (* 2 im) 1/8))
(+ (* re (+ (* -1/8 (pow (/ 2 (pow im 7)) 1/8)) (* 1/128 (* (pow (/ 2 (pow im 15)) 1/8) re)))) (pow (* 2 im) 1/8))
(+ (* re (+ (* -1/8 (pow (/ 2 (pow im 7)) 1/8)) (* re (+ (* 1/128 (pow (/ 2 (pow im 15)) 1/8)) (* 21/1024 (* (pow (/ 2 (pow im 23)) 1/8) re)))))) (pow (* 2 im) 1/8))
(exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/6144 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/196608 (pow im 6)) (* 1/5760 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))
(exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))
(+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))))
(+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))
(+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/196608 (pow im 6)) (+ (* 1/6144 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))))) (* 1/5760 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))
(exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 2))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/32 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* 25/2048 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 4))))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/32 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* (pow im 2) (+ (* -451/65536 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 6))) (* 25/2048 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 4))))))))
(exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/128 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/3072 (pow re 3)) (* 1/48 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) (pow im 3)) (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))
(exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* 1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* -1/8 (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* -1/128 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/3072 (pow re 3)) (* 1/48 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) im)) (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* -1/8 (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(* -1 (* (sqrt re) (sqrt -1)))
(* -1 (* (sqrt re) (sqrt -1)))
(* -1 (* (sqrt re) (sqrt -1)))
(* -1 (* (sqrt re) (sqrt -1)))
(* (sqrt re) (sqrt -4))
(* (sqrt re) (sqrt -4))
(* (sqrt re) (sqrt -4))
(* (sqrt re) (sqrt -4))
(* (sqrt re) (sqrt -4))
(* (sqrt re) (sqrt -4))
(* (sqrt re) (sqrt -4))
(* (sqrt re) (sqrt -4))
(* -2 (* (sqrt re) (sqrt -1)))
(* -2 (* (sqrt re) (sqrt -1)))
(* -2 (* (sqrt re) (sqrt -1)))
(* -2 (* (sqrt re) (sqrt -1)))
(* -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 (* 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 (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))))
(* 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 (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)))
(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 re)
(/ 1 re)
(/ 1 re)
(/ 1 re)
(/ 1 re)
(/ 1 re)
(/ 1 re)
(/ 1 re)
(/ 1 re)
(/ 1 re)
(/ 1 re)
(/ 1 re)
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))))
(* 1/2 (* (sqrt (/ 1 im)) re))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im)))))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* 1/2 (sqrt (/ 1 im))))))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (+ (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3)))) (* 1/2 (sqrt (/ 1 im)))))))
(* -1/2 (* (sqrt (/ 1 im)) re))
(* -1 (* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (- (* 2 im) im) re))) (* 1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (sqrt im) (- (* 2 im) im))) (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re)))) re)) (* 1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))
(* 1/2 (* (sqrt (/ 1 im)) re))
(/ (+ (* -1/2 (sqrt (pow im 3))) (* 1/2 (* (sqrt im) re))) im)
(/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* -1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re)))))) im)
(/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* -1/2 (sqrt (/ 1 im))) (* im (+ (* -1/4 (* (sqrt (/ 1 im)) (/ 1 re))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 re)))))))) im)
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* 1/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)))) (* 1/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) (pow (sqrt 2) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(* -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)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(* -1 (* im (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(* (sqrt im) (sqrt 2))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(* (sqrt (/ 1 im)) re)
(* re (+ (sqrt (/ 1 im)) (* -1 (* (sqrt im) (/ 1 re)))))
(* re (+ (sqrt (/ 1 im)) (+ (* -1 (* (sqrt im) (/ 1 re))) (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))))))
(* re (+ (sqrt (/ 1 im)) (+ (* -1 (* (sqrt im) (/ 1 re))) (+ (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3))))))))
(* -1 (* (sqrt (/ 1 im)) re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (* (sqrt im) (/ 1 re))))))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (sqrt im) (* -1/2 (* (sqrt im) (/ (- (* 2 im) im) re)))) re)))))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (sqrt im) (* -1 (/ (+ (* 1/2 (* (sqrt im) (- (* 2 im) im))) (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re)))) re))) re)))))
(* (sqrt (/ 1 im)) re)
(/ (+ (* -1 (sqrt (pow im 3))) (* (sqrt im) re)) im)
(/ (+ (* (sqrt im) re) (* (pow im 2) (+ (* -1 (sqrt (/ 1 im))) (* (sqrt im) (/ 1 re))))) im)
(/ (+ (* (sqrt im) re) (* (pow im 2) (+ (* -1 (sqrt (/ 1 im))) (* im (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 re))) (* (sqrt (/ 1 im)) (/ 1 re))))))) im)
(* (sqrt im) (sqrt 2))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(* 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)))
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))
(/ (+ (* 1/4 (* (sqrt (pow im 5)) (/ (- (* 2 (pow re 2)) (pow re 2)) (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4))))) (pow im 2))
(/ (+ (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (* (pow im 3) (+ (* 1/4 (* (sqrt im) (/ (- (* -4 re) (* -2 re)) (* (pow re 2) (sqrt -1/4))))) (* 1/4 (* (sqrt (/ 1 im)) (/ (- (* 2 (pow re 2)) (pow re 2)) (* (pow re 2) (sqrt -1/4)))))))) (pow im 2))
(/ (+ (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (* (pow im 3) (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (- (* 2 (pow re 2)) (pow re 2)) (* (pow re 2) (sqrt -1/4))))) (* im (+ (* -1/4 (* (sqrt im) (/ (+ 2 (* -4 (/ (- (* 2 (pow re 2)) (pow re 2)) (pow re 2)))) (* (pow re 2) (sqrt -1/4))))) (* 1/4 (* (sqrt (/ 1 im)) (/ (- (* -4 re) (* -2 re)) (* (pow re 2) (sqrt -1/4)))))))))) (pow im 2))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* 1/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)))) (* 1/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) (pow (sqrt 2) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (sqrt 2)))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/4 (* (sqrt im) (/ (pow re 2) (sqrt 2)))) (* 1/4 (* (sqrt im) (/ (pow re 2) (pow (sqrt 2) 3))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))))
(* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))
(* (pow re 2) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))
(* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* -1/4 (* (sqrt (pow im 3)) (/ (+ (* -2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* (pow re 4) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))))
(* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))
(* (pow re 2) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))
(* (pow re 2) (+ (* -1 (/ (+ (* 1/4 (* (sqrt (pow im 3)) (/ (+ (* -2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* re (sqrt -1/4))))) (* 1/2 (* (sqrt (pow im 3)) (/ 1 (sqrt -1/4))))) (pow re 3))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))
(* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))
(/ (+ (* 1/2 (* (sqrt (pow im 5)) (/ (- (* 2 (pow re 2)) (pow re 2)) (* (pow re 2) (sqrt -1/4))))) (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (pow im 2))
(/ (+ (* (sqrt im) (* (pow re 2) (sqrt -1/4))) (* (pow im 3) (+ (* 1/2 (* (sqrt im) (/ (- (* -4 re) (* -2 re)) (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 im)) (/ (- (* 2 (pow re 2)) (pow re 2)) (* (pow re 2) (sqrt -1/4)))))))) (pow im 2))
(/ (+ (* (sqrt im) (* (pow re 2) (sqrt -1/4))) (* (pow im 3) (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (* 2 (pow re 2)) (pow re 2)) (* (pow re 2) (sqrt -1/4))))) (* im (+ (* -1/2 (* (sqrt im) (/ (+ 2 (* -4 (/ (- (* 2 (pow re 2)) (pow re 2)) (pow re 2)))) (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 im)) (/ (- (* -4 re) (* -2 re)) (* (pow re 2) (sqrt -1/4)))))))))) (pow im 2))
(* (sqrt im) (sqrt 2))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (sqrt 2)))
(* -1 (* im (+ (* (sqrt (/ 1 im)) (sqrt 2)) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (+ (* (sqrt (/ 1 im)) (sqrt 2)) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (pow re 2) (pow (sqrt 2) 3))))) (pow im 3))) (+ (* (sqrt (/ 1 im)) (sqrt 2)) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))))
(* (sqrt im) (sqrt 2))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))
(* (pow re 2) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))
(* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* -1/2 (* (sqrt (pow im 3)) (/ (+ (* -2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* (pow re 4) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))
(* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))
(* (pow re 2) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))
(* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(* (pow re 2) (+ (* -1 (/ (+ (* 1/2 (* (sqrt (pow im 3)) (/ (+ (* -2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* re (sqrt -1/4))))) (* (sqrt (pow im 3)) (/ 1 (sqrt -1/4)))) (pow re 3))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(* (sqrt (pow im 3)) (/ (sqrt -4) (pow re 2)))
(* im (+ (* -8 (* (sqrt (pow im 5)) (/ 1 (* (pow re 4) (sqrt -4))))) (* (sqrt im) (/ (sqrt -4) (pow re 2)))))
(* im (+ (* (sqrt im) (/ (sqrt -4) (pow re 2))) (* (pow im 3) (+ (* -8 (* (sqrt (/ 1 im)) (/ 1 (* (pow re 4) (sqrt -4))))) (* 16 (* (sqrt im) (/ 1 (* (pow re 5) (sqrt -4)))))))))
(* im (+ (* (sqrt im) (/ (sqrt -4) (pow re 2))) (* (pow im 3) (+ (* -8 (* (sqrt (/ 1 im)) (/ 1 (* (pow re 4) (sqrt -4))))) (* im (+ (* -48 (* (sqrt im) (/ 1 (* (pow re 6) (sqrt -4))))) (* 16 (* (sqrt (/ 1 im)) (/ 1 (* (pow re 5) (sqrt -4)))))))))))
(* (sqrt (/ 1 im)) (sqrt 1/2))
(+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 1/2)))) (* (sqrt (/ 1 im)) (sqrt 1/2)))
(+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 1/2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (- (* -1/4 (pow re 2)) (* -1/2 (pow re 2))) (sqrt 1/2)))) (* (sqrt (/ 1 im)) (sqrt 1/2))))
(+ (* -1/2 (* (sqrt (/ 1 (pow im 7))) (/ (+ (* -1/2 (pow re 3)) (+ (* 1/16 (/ (* im (pow re 2)) (pow (sqrt 1/2) 2))) (* 1/2 (pow re 3)))) (sqrt 1/2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 1/2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (- (* -1/4 (pow re 2)) (* -1/2 (pow re 2))) (sqrt 1/2)))) (* (sqrt (/ 1 im)) (sqrt 1/2)))))
(* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 1/2)))
(+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 1/2)))) (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 1/2))))
(+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow (sqrt -1) 2) (- (* -1/4 (pow re 2)) (* -1/2 (pow re 2)))) (sqrt 1/2)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 1/2)))) (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 1/2)))))
(+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow (sqrt -1) 2) (- (* -1/4 (pow re 2)) (* -1/2 (pow re 2)))) (sqrt 1/2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* (pow (sqrt -1) 2) (+ (* -1/2 (pow re 3)) (+ (* -1/16 (/ (* im (pow re 2)) (pow (sqrt 1/2) 2))) (* 1/2 (pow re 3))))) (sqrt 1/2))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 1/2)))) (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 1/2)))))
(* (sqrt (/ 1 im)) (sqrt 1/2))
(+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 1/2)))) (* (sqrt (/ 1 im)) (sqrt 1/2)))
(+ (* re (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ 1 (sqrt 1/2)))) (* 1/2 (* (sqrt im) (/ (* re (- (* 1/4 (/ 1 (pow im 3))) (* 1/16 (/ 1 (* (pow im 3) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))) (* (sqrt (/ 1 im)) (sqrt 1/2)))
(+ (* re (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ 1 (sqrt 1/2)))) (* re (+ (* -1/8 (* (sqrt (/ 1 im)) (/ (* re (- (* 1/4 (/ 1 (pow im 3))) (* 1/16 (/ 1 (* (pow im 3) (pow (sqrt 1/2) 2)))))) (pow (sqrt 1/2) 3)))) (* 1/2 (* (sqrt im) (/ (- (* 1/4 (/ 1 (pow im 3))) (* 1/16 (/ 1 (* (pow im 3) (pow (sqrt 1/2) 2))))) (sqrt 1/2)))))))) (* (sqrt (/ 1 im)) (sqrt 1/2)))
(* (sqrt (pow im 3)) (/ (sqrt -4) (pow re 2)))
(/ (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* 16 (pow im 5)) (* 32 (pow im 5))) (* (pow re 2) (sqrt -4))))) (* (sqrt (pow im 3)) (sqrt -4))) (pow re 2))
(/ (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* -32 (pow im 6)) (* -64 (pow im 6))) (* (pow re 3) (sqrt -4))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* 16 (pow im 5)) (* 32 (pow im 5))) (* (pow re 2) (sqrt -4))))) (* (sqrt (pow im 3)) (sqrt -4)))) (pow re 2))
(/ (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* -32 (pow im 6)) (* -64 (pow im 6))) (* (pow re 3) (sqrt -4))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* -32 (pow im 7)) (+ (* -64 (pow im 7)) (+ (* -8 (* (pow im 2) (- (* 16 (pow im 5)) (* 32 (pow im 5))))) (* 1/4 (/ (pow (- (* 16 (pow im 5)) (* 32 (pow im 5))) 2) (* (pow im 3) (pow (sqrt -4) 2))))))) (* (pow re 4) (sqrt -4))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* 16 (pow im 5)) (* 32 (pow im 5))) (* (pow re 2) (sqrt -4))))) (* (sqrt (pow im 3)) (sqrt -4))))) (pow re 2))
(* (sqrt (pow im 3)) (/ (sqrt -4) (pow re 2)))
(/ (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* 16 (pow im 5)) (* 32 (pow im 5))) (* (pow re 2) (sqrt -4))))) (* (sqrt (pow im 3)) (sqrt -4))) (pow re 2))
(/ (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* 32 (pow im 6)) (* 64 (pow im 6))) (* (pow re 3) (sqrt -4))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* 16 (pow im 5)) (* 32 (pow im 5))) (* (pow re 2) (sqrt -4))))) (* (sqrt (pow im 3)) (sqrt -4)))) (pow re 2))
(/ (+ (* -1 (/ (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* -32 (pow im 7)) (+ (* -64 (pow im 7)) (+ (* -8 (* (pow im 2) (- (* 16 (pow im 5)) (* 32 (pow im 5))))) (* 1/4 (/ (pow (- (* 16 (pow im 5)) (* 32 (pow im 5))) 2) (* (pow im 3) (pow (sqrt -4) 2))))))) (* re (sqrt -4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* 32 (pow im 6)) (* 64 (pow im 6))) (sqrt -4))))) (pow re 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* 16 (pow im 5)) (* 32 (pow im 5))) (* (pow re 2) (sqrt -4))))) (* (sqrt (pow im 3)) (sqrt -4)))) (pow re 2))
(* -4 (/ (pow im 3) (pow re 4)))
(* (pow im 3) (- (* -16 (/ (pow im 2) (pow re 6))) (* 4 (/ 1 (pow re 4)))))
(* (pow im 3) (- (* (pow im 2) (- (* 32 (/ im (pow re 7))) (* 16 (/ 1 (pow re 6))))) (* 4 (/ 1 (pow re 4)))))
(* (pow im 3) (- (* (pow im 2) (- (* im (+ (* -96 (/ im (pow re 8))) (* 32 (/ 1 (pow re 7))))) (* 16 (/ 1 (pow re 6))))) (* 4 (/ 1 (pow re 4)))))
(/ 1/2 im)
(/ (+ 1/2 (* 1/2 (/ re im))) im)
(/ (- (+ 1/2 (+ (* -1/4 (/ (pow re 2) (pow im 2))) (* 1/2 (/ re im)))) (* -1/2 (/ (pow re 2) (pow im 2)))) im)
(/ (- (+ 1/2 (+ (* -1 (/ (+ (* -1/2 (pow re 3)) (* 1/2 (pow re 3))) (pow im 3))) (+ (* -1/4 (/ (pow re 2) (pow im 2))) (* 1/2 (/ re im))))) (* -1/2 (/ (pow re 2) (pow im 2)))) im)
(/ 1/2 im)
(* -1 (/ (- (* -1/2 (/ re im)) 1/2) im))
(* -1 (/ (- (* -1 (/ (- (+ (* -1/4 (/ (pow re 2) im)) (* 1/2 re)) (* -1/2 (/ (pow re 2) im))) im)) 1/2) im))
(* -1 (/ (- (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (* -1/4 (pow re 2)) (* -1/2 (pow re 2)))) (* -1 (/ (+ (* -1/2 (pow re 3)) (* 1/2 (pow re 3))) im))) im)) (* 1/2 re)) im)) 1/2) im))
(/ 1/2 im)
(+ (* 1/2 (/ re (pow im 2))) (* 1/2 (/ 1 im)))
(+ (* re (+ (* 1/4 (/ re (pow im 3))) (* 1/2 (/ 1 (pow im 2))))) (* 1/2 (/ 1 im)))
(+ (* re (+ (* re (+ (* -1/16 (/ (pow re 2) (pow im 5))) (* 1/4 (/ 1 (pow im 3))))) (* 1/2 (/ 1 (pow im 2))))) (* 1/2 (/ 1 im)))
(* -4 (/ (pow im 3) (pow re 4)))
(/ (- (+ (* -4 (pow im 3)) (* 16 (/ (pow im 5) (pow re 2)))) (* 32 (/ (pow im 5) (pow re 2)))) (pow re 4))
(/ (- (+ (* -32 (/ (pow im 6) (pow re 3))) (+ (* -4 (pow im 3)) (* 16 (/ (pow im 5) (pow re 2))))) (+ (* -64 (/ (pow im 6) (pow re 3))) (* 32 (/ (pow im 5) (pow re 2))))) (pow re 4))
(/ (- (+ (* -32 (/ (pow im 6) (pow re 3))) (+ (* -32 (/ (pow im 7) (pow re 4))) (+ (* -4 (pow im 3)) (* 16 (/ (pow im 5) (pow re 2)))))) (+ (* -64 (/ (pow im 6) (pow re 3))) (+ (* -64 (/ (pow im 7) (pow re 4))) (+ (* -8 (/ (* (pow im 2) (- (* 16 (pow im 5)) (* 32 (pow im 5)))) (pow re 4))) (* 32 (/ (pow im 5) (pow re 2))))))) (pow re 4))
(* -4 (/ (pow im 3) (pow re 4)))
(/ (- (+ (* -4 (pow im 3)) (* 16 (/ (pow im 5) (pow re 2)))) (* 32 (/ (pow im 5) (pow re 2)))) (pow re 4))
(/ (- (+ (* -4 (pow im 3)) (+ (* -1 (/ (- (* 32 (pow im 6)) (* 64 (pow im 6))) (pow re 3))) (* 16 (/ (pow im 5) (pow re 2))))) (* 32 (/ (pow im 5) (pow re 2)))) (pow re 4))
(/ (- (+ (* -4 (pow im 3)) (+ (* -1 (/ (- (+ (* -1 (/ (- (* -32 (pow im 7)) (+ (* -64 (pow im 7)) (* -8 (* (pow im 2) (- (* 16 (pow im 5)) (* 32 (pow im 5))))))) re)) (* 32 (pow im 6))) (* 64 (pow im 6))) (pow re 3))) (* 16 (/ (pow im 5) (pow re 2))))) (* 32 (/ (pow im 5) (pow re 2)))) (pow re 4))
(* 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)))))
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))))))))
(* 2 (/ im (pow re 2)))
(* 2 (/ im (pow re 2)))
(* 2 (/ im (pow re 2)))
(* 2 (/ im (pow re 2)))
(* 2 (/ im (pow re 2)))
(* 2 (/ im (pow re 2)))
(* 2 (/ im (pow re 2)))
(* 2 (/ im (pow re 2)))
(* 2 (/ im (pow re 2)))
(* 2 (/ im (pow re 2)))
(* 2 (/ im (pow re 2)))
(* 2 (/ im (pow re 2)))
(* 2 (/ im (pow re 2)))
(* 2 (/ im (pow re 2)))
(* 2 (/ im (pow re 2)))
(* 2 (/ im (pow re 2)))
(* 2 (/ im (pow re 2)))
(* 2 (/ im (pow re 2)))
(* 2 (/ im (pow re 2)))
(* 2 (/ im (pow re 2)))
(* 2 (/ im (pow re 2)))
(* 2 (/ im (pow re 2)))
(* 2 (/ im (pow re 2)))
(* 2 (/ im (pow re 2)))
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(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 (*.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))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.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))))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 re (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))))) (*.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)))))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.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))))
(+ (* -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)))))
(+.f64 (*.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 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.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)))))
(+ (* -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))))))
(+.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.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)))) (+.f64 (*.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/64 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))) (sqrt.f64 #s(literal 1/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)))))))
(+.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.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)))) (+.f64 (+.f64 (*.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/64 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal -1/1024 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (*.f64 (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)))))))))
(* -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)))))))
(*.f64 (+.f64 (*.f64 #s(literal -1/8 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 #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 #s(literal 0 binary64) 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 (-.f64 (*.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/32 binary64) (*.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))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) 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 #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/32 binary64) (*.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))))))) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.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))))
(* 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 (+.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/2 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 (+ (* 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 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (*.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/256 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 re)) (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)))) (* (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 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.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 im im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im im)) (+.f64 (*.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/256 binary64) (*.f64 #s(literal 1/2 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 #s(literal 1/4 binary64) (sqrt.f64 re)) (*.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/256 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/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 (+.f64 (*.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)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (*.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)))))) (+.f64 (*.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/8 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 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 (+.f64 (*.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)))))) (+.f64 (+.f64 (*.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/8 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 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 (+.f64 (*.f64 #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 -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 #s(literal 0 binary64) 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 (+.f64 (*.f64 #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 -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (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/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)))))))) (-.f64 #s(literal 0 binary64) 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 (+.f64 (*.f64 #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 -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 im) (*.f64 re re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) #s(literal 3/16 binary64)) (*.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(-.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 re (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (-.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 re #s(literal 2 binary64))))))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (* im (sqrt (/ 1 re))))
(+.f64 (*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re)))))
(+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (+.f64 (*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* -1/128 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re))))))
(+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 (*.f64 #s(literal -1/128 binary64) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))) (+.f64 (*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(* -2 (* (sqrt re) (sqrt -1)))
(*.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -1 binary64)))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(*.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 #s(literal 0 binary64) 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))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (+.f64 (*.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 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) #s(literal 1/4 binary64))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (+.f64 (*.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 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/64 binary64) (*.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))))))))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (+ (sqrt (/ 1 re)) (* -1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))
(*.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* 7/128 (* (pow im 2) (sqrt (/ 1 (pow re 9)))))))))
(*.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/8 binary64)) (*.f64 (*.f64 #s(literal 7/128 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* (pow im 2) (+ (* -33/1024 (* (pow im 2) (sqrt (/ 1 (pow re 13))))) (* 7/128 (sqrt (/ 1 (pow re 9))))))))))
(*.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/8 binary64)) (*.f64 (*.f64 im im) (+.f64 (*.f64 (*.f64 #s(literal -33/1024 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 13 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) #s(literal 7/128 binary64))))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(*.f64 im (-.f64 (*.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 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (-.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (-.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (*.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 re (sqrt.f64 #s(literal 2 binary64))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (-.f64 (+.f64 (*.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) (pow.f64 im #s(literal 5 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt 2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (-.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) im))
(pow (* 2 im) 1/4)
(pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64))
(+ (* -1/4 (* (pow (/ 2 (pow im 3)) 1/4) re)) (pow (* 2 im) 1/4))
(+.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) (*.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 im (*.f64 im im))) #s(literal 1/4 binary64))) re))
(+ (* re (+ (* -1/4 (pow (/ 2 (pow im 3)) 1/4)) (* 1/32 (* (pow (/ 2 (pow im 7)) 1/4) re)))) (pow (* 2 im) 1/4))
(+.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) (*.f64 re (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 im (*.f64 im im))) #s(literal 1/4 binary64))) (*.f64 #s(literal 1/32 binary64) (*.f64 re (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 7 binary64))) #s(literal 1/4 binary64)))))))
(+ (* re (+ (* -1/4 (pow (/ 2 (pow im 3)) 1/4)) (* re (+ (* 1/32 (pow (/ 2 (pow im 7)) 1/4)) (* 5/128 (* (pow (/ 2 (pow im 11)) 1/4) re)))))) (pow (* 2 im) 1/4))
(+.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) (*.f64 re (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 im (*.f64 im im))) #s(literal 1/4 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 7 binary64))) #s(literal 1/4 binary64))) (*.f64 #s(literal 5/128 binary64) (*.f64 re (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 11 binary64))) #s(literal 1/4 binary64)))))))))
(exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))))) (*.f64 re re)))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))))) (*.f64 re re)) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (/.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64)))) (pow.f64 re #s(literal 4 binary64))))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/1536 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/24576 (pow im 6)) (* 1/2880 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))))) (*.f64 re re)) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (/.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64)))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/1536 binary64) (*.f64 im im)) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64))) (*.f64 #s(literal -1/24576 binary64) (pow.f64 im #s(literal 6 binary64)))) (*.f64 #s(literal 1/2880 binary64) (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (*.f64 im im))) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 75/4 binary64)))))) (pow.f64 re #s(literal 6 binary64))))))
(exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re)))))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))))) (*.f64 re re)))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))))) (*.f64 re re)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64))))) (pow.f64 re #s(literal 4 binary64)))))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/24576 (pow im 6)) (+ (* 1/2880 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6))))) (* 1/1536 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (pow re 6)) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))))) (*.f64 re re)) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 1/24576 binary64)) (+.f64 (*.f64 #s(literal 1/2880 binary64) (+.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 15/4 binary64)) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 135/4 binary64)))) (*.f64 (*.f64 #s(literal 1/1536 binary64) (*.f64 im im)) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64)))))) (pow.f64 re #s(literal 6 binary64))))))
(exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))))) (*.f64 re re)))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/16 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* 13/512 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 4))))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))) (*.f64 re re)) (/.f64 (*.f64 #s(literal 13/512 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))))) (pow.f64 re #s(literal 4 binary64))))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/16 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* (pow im 2) (+ (* -119/8192 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 6))) (* 13/512 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 4))))))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))) (*.f64 re re)) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -119/8192 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))))) (pow.f64 re #s(literal 6 binary64))) (/.f64 (*.f64 #s(literal 13/512 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))) (pow.f64 re #s(literal 4 binary64))))))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))) im))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))) im) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (/.f64 (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 re re)) #s(literal 0 binary64)) (*.f64 im im)))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/384 (pow re 3)) (* 1/24 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) (pow im 3)) (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))) im) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 re #s(literal 0 binary64))) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/384 binary64)) (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/24 binary64))))) (*.f64 im (*.f64 im im)))) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (/.f64 (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 re re)) #s(literal 0 binary64)) (*.f64 im im)))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* 1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))))) im))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* -1/4 (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(-.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) re) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 re re)) #s(literal 0 binary64)) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) im)) im))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* -1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/384 (pow re 3)) (* 1/24 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) im)) (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* -1/4 (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(-.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) re) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (-.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 re re)) #s(literal 0 binary64)) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 re #s(literal 0 binary64))) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/384 binary64)) (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/24 binary64)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) im)) im)) im))
(pow (* 2 im) 1/8)
(pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/8 binary64))
(+ (* -1/8 (* (pow (/ 2 (pow im 7)) 1/8) re)) (pow (* 2 im) 1/8))
(+.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/8 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 re (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 7 binary64))) #s(literal 1/8 binary64)))))
(+ (* re (+ (* -1/8 (pow (/ 2 (pow im 7)) 1/8)) (* 1/128 (* (pow (/ 2 (pow im 15)) 1/8) re)))) (pow (* 2 im) 1/8))
(+.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/8 binary64)) (*.f64 re (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 7 binary64))) #s(literal 1/8 binary64))) (*.f64 #s(literal 1/128 binary64) (*.f64 re (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 15 binary64))) #s(literal 1/8 binary64)))))))
(+ (* re (+ (* -1/8 (pow (/ 2 (pow im 7)) 1/8)) (* re (+ (* 1/128 (pow (/ 2 (pow im 15)) 1/8)) (* 21/1024 (* (pow (/ 2 (pow im 23)) 1/8) re)))))) (pow (* 2 im) 1/8))
(+.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/8 binary64)) (*.f64 re (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 7 binary64))) #s(literal 1/8 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal 1/128 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 15 binary64))) #s(literal 1/8 binary64))) (*.f64 #s(literal 21/1024 binary64) (*.f64 re (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 23 binary64))) #s(literal 1/8 binary64)))))))))
(exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))
(exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))))) (*.f64 re re)))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (+.f64 (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))))) (*.f64 re re)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/2048 binary64)) (*.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64)) #s(literal 1/192 binary64)))) (pow.f64 re #s(literal 4 binary64)))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/6144 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/196608 (pow im 6)) (* 1/5760 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (+.f64 (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))))) (*.f64 re re)) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/2048 binary64)) (*.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64)) #s(literal 1/192 binary64)))) (pow.f64 re #s(literal 4 binary64))) (*.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/6144 binary64) (*.f64 im im)) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64))) (+.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal -1/196608 binary64)) (*.f64 (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (*.f64 im im))) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 75/4 binary64))) #s(literal 1/5760 binary64)))) (pow.f64 re #s(literal 6 binary64)))))))
(exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))
(exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re)))))
(+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (/.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))))) (*.f64 re re)))
(+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (/.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))))) (*.f64 re re)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/2048 binary64)) (*.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64)) #s(literal 1/192 binary64)))) (pow.f64 re #s(literal 4 binary64)))))
(+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/196608 (pow im 6)) (+ (* 1/6144 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))))) (* 1/5760 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (/.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))))) (*.f64 re re)) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/2048 binary64)) (*.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64)) #s(literal 1/192 binary64)))) (pow.f64 re #s(literal 4 binary64))) (*.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (/.f64 (+.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 1/196608 binary64)) (*.f64 (*.f64 #s(literal 1/6144 binary64) (*.f64 im im)) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64)))) (*.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 15/4 binary64)) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 135/4 binary64))) #s(literal 1/5760 binary64))) (pow.f64 re #s(literal 6 binary64)))))))
(exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))
(exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))))) (*.f64 re re)))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/32 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* 25/2048 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 4))))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -1/32 binary64) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))) (*.f64 re re)) (/.f64 (*.f64 #s(literal 25/2048 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))))) (pow.f64 re #s(literal 4 binary64))))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/32 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* (pow im 2) (+ (* -451/65536 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 6))) (* 25/2048 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 4))))))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -1/32 binary64) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))) (*.f64 re re)) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -451/65536 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))))) (pow.f64 re #s(literal 6 binary64))) (/.f64 (*.f64 #s(literal 25/2048 binary64) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))) (pow.f64 re #s(literal 4 binary64))))))))
(exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))
(+.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))) im))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))) im) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 1/128 binary64)) #s(literal 0 binary64))) (*.f64 im im))))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/128 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/3072 (pow re 3)) (* 1/48 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) (pow im 3)) (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))
(+.f64 (+.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))) im)) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 1/128 binary64)) #s(literal 0 binary64))) (*.f64 im im)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (*.f64 #s(literal -1/128 binary64) (*.f64 re #s(literal 0 binary64))) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/3072 binary64)) (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/48 binary64))))) (*.f64 im (*.f64 im im)))))
(exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))
(exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* 1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))
(+.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))))) im))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* -1/8 (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(-.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) re) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (*.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/128 binary64)) #s(literal 0 binary64)) im))) im))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* -1/128 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/3072 (pow re 3)) (* 1/48 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) im)) (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* -1/8 (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(-.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) re) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/128 binary64)) #s(literal 0 binary64)) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal -1/128 binary64) (*.f64 re #s(literal 0 binary64))) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/3072 binary64)) (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/48 binary64)))) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) im)) im)) im))
(* 1/2 (* (sqrt re) (sqrt -4)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(* -1 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(* -1 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(* -1 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(* -1 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(* -2 (* (sqrt re) (sqrt -1)))
(*.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -1 binary64)))
(* -2 (* (sqrt re) (sqrt -1)))
(*.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -1 binary64)))
(* -2 (* (sqrt re) (sqrt -1)))
(*.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -1 binary64)))
(* -2 (* (sqrt re) (sqrt -1)))
(*.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -1 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))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* 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 (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 0 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 (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 #s(literal 0 binary64) im))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 #s(literal 0 binary64) im))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 #s(literal 0 binary64) im))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 #s(literal 0 binary64) im))
(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))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1 binary64))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1 binary64))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1 binary64))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1 binary64))
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 re (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 re (*.f64 #s(literal 1/4 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 re #s(literal 2 binary64))))))))))
(* 1/2 (* (sqrt (/ 1 im)) re))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im)))))
(*.f64 re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 im) re)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* 1/2 (sqrt (/ 1 im))))))
(*.f64 re (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 im) re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 im) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) (*.f64 re re)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (+ (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3)))) (* 1/2 (sqrt (/ 1 im)))))))
(*.f64 re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 im) re)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 im) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) (*.f64 re re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) (*.f64 re (*.f64 re re))))))))
(* -1/2 (* (sqrt (/ 1 im)) re))
(*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re))
(* -1 (* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im))))))
(*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 im) re)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (- (* 2 im) im) re))) (* 1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 im)) (/.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) im) re)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im))) re)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (sqrt im) (- (* 2 im) im))) (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re)))) re)) (* 1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (*.f64 (sqrt.f64 im) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (/.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) im) re)))) re)) re)) (-.f64 #s(literal 0 binary64) re))
(* 1/2 (* (sqrt (/ 1 im)) re))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re))
(/ (+ (* -1/2 (sqrt (pow im 3))) (* 1/2 (* (sqrt im) re))) im)
(/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 im (*.f64 im im)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) re))) im)
(/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* -1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re)))))) im)
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 im) re))))) im)
(/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* -1/2 (sqrt (/ 1 im))) (* im (+ (* -1/4 (* (sqrt (/ 1 im)) (/ 1 re))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 re)))))))) im)
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal -1/2 binary64)) (*.f64 im (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re) #s(literal 1/4 binary64)))))) im)
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (+.f64 (*.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/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 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)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (*.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 2 binary64))))) (+.f64 (*.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 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(*.f64 im (+.f64 (*.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 2 binary64))))) (+.f64 (+.f64 (*.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 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (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 re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (*.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)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(*.f64 (+.f64 (*.f64 #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 -1 binary64))) (sqrt.f64 #s(literal -2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))) (-.f64 #s(literal 0 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)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(*.f64 (+.f64 (*.f64 #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 -1 binary64))) (sqrt.f64 #s(literal -2 binary64))))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (sqrt.f64 #s(literal -2 binary64)))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(*.f64 (-.f64 (+.f64 (*.f64 #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 -1 binary64))) (sqrt.f64 #s(literal -2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 im)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 im)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64)))))) (*.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(-.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 re (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (-.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 re #s(literal 2 binary64))))))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(* (sqrt (/ 1 im)) re)
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re)
(* re (+ (sqrt (/ 1 im)) (* -1 (* (sqrt im) (/ 1 re)))))
(*.f64 re (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) re)))
(* re (+ (sqrt (/ 1 im)) (+ (* -1 (* (sqrt im) (/ 1 re))) (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))))))
(*.f64 re (+.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 im) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) (*.f64 re re)))))
(* re (+ (sqrt (/ 1 im)) (+ (* -1 (* (sqrt im) (/ 1 re))) (+ (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3))))))))
(*.f64 re (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 im) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) (*.f64 re re)) (/.f64 (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) (*.f64 re (*.f64 re re))))) (/.f64 (sqrt.f64 im) re))))
(* -1 (* (sqrt (/ 1 im)) re))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (* (sqrt im) (/ 1 re))))))
(*.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) re)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (sqrt im) (* -1/2 (* (sqrt im) (/ (- (* 2 im) im) re)))) re)))))
(*.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (+.f64 (sqrt.f64 im) (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (/.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) im) re))) re)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (sqrt im) (* -1 (/ (+ (* 1/2 (* (sqrt im) (- (* 2 im) im))) (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re)))) re))) re)))))
(*.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (-.f64 (sqrt.f64 im) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 im) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (/.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) im) re)))) re)) re)) (-.f64 #s(literal 0 binary64) re))
(* (sqrt (/ 1 im)) re)
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re)
(/ (+ (* -1 (sqrt (pow im 3))) (* (sqrt im) re)) im)
(/.f64 (-.f64 (*.f64 (sqrt.f64 im) re) (sqrt.f64 (*.f64 im (*.f64 im im)))) im)
(/ (+ (* (sqrt im) re) (* (pow im 2) (+ (* -1 (sqrt (/ 1 im))) (* (sqrt im) (/ 1 re))))) im)
(/.f64 (+.f64 (*.f64 (sqrt.f64 im) re) (*.f64 (*.f64 im im) (-.f64 (/.f64 (sqrt.f64 im) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))) im)
(/ (+ (* (sqrt im) re) (* (pow im 2) (+ (* -1 (sqrt (/ 1 im))) (* im (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 re))) (* (sqrt (/ 1 im)) (/ 1 re))))))) im)
(/.f64 (+.f64 (*.f64 (sqrt.f64 im) re) (*.f64 (*.f64 im im) (-.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))) im)
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(*.f64 im (-.f64 (*.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 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (-.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (-.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (*.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 re (sqrt.f64 #s(literal 2 binary64))))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(*.f64 (-.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (sqrt.f64 #s(literal -2 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(*.f64 (-.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64)))))) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))
(/ (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 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 im #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 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 im #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 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 im re))) re)))
(* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im)))
(*.f64 (*.f64 re re) (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 im re))) re)))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal -2 binary64) (*.f64 im re))) im)
(/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)
(/.f64 (+.f64 (*.f64 re re) (*.f64 im (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64))))) im)
(/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)
(/.f64 (+.f64 (*.f64 re re) (*.f64 im (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64))))) im)
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) (/.f64 (*.f64 re re) (*.f64 im im))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) (/.f64 (*.f64 re re) (*.f64 im im))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* -1 (* im (- (* 2 (/ re im)) 2)))
(*.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) re) im) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))
(*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im)) im)) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))
(*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im)) im)) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))
(/ (+ (* 1/4 (* (sqrt (pow im 5)) (/ (- (* 2 (pow re 2)) (pow re 2)) (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4))))) (pow im 2))
(/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (sqrt.f64 (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal -1/4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 re re)) (*.f64 re re)) #s(literal -1 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 im im))
(/ (+ (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (* (pow im 3) (+ (* 1/4 (* (sqrt im) (/ (- (* -4 re) (* -2 re)) (* (pow re 2) (sqrt -1/4))))) (* 1/4 (* (sqrt (/ 1 im)) (/ (- (* 2 (pow re 2)) (pow re 2)) (* (pow re 2) (sqrt -1/4)))))))) (pow im 2))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 im) (*.f64 re #s(literal -2 binary64))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1/4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 re re)) (*.f64 re re)) #s(literal -1 binary64))))))) (*.f64 im im))
(/ (+ (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (* (pow im 3) (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (- (* 2 (pow re 2)) (pow re 2)) (* (pow re 2) (sqrt -1/4))))) (* im (+ (* -1/4 (* (sqrt im) (/ (+ 2 (* -4 (/ (- (* 2 (pow re 2)) (pow re 2)) (pow re 2)))) (* (pow re 2) (sqrt -1/4))))) (* 1/4 (* (sqrt (/ 1 im)) (/ (- (* -4 re) (* -2 re)) (* (pow re 2) (sqrt -1/4)))))))))) (pow im 2))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))) (*.f64 (*.f64 im (*.f64 im im)) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1/4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 re re)) (*.f64 re re)) #s(literal -1 binary64)))) (*.f64 im (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sqrt.f64 im) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 re re)) (*.f64 re re)) #s(literal -1 binary64))))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 re #s(literal -2 binary64))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))))))))) (*.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)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (+.f64 (*.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/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 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)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (*.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 2 binary64))))) (+.f64 (*.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 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(*.f64 im (+.f64 (*.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 2 binary64))))) (+.f64 (+.f64 (*.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 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (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 re)) (*.f64 #s(literal 2 binary64) (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)))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.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 re (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2))))))))
(*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.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 re (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 re)) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/4 (* (sqrt im) (/ (pow re 2) (sqrt 2)))) (* 1/4 (* (sqrt im) (/ (pow re 2) (pow (sqrt 2) 3))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2))))))))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.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 re (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 im) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 im) (*.f64 re re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 re (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 re (*.f64 #s(literal 1/4 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 re #s(literal 2 binary64))))))))))
(* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))
(* (pow re 2) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(*.f64 (*.f64 re re) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64))))))
(* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))
(*.f64 (*.f64 re re) (+.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 (*.f64 re (*.f64 re re)) (sqrt.f64 #s(literal -1/4 binary64)))))))
(* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* -1/4 (* (sqrt (pow im 3)) (/ (+ (* -2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* (pow re 4) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))))
(*.f64 (*.f64 re re) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 (*.f64 re (*.f64 re re)) (sqrt.f64 #s(literal -1/4 binary64))))) (+.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (+.f64 (*.f64 im #s(literal -2 binary64)) (/.f64 (*.f64 #s(literal 1/4 binary64) im) #s(literal -1/4 binary64)))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (sqrt.f64 #s(literal -1/4 binary64))))))))
(* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))
(* (pow re 2) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(*.f64 (*.f64 re re) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64))))))
(* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))
(*.f64 (*.f64 re re) (+.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 (*.f64 re (*.f64 re re)) (sqrt.f64 #s(literal -1/4 binary64)))))))
(* (pow re 2) (+ (* -1 (/ (+ (* 1/4 (* (sqrt (pow im 3)) (/ (+ (* -2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* re (sqrt -1/4))))) (* 1/2 (* (sqrt (pow im 3)) (/ 1 (sqrt -1/4))))) (pow re 3))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))
(*.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64))))) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (/.f64 (+.f64 (*.f64 im #s(literal -2 binary64)) (/.f64 (*.f64 #s(literal 1/4 binary64) im) #s(literal -1/4 binary64))) (*.f64 re (sqrt.f64 #s(literal -1/4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 re (*.f64 re re)))))
(* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))
(/ (+ (* 1/2 (* (sqrt (pow im 5)) (/ (- (* 2 (pow re 2)) (pow re 2)) (* (pow re 2) (sqrt -1/4))))) (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (pow im 2))
(/.f64 (+.f64 (*.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (sqrt.f64 (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal -1/4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 re re)) (*.f64 re re)) #s(literal -1 binary64))))) (*.f64 im im))
(/ (+ (* (sqrt im) (* (pow re 2) (sqrt -1/4))) (* (pow im 3) (+ (* 1/2 (* (sqrt im) (/ (- (* -4 re) (* -2 re)) (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 im)) (/ (- (* 2 (pow re 2)) (pow re 2)) (* (pow re 2) (sqrt -1/4)))))))) (pow im 2))
(/.f64 (+.f64 (*.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 im) (*.f64 re #s(literal -2 binary64))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1/4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 re re)) (*.f64 re re)) #s(literal -1 binary64))))))) (*.f64 im im))
(/ (+ (* (sqrt im) (* (pow re 2) (sqrt -1/4))) (* (pow im 3) (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (* 2 (pow re 2)) (pow re 2)) (* (pow re 2) (sqrt -1/4))))) (* im (+ (* -1/2 (* (sqrt im) (/ (+ 2 (* -4 (/ (- (* 2 (pow re 2)) (pow re 2)) (pow re 2)))) (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 im)) (/ (- (* -4 re) (* -2 re)) (* (pow re 2) (sqrt -1/4)))))))))) (pow im 2))
(/.f64 (+.f64 (*.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))) (*.f64 (*.f64 im (*.f64 im im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1/4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 re re)) (*.f64 re re)) #s(literal -1 binary64)))) (*.f64 im (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 im) (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -4 binary64) (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 re re)) (*.f64 re re)) #s(literal -1 binary64))))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))))))))) (*.f64 im im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(*.f64 im (-.f64 (*.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 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (-.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (-.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (*.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 re (sqrt.f64 #s(literal 2 binary64))))))
(* -1 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* -1 (* im (+ (* (sqrt (/ 1 im)) (sqrt 2)) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2))))))
(*.f64 (+.f64 (*.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 re (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (+ (* (sqrt (/ 1 im)) (sqrt 2)) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))))
(*.f64 (+.f64 (+.f64 (*.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 re (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (pow re 2) (pow (sqrt 2) 3))))) (pow im 3))) (+ (* (sqrt (/ 1 im)) (sqrt 2)) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))))
(*.f64 (-.f64 (+.f64 (*.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 re (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 im) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 im) (*.f64 re re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(-.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 re (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (-.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 re #s(literal 2 binary64))))))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))
(* (pow re 2) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))
(*.f64 (*.f64 re re) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))))))
(* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(*.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))))) (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 (*.f64 re (*.f64 re re)) (sqrt.f64 #s(literal -1/4 binary64))))))
(* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* -1/2 (* (sqrt (pow im 3)) (/ (+ (* -2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* (pow re 4) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))
(*.f64 (*.f64 re re) (-.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (+.f64 (*.f64 im #s(literal -2 binary64)) (/.f64 (*.f64 #s(literal 1/4 binary64) im) #s(literal -1/4 binary64)))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (sqrt.f64 #s(literal -1/4 binary64)))))) (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 (*.f64 re (*.f64 re re)) (sqrt.f64 #s(literal -1/4 binary64))))))
(* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))
(* (pow re 2) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))
(*.f64 (*.f64 re re) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))))))
(* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(*.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))))) (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 (*.f64 re (*.f64 re re)) (sqrt.f64 #s(literal -1/4 binary64))))))
(* (pow re 2) (+ (* -1 (/ (+ (* 1/2 (* (sqrt (pow im 3)) (/ (+ (* -2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* re (sqrt -1/4))))) (* (sqrt (pow im 3)) (/ 1 (sqrt -1/4)))) (pow re 3))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(*.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))))) (/.f64 (+.f64 (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (sqrt.f64 #s(literal -1/4 binary64))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (*.f64 im im)))) (/.f64 (+.f64 (*.f64 im #s(literal -2 binary64)) (/.f64 (*.f64 #s(literal 1/4 binary64) im) #s(literal -1/4 binary64))) (*.f64 re (sqrt.f64 #s(literal -1/4 binary64)))))) (*.f64 re (*.f64 re re)))))
(* (sqrt (pow im 3)) (/ (sqrt -4) (pow re 2)))
(/.f64 (*.f64 (sqrt.f64 #s(literal -4 binary64)) (sqrt.f64 (*.f64 im (*.f64 im im)))) (*.f64 re re))
(* im (+ (* -8 (* (sqrt (pow im 5)) (/ 1 (* (pow re 4) (sqrt -4))))) (* (sqrt im) (/ (sqrt -4) (pow re 2)))))
(*.f64 im (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (sqrt.f64 (pow.f64 im #s(literal 5 binary64))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (sqrt.f64 #s(literal -4 binary64))))) (*.f64 (/.f64 (sqrt.f64 im) re) (/.f64 (sqrt.f64 #s(literal -4 binary64)) re))))
(* im (+ (* (sqrt im) (/ (sqrt -4) (pow re 2))) (* (pow im 3) (+ (* -8 (* (sqrt (/ 1 im)) (/ 1 (* (pow re 4) (sqrt -4))))) (* 16 (* (sqrt im) (/ 1 (* (pow re 5) (sqrt -4)))))))))
(*.f64 im (+.f64 (*.f64 (/.f64 (sqrt.f64 im) re) (/.f64 (sqrt.f64 #s(literal -4 binary64)) re)) (*.f64 (*.f64 im (*.f64 im im)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (sqrt.f64 #s(literal -4 binary64))))) (*.f64 #s(literal 16 binary64) (/.f64 (sqrt.f64 im) (*.f64 (pow.f64 re #s(literal 5 binary64)) (sqrt.f64 #s(literal -4 binary64)))))))))
(* im (+ (* (sqrt im) (/ (sqrt -4) (pow re 2))) (* (pow im 3) (+ (* -8 (* (sqrt (/ 1 im)) (/ 1 (* (pow re 4) (sqrt -4))))) (* im (+ (* -48 (* (sqrt im) (/ 1 (* (pow re 6) (sqrt -4))))) (* 16 (* (sqrt (/ 1 im)) (/ 1 (* (pow re 5) (sqrt -4)))))))))))
(*.f64 im (+.f64 (*.f64 (/.f64 (sqrt.f64 im) re) (/.f64 (sqrt.f64 #s(literal -4 binary64)) re)) (*.f64 (*.f64 im (*.f64 im im)) (+.f64 (*.f64 #s(literal -8 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (sqrt.f64 #s(literal -4 binary64))))) (*.f64 im (+.f64 (*.f64 #s(literal -48 binary64) (/.f64 (sqrt.f64 im) (*.f64 (pow.f64 re #s(literal 6 binary64)) (sqrt.f64 #s(literal -4 binary64))))) (*.f64 #s(literal 16 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (pow.f64 re #s(literal 5 binary64)) (sqrt.f64 #s(literal -4 binary64)))))))))))
(* (sqrt (/ 1 im)) (sqrt 1/2))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 1/2)))) (* (sqrt (/ 1 im)) (sqrt 1/2)))
(+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 1/2 binary64))) (*.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/2 binary64))))))
(+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 1/2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (- (* -1/4 (pow re 2)) (* -1/2 (pow re 2))) (sqrt 1/2)))) (* (sqrt (/ 1 im)) (sqrt 1/2))))
(+.f64 (*.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/2 binary64))))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re re) #s(literal 1/4 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))))
(+ (* -1/2 (* (sqrt (/ 1 (pow im 7))) (/ (+ (* -1/2 (pow re 3)) (+ (* 1/16 (/ (* im (pow re 2)) (pow (sqrt 1/2) 2))) (* 1/2 (pow re 3)))) (sqrt 1/2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 1/2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (- (* -1/4 (pow re 2)) (* -1/2 (pow re 2))) (sqrt 1/2)))) (* (sqrt (/ 1 im)) (sqrt 1/2)))))
(+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64))))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 re (*.f64 re re))) (+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 im (*.f64 re re))) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.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/2 binary64)))))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re re) #s(literal 1/4 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))))
(* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 1/2)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)))
(+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 1/2)))) (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 1/2))))
(+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 1/2 binary64)))))))
(+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow (sqrt -1) 2) (- (* -1/4 (pow re 2)) (* -1/2 (pow re 2)))) (sqrt 1/2)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 1/2)))) (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 1/2)))))
(+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 1/2 binary64))))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 #s(literal -1/4 binary64) (*.f64 re re))) (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow (sqrt -1) 2) (- (* -1/4 (pow re 2)) (* -1/2 (pow re 2)))) (sqrt 1/2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* (pow (sqrt -1) 2) (+ (* -1/2 (pow re 3)) (+ (* -1/16 (/ (* im (pow re 2)) (pow (sqrt 1/2) 2))) (* 1/2 (pow re 3))))) (sqrt 1/2))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 1/2)))) (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 1/2)))))
(-.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 1/2 binary64))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 im) (*.f64 #s(literal -1/4 binary64) (*.f64 re re))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal -1 binary64) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re (*.f64 re re))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 im (*.f64 re re))) #s(literal 1/2 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 im (*.f64 im im))))
(* (sqrt (/ 1 im)) (sqrt 1/2))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 1/2)))) (* (sqrt (/ 1 im)) (sqrt 1/2)))
(+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 1/2 binary64))) (*.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/2 binary64))))))
(+ (* re (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ 1 (sqrt 1/2)))) (* 1/2 (* (sqrt im) (/ (* re (- (* 1/4 (/ 1 (pow im 3))) (* 1/16 (/ 1 (* (pow im 3) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))) (* (sqrt (/ 1 im)) (sqrt 1/2)))
(+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (/.f64 (*.f64 re (-.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1/16 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (*.f64 im im)))))) (sqrt.f64 #s(literal 1/2 binary64)))))))
(+ (* re (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ 1 (sqrt 1/2)))) (* re (+ (* -1/8 (* (sqrt (/ 1 im)) (/ (* re (- (* 1/4 (/ 1 (pow im 3))) (* 1/16 (/ 1 (* (pow im 3) (pow (sqrt 1/2) 2)))))) (pow (sqrt 1/2) 3)))) (* 1/2 (* (sqrt im) (/ (- (* 1/4 (/ 1 (pow im 3))) (* 1/16 (/ 1 (* (pow im 3) (pow (sqrt 1/2) 2))))) (sqrt 1/2)))))))) (* (sqrt (/ 1 im)) (sqrt 1/2)))
(+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 re (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (*.f64 re (-.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1/16 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (/.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1/16 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (*.f64 im im))))) (sqrt.f64 #s(literal 1/2 binary64)))))))))
(* (sqrt (pow im 3)) (/ (sqrt -4) (pow re 2)))
(/.f64 (*.f64 (sqrt.f64 #s(literal -4 binary64)) (sqrt.f64 (*.f64 im (*.f64 im im)))) (*.f64 re re))
(/ (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* 16 (pow im 5)) (* 32 (pow im 5))) (* (pow re 2) (sqrt -4))))) (* (sqrt (pow im 3)) (sqrt -4))) (pow re 2))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal -16 binary64))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -4 binary64))))) (*.f64 (sqrt.f64 #s(literal -4 binary64)) (sqrt.f64 (*.f64 im (*.f64 im im))))) (*.f64 re re))
(/ (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* -32 (pow im 6)) (* -64 (pow im 6))) (* (pow re 3) (sqrt -4))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* 16 (pow im 5)) (* 32 (pow im 5))) (* (pow re 2) (sqrt -4))))) (* (sqrt (pow im 3)) (sqrt -4)))) (pow re 2))
(/.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal -16 binary64))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -4 binary64))))) (*.f64 (sqrt.f64 #s(literal -4 binary64)) (sqrt.f64 (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 32 binary64) (sqrt.f64 #s(literal -4 binary64)))))) (*.f64 re re))
(/ (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* -32 (pow im 6)) (* -64 (pow im 6))) (* (pow re 3) (sqrt -4))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* -32 (pow im 7)) (+ (* -64 (pow im 7)) (+ (* -8 (* (pow im 2) (- (* 16 (pow im 5)) (* 32 (pow im 5))))) (* 1/4 (/ (pow (- (* 16 (pow im 5)) (* 32 (pow im 5))) 2) (* (pow im 3) (pow (sqrt -4) 2))))))) (* (pow re 4) (sqrt -4))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* 16 (pow im 5)) (* 32 (pow im 5))) (* (pow re 2) (sqrt -4))))) (* (sqrt (pow im 3)) (sqrt -4))))) (pow re 2))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 32 binary64) (sqrt.f64 #s(literal -4 binary64))))) (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal -16 binary64))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -4 binary64))))) (*.f64 (sqrt.f64 #s(literal -4 binary64)) (sqrt.f64 (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (/.f64 (-.f64 (*.f64 (pow.f64 im #s(literal 7 binary64)) #s(literal -32 binary64)) (+.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 7 binary64)) #s(literal -64 binary64)) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 im im)) (*.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal -16 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal -16 binary64)) #s(literal 2 binary64)) (*.f64 im (*.f64 im im)))))) (*.f64 (pow.f64 re #s(literal 4 binary64)) (sqrt.f64 #s(literal -4 binary64))))))) (*.f64 re re))
(* (sqrt (pow im 3)) (/ (sqrt -4) (pow re 2)))
(/.f64 (*.f64 (sqrt.f64 #s(literal -4 binary64)) (sqrt.f64 (*.f64 im (*.f64 im im)))) (*.f64 re re))
(/ (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* 16 (pow im 5)) (* 32 (pow im 5))) (* (pow re 2) (sqrt -4))))) (* (sqrt (pow im 3)) (sqrt -4))) (pow re 2))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal -16 binary64))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -4 binary64))))) (*.f64 (sqrt.f64 #s(literal -4 binary64)) (sqrt.f64 (*.f64 im (*.f64 im im))))) (*.f64 re re))
(/ (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* 32 (pow im 6)) (* 64 (pow im 6))) (* (pow re 3) (sqrt -4))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* 16 (pow im 5)) (* 32 (pow im 5))) (* (pow re 2) (sqrt -4))))) (* (sqrt (pow im 3)) (sqrt -4)))) (pow re 2))
(/.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal -16 binary64))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -4 binary64))))) (*.f64 (sqrt.f64 #s(literal -4 binary64)) (sqrt.f64 (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (/.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal -32 binary64)) (*.f64 re (*.f64 re re))) (sqrt.f64 #s(literal -4 binary64))))) (*.f64 re re))
(/ (+ (* -1 (/ (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* -32 (pow im 7)) (+ (* -64 (pow im 7)) (+ (* -8 (* (pow im 2) (- (* 16 (pow im 5)) (* 32 (pow im 5))))) (* 1/4 (/ (pow (- (* 16 (pow im 5)) (* 32 (pow im 5))) 2) (* (pow im 3) (pow (sqrt -4) 2))))))) (* re (sqrt -4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* 32 (pow im 6)) (* 64 (pow im 6))) (sqrt -4))))) (pow re 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (- (* 16 (pow im 5)) (* 32 (pow im 5))) (* (pow re 2) (sqrt -4))))) (* (sqrt (pow im 3)) (sqrt -4)))) (pow re 2))
(/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal -16 binary64))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -4 binary64))))) (*.f64 (sqrt.f64 #s(literal -4 binary64)) (sqrt.f64 (*.f64 im (*.f64 im im))))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (/.f64 (-.f64 (*.f64 (pow.f64 im #s(literal 7 binary64)) #s(literal -32 binary64)) (+.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 7 binary64)) #s(literal -64 binary64)) (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 im im)) (*.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal -16 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal -16 binary64)) #s(literal 2 binary64)) (*.f64 im (*.f64 im im)))))) (*.f64 re (sqrt.f64 #s(literal -4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal -32 binary64))) (sqrt.f64 #s(literal -4 binary64))))) (*.f64 re (*.f64 re re)))) (*.f64 re re))
(* -4 (/ (pow im 3) (pow re 4)))
(/.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal -4 binary64)) (pow.f64 re #s(literal 4 binary64)))
(* (pow im 3) (- (* -16 (/ (pow im 2) (pow re 6))) (* 4 (/ 1 (pow re 4)))))
(*.f64 (*.f64 im (*.f64 im im)) (-.f64 (/.f64 (*.f64 #s(literal -16 binary64) (*.f64 im im)) (pow.f64 re #s(literal 6 binary64))) (/.f64 #s(literal 4 binary64) (pow.f64 re #s(literal 4 binary64)))))
(* (pow im 3) (- (* (pow im 2) (- (* 32 (/ im (pow re 7))) (* 16 (/ 1 (pow re 6))))) (* 4 (/ 1 (pow re 4)))))
(*.f64 (*.f64 im (*.f64 im im)) (-.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 32 binary64) (/.f64 im (pow.f64 re #s(literal 7 binary64)))) (/.f64 #s(literal 16 binary64) (pow.f64 re #s(literal 6 binary64))))) (/.f64 #s(literal 4 binary64) (pow.f64 re #s(literal 4 binary64)))))
(* (pow im 3) (- (* (pow im 2) (- (* im (+ (* -96 (/ im (pow re 8))) (* 32 (/ 1 (pow re 7))))) (* 16 (/ 1 (pow re 6))))) (* 4 (/ 1 (pow re 4)))))
(*.f64 (*.f64 im (*.f64 im im)) (-.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 im (+.f64 (/.f64 (*.f64 #s(literal -96 binary64) im) (pow.f64 re #s(literal 8 binary64))) (/.f64 #s(literal 32 binary64) (pow.f64 re #s(literal 7 binary64))))) (/.f64 #s(literal 16 binary64) (pow.f64 re #s(literal 6 binary64))))) (/.f64 #s(literal 4 binary64) (pow.f64 re #s(literal 4 binary64)))))
(/ 1/2 im)
(/.f64 #s(literal 1/2 binary64) im)
(/ (+ 1/2 (* 1/2 (/ re im))) im)
(/.f64 (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) re) im)) im)
(/ (- (+ 1/2 (+ (* -1/4 (/ (pow re 2) (pow im 2))) (* 1/2 (/ re im)))) (* -1/2 (/ (pow re 2) (pow im 2)))) im)
(/.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) re) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im im))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))) im)
(/ (- (+ 1/2 (+ (* -1 (/ (+ (* -1/2 (pow re 3)) (* 1/2 (pow re 3))) (pow im 3))) (+ (* -1/4 (/ (pow re 2) (pow im 2))) (* 1/2 (/ re im))))) (* -1/2 (/ (pow re 2) (pow im 2)))) im)
(/.f64 (+.f64 #s(literal 1/2 binary64) (+.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) re) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im im))) (/.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im im)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))) im)
(/ 1/2 im)
(/.f64 #s(literal 1/2 binary64) im)
(* -1 (/ (- (* -1/2 (/ re im)) 1/2) im))
(/.f64 (neg.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) re) im) #s(literal -1/2 binary64))) im)
(* -1 (/ (- (* -1 (/ (- (+ (* -1/4 (/ (pow re 2) im)) (* 1/2 re)) (* -1/2 (/ (pow re 2) im))) im)) 1/2) im))
(-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) im) (*.f64 #s(literal 1/2 binary64) re)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 re re) im))) im)) #s(literal -1/2 binary64)) im))
(* -1 (/ (- (* -1 (/ (+ (* -1 (/ (+ (* -1 (- (* -1/4 (pow re 2)) (* -1/2 (pow re 2)))) (* -1 (/ (+ (* -1/2 (pow re 3)) (* 1/2 (pow re 3))) im))) im)) (* 1/2 re)) im)) 1/2) im))
(-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) re) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (/.f64 #s(literal 0 binary64) im)) im))) im) #s(literal -1/2 binary64)) im))
(/ 1/2 im)
(/.f64 #s(literal 1/2 binary64) im)
(+ (* 1/2 (/ re (pow im 2))) (* 1/2 (/ 1 im)))
(+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) re) (*.f64 im im)) (/.f64 #s(literal 1/2 binary64) im))
(+ (* re (+ (* 1/4 (/ re (pow im 3))) (* 1/2 (/ 1 (pow im 2))))) (* 1/2 (/ 1 im)))
(+.f64 (/.f64 #s(literal 1/2 binary64) im) (*.f64 re (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) re) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1/2 binary64) (*.f64 im im)))))
(+ (* re (+ (* re (+ (* -1/16 (/ (pow re 2) (pow im 5))) (* 1/4 (/ 1 (pow im 3))))) (* 1/2 (/ 1 (pow im 2))))) (* 1/2 (/ 1 im)))
(+.f64 (/.f64 #s(literal 1/2 binary64) im) (*.f64 re (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 im (*.f64 im im))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 re re)) (pow.f64 im #s(literal 5 binary64))))))))
(* -4 (/ (pow im 3) (pow re 4)))
(/.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal -4 binary64)) (pow.f64 re #s(literal 4 binary64)))
(/ (- (+ (* -4 (pow im 3)) (* 16 (/ (pow im 5) (pow re 2)))) (* 32 (/ (pow im 5) (pow re 2)))) (pow re 4))
(/.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal -4 binary64)) (/.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal -16 binary64)) (*.f64 re re))) (pow.f64 re #s(literal 4 binary64)))
(/ (- (+ (* -32 (/ (pow im 6) (pow re 3))) (+ (* -4 (pow im 3)) (* 16 (/ (pow im 5) (pow re 2))))) (+ (* -64 (/ (pow im 6) (pow re 3))) (* 32 (/ (pow im 5) (pow re 2))))) (pow re 4))
(/.f64 (+.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal -32 binary64)) (*.f64 re (*.f64 re re))) (-.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal -4 binary64)) (/.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal 16 binary64)) (*.f64 re re))) (+.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal 32 binary64)) (*.f64 re re)) (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal -64 binary64)) (*.f64 re (*.f64 re re)))))) (pow.f64 re #s(literal 4 binary64)))
(/ (- (+ (* -32 (/ (pow im 6) (pow re 3))) (+ (* -32 (/ (pow im 7) (pow re 4))) (+ (* -4 (pow im 3)) (* 16 (/ (pow im 5) (pow re 2)))))) (+ (* -64 (/ (pow im 6) (pow re 3))) (+ (* -64 (/ (pow im 7) (pow re 4))) (+ (* -8 (/ (* (pow im 2) (- (* 16 (pow im 5)) (* 32 (pow im 5)))) (pow re 4))) (* 32 (/ (pow im 5) (pow re 2))))))) (pow re 4))
(/.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal -32 binary64)) (*.f64 re (*.f64 re re))) (+.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal -4 binary64)) (/.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal 16 binary64)) (*.f64 re re))) (/.f64 (*.f64 (pow.f64 im #s(literal 7 binary64)) #s(literal -32 binary64)) (pow.f64 re #s(literal 4 binary64))))) (+.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal -64 binary64)) (*.f64 re (*.f64 re re))) (+.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 7 binary64)) #s(literal -64 binary64)) (pow.f64 re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal 32 binary64)) (*.f64 re re)) (/.f64 (*.f64 (*.f64 #s(literal -8 binary64) (*.f64 im im)) (*.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal -16 binary64))) (pow.f64 re #s(literal 4 binary64))))))) (pow.f64 re #s(literal 4 binary64)))
(* -4 (/ (pow im 3) (pow re 4)))
(/.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal -4 binary64)) (pow.f64 re #s(literal 4 binary64)))
(/ (- (+ (* -4 (pow im 3)) (* 16 (/ (pow im 5) (pow re 2)))) (* 32 (/ (pow im 5) (pow re 2)))) (pow re 4))
(/.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal -4 binary64)) (/.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal -16 binary64)) (*.f64 re re))) (pow.f64 re #s(literal 4 binary64)))
(/ (- (+ (* -4 (pow im 3)) (+ (* -1 (/ (- (* 32 (pow im 6)) (* 64 (pow im 6))) (pow re 3))) (* 16 (/ (pow im 5) (pow re 2))))) (* 32 (/ (pow im 5) (pow re 2)))) (pow re 4))
(/.f64 (+.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal -4 binary64)) (-.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal 16 binary64)) (*.f64 re re)) (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal -32 binary64)) (*.f64 re (*.f64 re re))))) (*.f64 #s(literal -32 binary64) (/.f64 (pow.f64 im #s(literal 5 binary64)) (*.f64 re re)))) (pow.f64 re #s(literal 4 binary64)))
(/ (- (+ (* -4 (pow im 3)) (+ (* -1 (/ (- (+ (* -1 (/ (- (* -32 (pow im 7)) (+ (* -64 (pow im 7)) (* -8 (* (pow im 2) (- (* 16 (pow im 5)) (* 32 (pow im 5))))))) re)) (* 32 (pow im 6))) (* 64 (pow im 6))) (pow re 3))) (* 16 (/ (pow im 5) (pow re 2))))) (* 32 (/ (pow im 5) (pow re 2)))) (pow re 4))
(/.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal -4 binary64)) (+.f64 (-.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal 16 binary64)) (*.f64 re re)) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 7 binary64)) #s(literal -32 binary64)) (*.f64 #s(literal 64 binary64) (pow.f64 im #s(literal 7 binary64)))) (*.f64 #s(literal 8 binary64) (*.f64 (*.f64 im im) (*.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal -16 binary64))))) re)) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal -32 binary64))) (*.f64 re (*.f64 re re)))) (*.f64 #s(literal -32 binary64) (/.f64 (pow.f64 im #s(literal 5 binary64)) (*.f64 re re))))) (pow.f64 re #s(literal 4 binary64)))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+.f64 (*.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)))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im 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 (+.f64 (*.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 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (+.f64 (*.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 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (+.f64 (*.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 (*.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 (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(*.f64 (+.f64 (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) 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 (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64))))) (-.f64 #s(literal 0 binary64) 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) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (*.f64 re (*.f64 re 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) (+.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 (*.f64 im im) (-.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/4 binary64) (*.f64 re (*.f64 re 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) (+.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 (*.f64 im im) (-.f64 (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -5/64 binary64) (*.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)))))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) (/.f64 (*.f64 re re) (*.f64 im im))))
(* 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) (+.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) (+.f64 (/.f64 (*.f64 re re) (*.f64 im im)) (/.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)))))
(*.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im)) (-.f64 #s(literal 0 binary64) 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)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (+.f64 (*.f64 re re) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im))) im)) im)) (-.f64 #s(literal 0 binary64) im))
im
(+ im (* -1 re))
(-.f64 im re)
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+.f64 im (*.f64 re (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) re) im) #s(literal -1 binary64))))
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(+.f64 im (*.f64 re (+.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))))) #s(literal -1 binary64))))
(* 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 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 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 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64))) (pow.f64 re #s(literal 6 binary64)))) re)
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(*.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(*.f64 (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) 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 #s(literal 2 binary64) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))) (-.f64 #s(literal 0 binary64) 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) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.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) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (*.f64 (*.f64 im im) (-.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/8 binary64) (*.f64 re (*.f64 re 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) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (*.f64 (*.f64 im im) (-.f64 (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 (*.f64 #s(literal -5/128 binary64) (*.f64 im im)) (pow.f64 re #s(literal 7 binary64))))) (/.f64 #s(literal 1/8 binary64) (*.f64 re (*.f64 re re)))))))
im
(* im (+ 1 (* -1 (/ re im))))
(*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(*.f64 im (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (/.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 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.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))))) (/.f64 re im)))
(* -1 im)
(-.f64 #s(literal 0 binary64) im)
(* -1 (* im (+ 1 (/ re im))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) im)) re) im)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im)) (*.f64 #s(literal 1/2 binary64) (*.f64 re re))) im)) re) im)) (-.f64 #s(literal 0 binary64) im))
im
(+ im (* 1/2 (/ (pow re 2) im)))
(+.f64 im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 re re) im)))
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+.f64 im (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 re re)) (*.f64 im (*.f64 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)))))
(+.f64 im (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1/2 binary64) im) (*.f64 (*.f64 re re) (-.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 re re)) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal 1/8 binary64) (*.f64 im (*.f64 im im))))))))
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(*.f64 re (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (+ (* -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 re (+.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))))
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.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))))) (-.f64 #s(literal 0 binary64) 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))))))))
(*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(+.f64 re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) re)))
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+.f64 re (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/2 binary64) 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)))))
(+.f64 re (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (*.f64 (*.f64 im im) (-.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/8 binary64) (*.f64 re (*.f64 re re))))))))
im
(* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))
(*.f64 im (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(*.f64 im (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64))))))
(* -1 im)
(-.f64 #s(literal 0 binary64) im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.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))))) (-.f64 #s(literal 0 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))))))))
(*.f64 (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* 2 (/ im (pow re 2)))
(/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re))
(* 2 (/ im (pow re 2)))
(/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re))
(* 2 (/ im (pow re 2)))
(/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re))
(* 2 (/ im (pow re 2)))
(/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re))
(* 2 (/ im (pow re 2)))
(/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re))
(* 2 (/ im (pow re 2)))
(/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re))
(* 2 (/ im (pow re 2)))
(/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re))
(* 2 (/ im (pow re 2)))
(/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re))
(* 2 (/ im (pow re 2)))
(/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re))
(* 2 (/ im (pow re 2)))
(/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re))
(* 2 (/ im (pow re 2)))
(/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re))
(* 2 (/ im (pow re 2)))
(/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re))
(* 2 (/ im (pow re 2)))
(/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re))
(* 2 (/ im (pow re 2)))
(/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re))
(* 2 (/ im (pow re 2)))
(/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re))
(* 2 (/ im (pow re 2)))
(/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re))
(* 2 (/ im (pow re 2)))
(/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re))
(* 2 (/ im (pow re 2)))
(/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re))
(* 2 (/ im (pow re 2)))
(/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re))
(* 2 (/ im (pow re 2)))
(/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re))
(* 2 (/ im (pow re 2)))
(/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re))
(* 2 (/ im (pow re 2)))
(/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re))
(* 2 (/ im (pow re 2)))
(/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re))
(* 2 (/ im (pow re 2)))
(/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re))
(* 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))
(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)

eval242.0ms (2.3%)

Compiler

Compiled 40344 to 3887 computations (90.4% saved)

prune99.0ms (0.9%)

Pruning

17 alts after pruning (8 fresh and 9 done)

PrunedKeptTotal
New9963999
Fresh257
Picked145
Done055
Total999171016
Accuracy
99.9%
Counts
1016 → 17
Alt Table
Click to see full alt table
StatusAccuracyProgram
31.1%
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
31.1%
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) im))
73.8%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 2 binary64)) #s(literal 2 binary64)))
69.5%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 (exp.f64 (log.f64 (-.f64 (hypot.f64 re im) re))) (exp.f64 (log.f64 #s(literal 2 binary64)))) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
74.2%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
73.7%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 4 binary64)))
22.8%
(*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))))
31.0%
(*.f64 #s(literal 1/2 binary64) (*.f64 im (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (pow.f64 re #s(literal -1/4 binary64)))))
16.9%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 im im) re)))
39.4%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))) im))))))
51.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
19.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))))
21.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (*.f64 re re) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 im (*.f64 re re))) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))))
22.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64))))
52.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
74.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
53.5%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re))))
Compiler

Compiled 432 to 284 computations (34.3% saved)

simplify164.0ms (1.6%)

Algorithm
egg-herbie
Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
cost-diff25600
(*.f64 (exp.f64 (log.f64 (-.f64 (hypot.f64 re im) re))) (exp.f64 (log.f64 #s(literal 2 binary64))))
cost-diff25600
(pow.f64 (*.f64 (exp.f64 (log.f64 (-.f64 (hypot.f64 re im) re))) (exp.f64 (log.f64 #s(literal 2 binary64)))) #s(literal 1/4 binary64))
cost-diff32128
(pow.f64 (pow.f64 (*.f64 (exp.f64 (log.f64 (-.f64 (hypot.f64 re im) re))) (exp.f64 (log.f64 #s(literal 2 binary64)))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
cost-diff32128
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 (exp.f64 (log.f64 (-.f64 (hypot.f64 re im) re))) (exp.f64 (log.f64 #s(literal 2 binary64)))) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
cost-diff0
(*.f64 im #s(literal 2 binary64))
cost-diff0
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))) im))))
cost-diff0
(sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))) im)))))
cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))) im))))))
cost-diff0
(*.f64 im im)
cost-diff0
(/.f64 (*.f64 im im) re)
cost-diff0
(sqrt.f64 (/.f64 (*.f64 im im) re))
cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 im im) re)))
cost-diff0
(sqrt.f64 re)
cost-diff0
(*.f64 #s(literal 1/2 binary64) im)
cost-diff0
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
cost-diff0
(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
cost-diff0
(pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64))
cost-diff0
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 4 binary64))
cost-diff0
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 4 binary64)))
Rules
2520×*-lowering-*.f32
2520×*-lowering-*.f64
2132×sum4-define
1914×sum3-define
1082×fnmsub-define
Iterations

Useful iterations: 7 (0.0ms)

IterNodesCost
043312
187301
2169299
3295299
4509299
5711299
61178296
73013288
86983288
08079288
Stop Event
iter limit
node limit
Calls
Call 1
Inputs
(* 1/2 (pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8) 4))
1/2
(pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8) 4)
(pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8)
(* 2 (- (sqrt (+ (* re re) (* im im))) re))
2
(- (sqrt (+ (* re re) (* im im))) re)
(sqrt (+ (* re re) (* im im)))
re
im
1/8
4
(/ (* 1/2 im) (sqrt re))
(* 1/2 im)
1/2
im
(sqrt re)
re
(* 1/2 (sqrt (/ (* im im) re)))
1/2
(sqrt (/ (* im im) re))
(/ (* im im) re)
(* im im)
im
re
(* 1/2 (sqrt (+ (* im 2) (* re (+ -2 (/ (+ re (/ (* -1/4 (* re (* re re))) (* im im))) im))))))
1/2
(sqrt (+ (* im 2) (* re (+ -2 (/ (+ re (/ (* -1/4 (* re (* re re))) (* im im))) im)))))
(+ (* im 2) (* re (+ -2 (/ (+ re (/ (* -1/4 (* re (* re re))) (* im im))) im))))
(* im 2)
im
2
(* re (+ -2 (/ (+ re (/ (* -1/4 (* re (* re re))) (* im im))) im)))
re
(+ -2 (/ (+ re (/ (* -1/4 (* re (* re re))) (* im im))) im))
-2
(/ (+ re (/ (* -1/4 (* re (* re re))) (* im im))) im)
(+ re (/ (* -1/4 (* re (* re re))) (* im im)))
(/ (* -1/4 (* re (* re re))) (* im im))
(* -1/4 (* re (* re re)))
-1/4
(* re (* re re))
(* re re)
(* im im)
(* 1/2 (pow (pow (* (exp (log (- (sqrt (+ (* re re) (* im im))) re))) (exp (log 2))) 1/4) 2))
1/2
(pow (pow (* (exp (log (- (sqrt (+ (* re re) (* im im))) re))) (exp (log 2))) 1/4) 2)
(pow (* (exp (log (- (sqrt (+ (* re re) (* im im))) re))) (exp (log 2))) 1/4)
(* (exp (log (- (sqrt (+ (* re re) (* im im))) re))) (exp (log 2)))
(exp (log (- (sqrt (+ (* re re) (* im im))) re)))
(log (- (sqrt (+ (* re re) (* im im))) re))
(- (sqrt (+ (* re re) (* im im))) re)
(sqrt (+ (* re re) (* im im)))
re
im
(exp (log 2))
(log 2)
2
1/4
Outputs
(* 1/2 (pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8) 4))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 #s(literal -2 binary64) (-.f64 re (hypot.f64 re im))) #s(literal 1/8 binary64)) #s(literal 4 binary64)))
1/2
#s(literal 1/2 binary64)
(pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8) 4)
(pow.f64 (pow.f64 (*.f64 #s(literal -2 binary64) (-.f64 re (hypot.f64 re im))) #s(literal 1/8 binary64)) #s(literal 4 binary64))
(pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8)
(pow.f64 (*.f64 #s(literal -2 binary64) (-.f64 re (hypot.f64 re im))) #s(literal 1/8 binary64))
(* 2 (- (sqrt (+ (* re re) (* im im))) re))
(*.f64 #s(literal -2 binary64) (-.f64 re (hypot.f64 re im)))
2
#s(literal 2 binary64)
(- (sqrt (+ (* re re) (* im im))) re)
(-.f64 (hypot.f64 re im) re)
(sqrt (+ (* re re) (* im im)))
(hypot.f64 re im)
re
im
1/8
#s(literal 1/8 binary64)
4
#s(literal 4 binary64)
(/ (* 1/2 im) (sqrt re))
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
1/2
#s(literal 1/2 binary64)
im
(sqrt re)
(sqrt.f64 re)
re
(* 1/2 (sqrt (/ (* im im) re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 im im) re)))
1/2
#s(literal 1/2 binary64)
(sqrt (/ (* im im) re))
(sqrt.f64 (/.f64 (*.f64 im im) re))
(/ (* im im) re)
(/.f64 (*.f64 im im) re)
(* im im)
(*.f64 im im)
im
re
(* 1/2 (sqrt (+ (* im 2) (* re (+ -2 (/ (+ re (/ (* -1/4 (* re (* re re))) (* im im))) im))))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 re (+.f64 (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im)) #s(literal 1 binary64))) im))))))
1/2
#s(literal 1/2 binary64)
(sqrt (+ (* im 2) (* re (+ -2 (/ (+ re (/ (* -1/4 (* re (* re re))) (* im im))) im)))))
(sqrt.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 re (+.f64 (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im)) #s(literal 1 binary64))) im)))))
(+ (* im 2) (* re (+ -2 (/ (+ re (/ (* -1/4 (* re (* re re))) (* im im))) im))))
(+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 re (+.f64 (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im)) #s(literal 1 binary64))) im))))
(* im 2)
(*.f64 #s(literal 2 binary64) im)
im
2
#s(literal 2 binary64)
(* re (+ -2 (/ (+ re (/ (* -1/4 (* re (* re re))) (* im im))) im)))
(*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 re (+.f64 (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im)) #s(literal 1 binary64))) im)))
re
(+ -2 (/ (+ re (/ (* -1/4 (* re (* re re))) (* im im))) im))
(+.f64 #s(literal -2 binary64) (/.f64 (*.f64 re (+.f64 (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im)) #s(literal 1 binary64))) im))
-2
#s(literal -2 binary64)
(/ (+ re (/ (* -1/4 (* re (* re re))) (* im im))) im)
(/.f64 (*.f64 re (+.f64 (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im)) #s(literal 1 binary64))) im)
(+ re (/ (* -1/4 (* re (* re re))) (* im im)))
(*.f64 re (+.f64 (/.f64 (*.f64 re (*.f64 re #s(literal -1/4 binary64))) (*.f64 im im)) #s(literal 1 binary64)))
(/ (* -1/4 (* re (* re re))) (* im im))
(/.f64 (*.f64 re (*.f64 re (*.f64 re #s(literal -1/4 binary64)))) (*.f64 im im))
(* -1/4 (* re (* re re)))
(*.f64 re (*.f64 re (*.f64 re #s(literal -1/4 binary64))))
-1/4
#s(literal -1/4 binary64)
(* re (* re re))
(*.f64 re (*.f64 re re))
(* re re)
(*.f64 re re)
(* im im)
(*.f64 im im)
(* 1/2 (pow (pow (* (exp (log (- (sqrt (+ (* re re) (* im im))) re))) (exp (log 2))) 1/4) 2))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal -2 binary64) (-.f64 re (hypot.f64 re im)))))
1/2
#s(literal 1/2 binary64)
(pow (pow (* (exp (log (- (sqrt (+ (* re re) (* im im))) re))) (exp (log 2))) 1/4) 2)
(sqrt.f64 (*.f64 #s(literal -2 binary64) (-.f64 re (hypot.f64 re im))))
(pow (* (exp (log (- (sqrt (+ (* re re) (* im im))) re))) (exp (log 2))) 1/4)
(pow.f64 (*.f64 #s(literal -2 binary64) (-.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64))
(* (exp (log (- (sqrt (+ (* re re) (* im im))) re))) (exp (log 2)))
(*.f64 #s(literal -2 binary64) (-.f64 re (hypot.f64 re im)))
(exp (log (- (sqrt (+ (* re re) (* im im))) re)))
(-.f64 (hypot.f64 re im) re)
(log (- (sqrt (+ (* re re) (* im im))) re))
(log.f64 (-.f64 (hypot.f64 re im) re))
(- (sqrt (+ (* re re) (* im im))) re)
(-.f64 (hypot.f64 re im) re)
(sqrt (+ (* re re) (* im im)))
(hypot.f64 re im)
re
im
(exp (log 2))
#s(literal 2 binary64)
(log 2)
(log.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
1/4
#s(literal 1/4 binary64)

localize270.0ms (2.6%)

Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
accuracy100.0%
(log.f64 #s(literal 2 binary64))
accuracy100.0%
(exp.f64 (log.f64 #s(literal 2 binary64)))
accuracy99.9%
(pow.f64 (pow.f64 (*.f64 (exp.f64 (log.f64 (-.f64 (hypot.f64 re im) re))) (exp.f64 (log.f64 #s(literal 2 binary64)))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
accuracy98.1%
(exp.f64 (log.f64 (-.f64 (hypot.f64 re im) re)))
accuracy100.0%
(*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))
accuracy100.0%
(sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))) im)))))
accuracy100.0%
(*.f64 re (*.f64 re re))
accuracy94.3%
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))
accuracy100.0%
(*.f64 im im)
accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 im im) re)))
accuracy97.8%
(/.f64 (*.f64 im im) re)
accuracy92.3%
(sqrt.f64 (/.f64 (*.f64 im im) re))
accuracy100.0%
(*.f64 #s(literal 1/2 binary64) im)
accuracy100.0%
(sqrt.f64 re)
accuracy99.9%
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
accuracy100.0%
(-.f64 (hypot.f64 re im) re)
accuracy100.0%
(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 4 binary64)))
accuracy99.7%
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 4 binary64))
Results
150.0ms203×0invalid
26.0ms53×0valid
Compiler

Compiled 358 to 43 computations (88% saved)

Precisions
Click to see histograms. Total time spent on operations: 133.0ms
ival-mult: 36.0ms (27% of total)
ival-div: 35.0ms (26.2% of total)
ival-pow: 28.0ms (21% of total)
compiled-spec: 9.0ms (6.7% of total)
ival-sqrt: 7.0ms (5.2% of total)
ival-log: 6.0ms (4.5% of total)
ival-exp: 5.0ms (3.7% of total)
ival-add: 5.0ms (3.7% of total)
ival-sub: 1.0ms (0.7% of total)
const: 1.0ms (0.7% of total)
backward-pass: 0.0ms (0% of total)

series34.0ms (0.3%)

Counts
26 → 504
Calls
Call 1
Inputs
#<alt (* 1/2 (pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8) 4))>
#<alt (pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8) 4)>
#<alt (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8)>
#<alt (* 2 (- (sqrt (+ (* re re) (* im im))) re))>
#<alt (/ (* 1/2 im) (sqrt re))>
#<alt (* 1/2 im)>
#<alt (sqrt re)>
#<alt (* 1/2 (sqrt (/ (* im im) re)))>
#<alt (sqrt (/ (* im im) re))>
#<alt (/ (* im im) re)>
#<alt (* im im)>
#<alt (* 1/2 (sqrt (+ (* im 2) (* re (+ -2 (/ (+ re (/ (* -1/4 (* re (* re re))) (* im im))) im))))))>
#<alt (sqrt (+ (* im 2) (* re (+ -2 (/ (+ re (/ (* -1/4 (* re (* re re))) (* im im))) im)))))>
#<alt (+ (* im 2) (* re (+ -2 (/ (+ re (/ (* -1/4 (* re (* re re))) (* im im))) im))))>
#<alt (* im 2)>
#<alt (* 1/2 (pow (pow (* (exp (log (- (sqrt (+ (* re re) (* im im))) re))) (exp (log 2))) 1/4) 2))>
#<alt (pow (pow (* (exp (log (- (sqrt (+ (* re re) (* im im))) re))) (exp (log 2))) 1/4) 2)>
#<alt (pow (* (exp (log (- (sqrt (+ (* re re) (* im im))) re))) (exp (log 2))) 1/4)>
#<alt (* (exp (log (- (sqrt (+ (* re re) (* im im))) re))) (exp (log 2)))>
#<alt (- (sqrt (+ (* re re) (* im im))) re)>
#<alt (/ (* -1/4 (* re (* re re))) (* im im))>
#<alt (* re (* re re))>
#<alt (* -1/4 (* re (* re re)))>
#<alt (exp (log (- (sqrt (+ (* re re) (* im im))) re)))>
#<alt (exp (log 2))>
#<alt (log 2)>
Outputs
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))>
#<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)))))))>
#<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))))))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<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)))))>
#<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))))))>
#<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)))))))>
#<alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<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))))))>
#<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)))))))>
#<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))))))))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<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))))))>
#<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)))))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<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))))))))>
#<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))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (* im (sqrt (/ 1 re))))>
#<alt (+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re)))))>
#<alt (+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* -1/128 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re))))))>
#<alt (* -2 (* (sqrt re) (sqrt -1)))>
#<alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<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))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (+ (sqrt (/ 1 re)) (* -1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))>
#<alt (* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* 7/128 (* (pow im 2) (sqrt (/ 1 (pow re 9)))))))))>
#<alt (* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* (pow im 2) (+ (* -33/1024 (* (pow im 2) (sqrt (/ 1 (pow re 13))))) (* 7/128 (sqrt (/ 1 (pow re 9))))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt 2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (pow (* 2 im) 1/8)>
#<alt (+ (* -1/8 (* (pow (/ 2 (pow im 7)) 1/8) re)) (pow (* 2 im) 1/8))>
#<alt (+ (* re (+ (* -1/8 (pow (/ 2 (pow im 7)) 1/8)) (* 1/128 (* (pow (/ 2 (pow im 15)) 1/8) re)))) (pow (* 2 im) 1/8))>
#<alt (+ (* re (+ (* -1/8 (pow (/ 2 (pow im 7)) 1/8)) (* re (+ (* 1/128 (pow (/ 2 (pow im 15)) 1/8)) (* 21/1024 (* (pow (/ 2 (pow im 23)) 1/8) re)))))) (pow (* 2 im) 1/8))>
#<alt (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))>
#<alt (+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))))>
#<alt (+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))>
#<alt (+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/6144 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/196608 (pow im 6)) (* 1/5760 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))>
#<alt (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))>
#<alt (+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))))>
#<alt (+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))>
#<alt (+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/196608 (pow im 6)) (+ (* 1/6144 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))))) (* 1/5760 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))>
#<alt (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))>
#<alt (+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 2))))>
#<alt (+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/32 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* 25/2048 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 4))))))>
#<alt (+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/32 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* (pow im 2) (+ (* -451/65536 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 6))) (* 25/2048 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 4))))))))>
#<alt (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))>
#<alt (+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))>
#<alt (+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))>
#<alt (+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/128 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/3072 (pow re 3)) (* 1/48 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) (pow im 3)) (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))>
#<alt (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))>
#<alt (+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* 1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))>
#<alt (+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* -1/8 (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))>
#<alt (+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* -1/128 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/3072 (pow re 3)) (* 1/48 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) im)) (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* -1/8 (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))>
#<alt (* 2 im)>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (+ (* 2 im) (* re (- (/ re im) 2)))>
#<alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))>
#<alt (/ (pow im 2) re)>
#<alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)>
#<alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)>
#<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)>
#<alt (* -4 re)>
#<alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))>
#<alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))>
#<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)))))))>
#<alt (/ (pow im 2) re)>
#<alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))>
#<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)))>
#<alt (* 2 im)>
#<alt (* im (+ 2 (* -2 (/ re im))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))>
#<alt (* -2 im)>
#<alt (* -1 (* im (+ 2 (* 2 (/ re im)))))>
#<alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))>
#<alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 im)>
#<alt (* 1/2 im)>
#<alt (* 1/2 im)>
#<alt (* 1/2 im)>
#<alt (* 1/2 im)>
#<alt (* 1/2 im)>
#<alt (* 1/2 im)>
#<alt (* 1/2 im)>
#<alt (* 1/2 im)>
#<alt (* 1/2 im)>
#<alt (* 1/2 im)>
#<alt (* 1/2 im)>
#<alt (sqrt re)>
#<alt (sqrt re)>
#<alt (sqrt re)>
#<alt (sqrt re)>
#<alt (sqrt re)>
#<alt (sqrt re)>
#<alt (sqrt re)>
#<alt (sqrt re)>
#<alt (* -1 (* (sqrt re) (pow (sqrt -1) 2)))>
#<alt (* -1 (* (sqrt re) (pow (sqrt -1) 2)))>
#<alt (* -1 (* (sqrt re) (pow (sqrt -1) 2)))>
#<alt (* -1 (* (sqrt re) (pow (sqrt -1) 2)))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* -1/2 (* im (sqrt (/ 1 re))))>
#<alt (* -1/2 (* im (sqrt (/ 1 re))))>
#<alt (* -1/2 (* im (sqrt (/ 1 re))))>
#<alt (* -1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* -1 (* im (sqrt (/ 1 re))))>
#<alt (* -1 (* im (sqrt (/ 1 re))))>
#<alt (* -1 (* im (sqrt (/ 1 re))))>
#<alt (* -1 (* im (sqrt (/ 1 re))))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))>
#<alt (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))>
#<alt (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))>
#<alt (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))>
#<alt (/ (+ (* 1/4 (* (sqrt (pow im 5)) (/ 1 (sqrt -1/4)))) (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4))))) (pow im 2))>
#<alt (/ (+ (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (* (pow im 3) (+ (* -1/2 (* (sqrt im) (/ 1 (* re (sqrt -1/4))))) (* 1/4 (* (sqrt (/ 1 im)) (/ 1 (sqrt -1/4))))))) (pow im 2))>
#<alt (/ (+ (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (* (pow im 3) (+ (* 1/4 (* (sqrt (/ 1 im)) (/ 1 (sqrt -1/4)))) (* im (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (* re (sqrt -1/4))))) (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4)))))))))) (pow im 2))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))>
#<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)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))>
#<alt (* -1 (* im (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (+ (* -1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))))>
#<alt (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))>
#<alt (* (pow re 2) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))>
#<alt (* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))>
#<alt (* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* (pow re 4) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))))>
#<alt (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))>
#<alt (* (pow re 2) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))>
#<alt (* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))>
#<alt (* (pow re 2) (+ (* -1 (/ (+ (* -1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* re (sqrt -1/4))))) (* 1/2 (* (sqrt (pow im 3)) (/ 1 (sqrt -1/4))))) (pow re 3))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))>
#<alt (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))>
#<alt (/ (+ (* 1/2 (* (sqrt (pow im 5)) (/ 1 (sqrt -1/4)))) (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (pow im 2))>
#<alt (/ (+ (* (sqrt im) (* (pow re 2) (sqrt -1/4))) (* (pow im 3) (+ (* -1 (* (sqrt im) (/ 1 (* re (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt -1/4))))))) (pow im 2))>
#<alt (/ (+ (* (sqrt im) (* (pow re 2) (sqrt -1/4))) (* (pow im 3) (+ (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt -1/4)))) (* im (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (* re (sqrt -1/4))))) (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))))))) (pow im 2))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))>
#<alt (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))>
#<alt (* (pow re 2) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))>
#<alt (* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))>
#<alt (* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* (pow re 4) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))>
#<alt (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))>
#<alt (* (pow re 2) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))>
#<alt (* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))>
#<alt (* (pow re 2) (+ (* -1 (/ (+ (* -1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* re (sqrt -1/4))))) (* (sqrt (pow im 3)) (/ 1 (sqrt -1/4)))) (pow re 3))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))>
#<alt (* -1/4 (/ (pow re 4) (pow im 3)))>
#<alt (/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (pow re 2))) (pow im 3))>
#<alt (/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (+ (* -2 (* im re)) (pow re 2)))) (pow im 3))>
#<alt (/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)))) (pow im 3))>
#<alt (* 2 im)>
#<alt (* im (+ 2 (* -2 (/ re im))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))>
#<alt (* 2 im)>
#<alt (* -1 (* im (- (* 2 (/ re im)) 2)))>
#<alt (* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))>
#<alt (* -1 (* im (- (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1 (pow re 2)) (* 1/4 (/ (pow re 4) (pow im 2)))) im))) im)) 2)))>
#<alt (* 2 im)>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (+ (* 2 im) (* re (- (/ re im) 2)))>
#<alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))>
#<alt (* -1/4 (/ (pow re 4) (pow im 3)))>
#<alt (* (pow re 4) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))>
#<alt (* (pow re 4) (- (/ 1 (* im (pow re 2))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))>
#<alt (* (pow re 4) (- (+ (* 2 (/ im (pow re 4))) (/ 1 (* im (pow re 2)))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))>
#<alt (* -1/4 (/ (pow re 4) (pow im 3)))>
#<alt (* (pow re 4) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))>
#<alt (* (pow re 4) (- (/ 1 (* im (pow re 2))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))>
#<alt (* (pow re 4) (- (+ (* -1 (/ (+ 2 (* -2 (/ im re))) (pow re 3))) (/ 1 (* im (pow re 2)))) (* 1/4 (/ 1 (pow im 3)))))>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))>
#<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)))))))>
#<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))))))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<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)))))>
#<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))))))>
#<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)))))))>
#<alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))>
#<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)))))))>
#<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)))))))>
#<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)))))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<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))))))>
#<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)))))))>
#<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))))))))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<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))))))>
#<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)))))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<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))))))))>
#<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))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (* im (sqrt (/ 1 re))))>
#<alt (+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re)))))>
#<alt (+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* -1/128 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re))))))>
#<alt (* -2 (* (sqrt re) (sqrt -1)))>
#<alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<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))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (+ (sqrt (/ 1 re)) (* -1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))>
#<alt (* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* 7/128 (* (pow im 2) (sqrt (/ 1 (pow re 9)))))))))>
#<alt (* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* (pow im 2) (+ (* -33/1024 (* (pow im 2) (sqrt (/ 1 (pow re 13))))) (* 7/128 (sqrt (/ 1 (pow re 9))))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt 2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (pow (* 2 im) 1/4)>
#<alt (+ (* -1/4 (* (pow (/ 2 (pow im 3)) 1/4) re)) (pow (* 2 im) 1/4))>
#<alt (+ (* re (+ (* -1/4 (pow (/ 2 (pow im 3)) 1/4)) (* 1/32 (* (pow (/ 2 (pow im 7)) 1/4) re)))) (pow (* 2 im) 1/4))>
#<alt (+ (* re (+ (* -1/4 (pow (/ 2 (pow im 3)) 1/4)) (* re (+ (* 1/32 (pow (/ 2 (pow im 7)) 1/4)) (* 5/128 (* (pow (/ 2 (pow im 11)) 1/4) re)))))) (pow (* 2 im) 1/4))>
#<alt (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))>
#<alt (+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))))>
#<alt (+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))>
#<alt (+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/1536 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/24576 (pow im 6)) (* 1/2880 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))>
#<alt (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))>
#<alt (+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))))>
#<alt (+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))>
#<alt (+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/24576 (pow im 6)) (+ (* 1/2880 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6))))) (* 1/1536 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (pow re 6)) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))>
#<alt (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))>
#<alt (+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 2))))>
#<alt (+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/16 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* 13/512 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 4))))))>
#<alt (+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/16 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* (pow im 2) (+ (* -119/8192 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 6))) (* 13/512 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 4))))))))>
#<alt (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))>
#<alt (+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))>
#<alt (+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))>
#<alt (+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/384 (pow re 3)) (* 1/24 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) (pow im 3)) (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))>
#<alt (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))>
#<alt (+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* 1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))>
#<alt (+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* -1/4 (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))>
#<alt (+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* -1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/384 (pow re 3)) (* 1/24 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) im)) (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* -1/4 (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))>
#<alt (* 2 im)>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (+ (* 2 im) (* re (- (/ re im) 2)))>
#<alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))>
#<alt (/ (pow im 2) re)>
#<alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)>
#<alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)>
#<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)>
#<alt (* -4 re)>
#<alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))>
#<alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))>
#<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)))))))>
#<alt (/ (pow im 2) re)>
#<alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))>
#<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)))>
#<alt (* 2 im)>
#<alt (* im (+ 2 (* -2 (/ re im))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))>
#<alt (* -2 im)>
#<alt (* -1 (* im (+ 2 (* 2 (/ re im)))))>
#<alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))>
#<alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))>
#<alt im>
#<alt (+ im (* -1 re))>
#<alt (+ im (* re (- (* 1/2 (/ re im)) 1)))>
#<alt (+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))>
#<alt (* 1/2 (/ (pow im 2) re))>
#<alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)>
#<alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)>
#<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)>
#<alt (* -2 re)>
#<alt (* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))>
#<alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))>
#<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))))))))>
#<alt (* 1/2 (/ (pow im 2) re))>
#<alt (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))>
#<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))))>
#<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))))>
#<alt im>
#<alt (* im (+ 1 (* -1 (/ re im))))>
#<alt (* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))>
#<alt (* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))>
#<alt (* -1 im)>
#<alt (* -1 (* im (+ 1 (/ re im))))>
#<alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))>
#<alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))>
#<alt (* -1/4 (/ (pow re 3) (pow im 2)))>
#<alt (* -1/4 (/ (pow re 3) (pow im 2)))>
#<alt (* -1/4 (/ (pow re 3) (pow im 2)))>
#<alt (* -1/4 (/ (pow re 3) (pow im 2)))>
#<alt (* -1/4 (/ (pow re 3) (pow im 2)))>
#<alt (* -1/4 (/ (pow re 3) (pow im 2)))>
#<alt (* -1/4 (/ (pow re 3) (pow im 2)))>
#<alt (* -1/4 (/ (pow re 3) (pow im 2)))>
#<alt (* -1/4 (/ (pow re 3) (pow im 2)))>
#<alt (* -1/4 (/ (pow re 3) (pow im 2)))>
#<alt (* -1/4 (/ (pow re 3) (pow im 2)))>
#<alt (* -1/4 (/ (pow re 3) (pow im 2)))>
#<alt (* -1/4 (/ (pow re 3) (pow im 2)))>
#<alt (* -1/4 (/ (pow re 3) (pow im 2)))>
#<alt (* -1/4 (/ (pow re 3) (pow im 2)))>
#<alt (* -1/4 (/ (pow re 3) (pow im 2)))>
#<alt (* -1/4 (/ (pow re 3) (pow im 2)))>
#<alt (* -1/4 (/ (pow re 3) (pow im 2)))>
#<alt (* -1/4 (/ (pow re 3) (pow im 2)))>
#<alt (* -1/4 (/ (pow re 3) (pow im 2)))>
#<alt (* -1/4 (/ (pow re 3) (pow im 2)))>
#<alt (* -1/4 (/ (pow re 3) (pow im 2)))>
#<alt (* -1/4 (/ (pow re 3) (pow im 2)))>
#<alt (* -1/4 (/ (pow re 3) (pow im 2)))>
#<alt (pow re 3)>
#<alt (pow re 3)>
#<alt (pow re 3)>
#<alt (pow re 3)>
#<alt (pow re 3)>
#<alt (pow re 3)>
#<alt (pow re 3)>
#<alt (pow re 3)>
#<alt (pow re 3)>
#<alt (pow re 3)>
#<alt (pow re 3)>
#<alt (pow re 3)>
#<alt (* -1/4 (pow re 3))>
#<alt (* -1/4 (pow re 3))>
#<alt (* -1/4 (pow re 3))>
#<alt (* -1/4 (pow re 3))>
#<alt (* -1/4 (pow re 3))>
#<alt (* -1/4 (pow re 3))>
#<alt (* -1/4 (pow re 3))>
#<alt (* -1/4 (pow re 3))>
#<alt (* -1/4 (pow re 3))>
#<alt (* -1/4 (pow re 3))>
#<alt (* -1/4 (pow re 3))>
#<alt (* -1/4 (pow re 3))>
#<alt im>
#<alt (+ im (* -1 re))>
#<alt (+ im (* re (- (* 1/2 (/ re im)) 1)))>
#<alt (+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))>
#<alt (* 1/2 (/ (pow im 2) re))>
#<alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)>
#<alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)>
#<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)>
#<alt (* -2 re)>
#<alt (* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))>
#<alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))>
#<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))))))))>
#<alt (* 1/2 (/ (pow im 2) re))>
#<alt (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))>
#<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))))>
#<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))))>
#<alt im>
#<alt (* im (+ 1 (* -1 (/ re im))))>
#<alt (* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))>
#<alt (* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))>
#<alt (* -1 im)>
#<alt (* -1 (* im (+ 1 (/ re im))))>
#<alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))>
#<alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))>
Calls

126 calls:

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

rewrite323.0ms (3.1%)

Algorithm
batch-egg-rewrite
Rules
3424×*-lowering-*.f32
3424×*-lowering-*.f64
3204×/-lowering-/.f32
3204×/-lowering-/.f64
1536×fma-lowering-fma.f32
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
043200
1218192
21675191
08457191
Stop Event
iter limit
node limit
Counts
26 → 498
Calls
Call 1
Inputs
(* 1/2 (pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8) 4))
(pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8) 4)
(pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/8)
(* 2 (- (sqrt (+ (* re re) (* im im))) re))
(/ (* 1/2 im) (sqrt re))
(* 1/2 im)
(sqrt re)
(* 1/2 (sqrt (/ (* im im) re)))
(sqrt (/ (* im im) re))
(/ (* im im) re)
(* im im)
(* 1/2 (sqrt (+ (* im 2) (* re (+ -2 (/ (+ re (/ (* -1/4 (* re (* re re))) (* im im))) im))))))
(sqrt (+ (* im 2) (* re (+ -2 (/ (+ re (/ (* -1/4 (* re (* re re))) (* im im))) im)))))
(+ (* im 2) (* re (+ -2 (/ (+ re (/ (* -1/4 (* re (* re re))) (* im im))) im))))
(* im 2)
(* 1/2 (pow (pow (* (exp (log (- (sqrt (+ (* re re) (* im im))) re))) (exp (log 2))) 1/4) 2))
(pow (pow (* (exp (log (- (sqrt (+ (* re re) (* im im))) re))) (exp (log 2))) 1/4) 2)
(pow (* (exp (log (- (sqrt (+ (* re re) (* im im))) re))) (exp (log 2))) 1/4)
(* (exp (log (- (sqrt (+ (* re re) (* im im))) re))) (exp (log 2)))
(- (sqrt (+ (* re re) (* im im))) re)
(/ (* -1/4 (* re (* re re))) (* im im))
(* re (* re re))
(* -1/4 (* re (* re re)))
(exp (log (- (sqrt (+ (* re re) (* im im))) re)))
(exp (log 2))
(log 2)
Outputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 #s(literal 4 binary64) (*.f64 #s(literal 1/8 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))))
(exp.f64 (log.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 #s(literal 1/8 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))) #s(literal 1 binary64)))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))) (sqrt.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)))) (sqrt.f64 (+.f64 re (hypot.f64 re im))))
(/.f64 (sqrt.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) #s(literal 2 binary64))) (sqrt.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (sqrt.f64 (*.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)) #s(literal 2 binary64))) (sqrt.f64 (+.f64 re (hypot.f64 re im))))
(pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 4 binary64))
(pow.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)) #s(literal 8 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64))) #s(literal 1/8 binary64))
(pow.f64 (exp.f64 #s(literal 4 binary64)) (*.f64 #s(literal 1/8 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 3/8 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 3/8 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/8 binary64)) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 3/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 3/8 binary64)) #s(literal 1 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64)) #s(literal 1/8 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 #s(literal 1/8 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))))
(exp.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/16 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64))) #s(literal 1/16 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #s(literal 1/2 binary64)))
(sqrt.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)))
(pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 1 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64)) #s(literal 1/16 binary64))
(pow.f64 (exp.f64 #s(literal 1/8 binary64)) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 1/2 binary64)) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)) (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) #s(literal 1/2 binary64)) (pow.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/8 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)) #s(literal 1/2 binary64)) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 3/16 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 3/16 binary64)) #s(literal 1/2 binary64)) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64)) #s(literal 1/8 binary64)) #s(literal 1/2 binary64)) (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)) #s(literal 1/2 binary64)))
(+.f64 (*.f64 #s(literal 2 binary64) (hypot.f64 re im)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) re)))
(+.f64 (*.f64 (hypot.f64 re im) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)))
(exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
(fma.f64 #s(literal 2 binary64) (hypot.f64 re im) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) re)))
(fma.f64 (hypot.f64 re im) #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re))) (+.f64 re (hypot.f64 re im)))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) #s(literal 2 binary64)) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))
(/.f64 (*.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)) #s(literal 2 binary64)) (+.f64 re (hypot.f64 re im)))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))) (neg.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)))) (neg.f64 (+.f64 re (hypot.f64 re im))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) #s(literal 2 binary64))) (neg.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)) #s(literal 2 binary64))) (neg.f64 (+.f64 re (hypot.f64 re im))))
(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
(*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 re))) (*.f64 #s(literal -1/2 binary64) (/.f64 im (sqrt.f64 re))))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 im (sqrt.f64 re))))
(neg.f64 (/.f64 (*.f64 im #s(literal -1/2 binary64)) (sqrt.f64 re)))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
(/.f64 (*.f64 im #s(literal -1/2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 im #s(literal -1/2 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) #s(literal 1 binary64)) (sqrt.f64 re))
(/.f64 (neg.f64 (neg.f64 (*.f64 im #s(literal -1/2 binary64)))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64)) #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) (pow.f64 re #s(literal -1/2 binary64))))
(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))
(*.f64 (*.f64 im #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re))))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) im))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) im)) #s(literal -1 binary64)))
(*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 0 binary64) im) (sqrt.f64 re)))
(*.f64 (/.f64 im #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(*.f64 (/.f64 im #s(literal -1 binary64)) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)))
(*.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 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 1/4 binary64))))
(*.f64 #s(literal 1/2 binary64) im)
(*.f64 im #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 re) #s(literal 1/2 binary64)))
(sqrt.f64 re)
(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))
(pow.f64 (exp.f64 (log.f64 re)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 re #s(literal 1/4 binary64)) (pow.f64 re #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 re))) (*.f64 #s(literal -1/2 binary64) (/.f64 im (sqrt.f64 re))))
(neg.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 im (sqrt.f64 re))))
(neg.f64 (/.f64 (*.f64 im #s(literal -1/2 binary64)) (sqrt.f64 re)))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
(/.f64 (*.f64 im #s(literal -1/2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (*.f64 im #s(literal -1/2 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) #s(literal 1 binary64)) (sqrt.f64 re))
(/.f64 (neg.f64 (neg.f64 (*.f64 im #s(literal -1/2 binary64)))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64)) #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) (pow.f64 re #s(literal -1/2 binary64))))
(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))
(*.f64 (*.f64 im #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re))))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) im))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) im)) #s(literal -1 binary64)))
(*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 #s(literal 0 binary64) im) (sqrt.f64 re)))
(*.f64 (/.f64 im #s(literal 1 binary64)) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(*.f64 (/.f64 im #s(literal -1 binary64)) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)))
(*.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 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 1/4 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 im im) re)) #s(literal 1/2 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 re))) (/.f64 im (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(sqrt.f64 (/.f64 (*.f64 im im) re))
(/.f64 im (sqrt.f64 re))
(/.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (/.f64 re (*.f64 im im)) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 re) im)))
(/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 re (*.f64 im im)))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)))) (sqrt.f64 (neg.f64 (-.f64 #s(literal 0 binary64) re))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 im im) #s(literal 1 binary64))) (sqrt.f64 re))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im)) (neg.f64 (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64))))
(pow.f64 (/.f64 (*.f64 im im) re) #s(literal 1/2 binary64))
(pow.f64 (/.f64 re (*.f64 im im)) #s(literal -1/2 binary64))
(pow.f64 (/.f64 (sqrt.f64 re) im) #s(literal -1 binary64))
(pow.f64 (pow.f64 (/.f64 re (*.f64 im im)) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 im im) re) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64))
(*.f64 im (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 im (sqrt.f64 re)))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) im)
(*.f64 (sqrt.f64 im) (sqrt.f64 (/.f64 im re)))
(*.f64 (sqrt.f64 (/.f64 im re)) (sqrt.f64 im))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re))))
(*.f64 (pow.f64 (/.f64 re (*.f64 im im)) #s(literal -1/4 binary64)) (pow.f64 (/.f64 re (*.f64 im im)) #s(literal -1/4 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (/.f64 im (sqrt.f64 re)))
(*.f64 (/.f64 (sqrt.f64 im) (pow.f64 re #s(literal 1/4 binary64))) (/.f64 (sqrt.f64 im) (pow.f64 re #s(literal 1/4 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 re (*.f64 im im))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re)) (/.f64 (*.f64 im im) (-.f64 #s(literal 0 binary64) re)))
(neg.f64 (/.f64 (*.f64 im im) (-.f64 #s(literal 0 binary64) re)))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) re))
(/.f64 (*.f64 im im) re)
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (-.f64 #s(literal 0 binary64) re))
(/.f64 #s(literal 1 binary64) (/.f64 re (*.f64 im im)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 re (*.f64 im im)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 re (*.f64 im im)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 re (*.f64 im im))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 re (*.f64 im im)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im))) (neg.f64 (-.f64 #s(literal 0 binary64) re)))
(/.f64 (*.f64 (*.f64 im im) #s(literal 1 binary64)) re)
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) re))))
(/.f64 (neg.f64 (*.f64 (*.f64 im im) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) re))
(pow.f64 (/.f64 re (*.f64 im im)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 re (*.f64 im im)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 im (/.f64 im re))
(*.f64 (*.f64 im im) (/.f64 #s(literal 1 binary64) re))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) 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 (/.f64 im re) im)
(*.f64 (/.f64 im #s(literal 1 binary64)) (/.f64 im re))
(*.f64 (/.f64 im #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) im) re))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)))
(fabs.f64 (*.f64 im im))
(sqrt.f64 (*.f64 im (*.f64 im (*.f64 im im))))
(pow.f64 im #s(literal 2 binary64))
(pow.f64 (*.f64 im im) #s(literal 1 binary64))
(pow.f64 (-.f64 #s(literal 0 binary64) im) #s(literal 2 binary64))
(pow.f64 (*.f64 im (*.f64 im (*.f64 im im))) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 (log.f64 im)) #s(literal 2 binary64))
(*.f64 im im)
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 0 binary64) im))
(*.f64 (exp.f64 (log.f64 im)) (exp.f64 (log.f64 im)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))) #s(literal 1/2 binary64)))
(sqrt.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 #s(literal 2 binary64) im)))) (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))))) (sqrt.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 #s(literal 2 binary64) im))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))))) (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))))) (sqrt.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 #s(literal 2 binary64) im)))))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))) (*.f64 (*.f64 im im) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 #s(literal 2 binary64) im))))
(/.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))))))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 #s(literal 2 binary64) im)))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))))) (neg.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))))))
(pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))) (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 #s(literal 2 binary64) im))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 #s(literal 2 binary64) im)))))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))))))
(*.f64 (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))) #s(literal 1/4 binary64)))
(+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))
(+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 #s(literal 2 binary64) im))
(+.f64 (*.f64 re #s(literal -2 binary64)) (+.f64 (/.f64 re (/.f64 im (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))))) (*.f64 #s(literal 2 binary64) im)))
(+.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re #s(literal -2 binary64))) (/.f64 re (/.f64 im (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))))))
(-.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))) (/.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))))
(-.f64 (/.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 #s(literal 2 binary64) im))) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 #s(literal 2 binary64) im))))
(fma.f64 #s(literal 2 binary64) im (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))
(fma.f64 re #s(literal -2 binary64) (+.f64 (/.f64 re (/.f64 im (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))))) (*.f64 #s(literal 2 binary64) im)))
(fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (*.f64 #s(literal 2 binary64) im))
(fma.f64 im #s(literal 2 binary64) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))
(fma.f64 #s(literal -2 binary64) re (+.f64 (/.f64 re (/.f64 im (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))))) (*.f64 #s(literal 2 binary64) im)))
(fma.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) re (*.f64 #s(literal 2 binary64) im))
(/.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))))) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 #s(literal 2 binary64) im)))))
(/.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))))) (+.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 #s(literal 2 binary64) im)))) (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))))))
(/.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 #s(literal 2 binary64) im)))) (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))))) (neg.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 #s(literal 2 binary64) im))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))))) (neg.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))))) (neg.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))))
(/.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))) (*.f64 (*.f64 im im) #s(literal 4 binary64))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 #s(literal 2 binary64) im)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))) (*.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))))) (*.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 #s(literal 2 binary64) im)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))))) (neg.f64 (neg.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))) (*.f64 (*.f64 im im) #s(literal 4 binary64)))) (neg.f64 (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 #s(literal 2 binary64) im))))
(pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 #s(literal 2 binary64) im)))) (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))))) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))) (*.f64 #s(literal 2 binary64) im))))))
(*.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im))))))
(*.f64 #s(literal 2 binary64) im)
(*.f64 im #s(literal 2 binary64))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 #s(literal 4 binary64) (*.f64 #s(literal 1/8 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))))
(exp.f64 (log.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 #s(literal 1/8 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))) #s(literal 1 binary64)))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))) (sqrt.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)))) (sqrt.f64 (+.f64 re (hypot.f64 re im))))
(/.f64 (sqrt.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) #s(literal 2 binary64))) (sqrt.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (sqrt.f64 (*.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)) #s(literal 2 binary64))) (sqrt.f64 (+.f64 re (hypot.f64 re im))))
(pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 4 binary64))
(pow.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)) #s(literal 8 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64))) #s(literal 1/8 binary64))
(pow.f64 (exp.f64 #s(literal 4 binary64)) (*.f64 #s(literal 1/8 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 3/8 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 3/8 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/8 binary64)) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 3/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 3/8 binary64)) #s(literal 1 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64)) #s(literal 1/8 binary64)) #s(literal 2 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))))
(exp.f64 (*.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/16 binary64)) #s(literal 4 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64))) #s(literal 1/8 binary64)))
(pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 1 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)) #s(literal 4 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64)) #s(literal 1/8 binary64))
(pow.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64))) #s(literal 1/16 binary64))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 3/16 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64)) #s(literal 1/8 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 3/16 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/16 binary64)) #s(literal 4 binary64)) (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/16 binary64)) #s(literal 4 binary64)))
(*.f64 (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/16 binary64)) #s(literal 4 binary64)) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/16 binary64)) #s(literal 4 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/32 binary64)) #s(literal 4 binary64)) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/32 binary64)) #s(literal 4 binary64)))
(*.f64 (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #s(literal 1/8 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 3/16 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 3/16 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/16 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64)) #s(literal 1/8 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 2 binary64) (hypot.f64 re im)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) re)))
(+.f64 (*.f64 (hypot.f64 re im) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)))
(exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
(fma.f64 #s(literal 2 binary64) (hypot.f64 re im) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) re)))
(fma.f64 (hypot.f64 re im) #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re))) (+.f64 re (hypot.f64 re im)))
(/.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) #s(literal 2 binary64)) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))
(/.f64 (*.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)) #s(literal 2 binary64)) (+.f64 re (hypot.f64 re im)))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))) (neg.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)))) (neg.f64 (+.f64 re (hypot.f64 re im))))
(/.f64 (neg.f64 (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) #s(literal 2 binary64))) (neg.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)) #s(literal 2 binary64))) (neg.f64 (+.f64 re (hypot.f64 re im))))
(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
(*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))
(+.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re))
(+.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im))
(exp.f64 (log.f64 (-.f64 (hypot.f64 re im) re)))
(-.f64 (hypot.f64 re im) re)
(-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))) (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(-.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im))) (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im))))
(-.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re))) (/.f64 (*.f64 re re) (-.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re))))
(fma.f64 #s(literal -1 binary64) re (hypot.f64 re im))
(fma.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)) (-.f64 #s(literal 0 binary64) re))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re re) (*.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re (hypot.f64 re im)) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re))))
(/.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)) (+.f64 re (hypot.f64 re im)))
(/.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)) (-.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 re (hypot.f64 re im)) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (neg.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (neg.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re re) (*.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re))))))
(/.f64 (neg.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re))) (neg.f64 (+.f64 re (hypot.f64 re im))))
(/.f64 (neg.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re))) (neg.f64 (-.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re))))
(/.f64 (exp.f64 (log.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))) (exp.f64 (log.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (exp.f64 (log.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)))) (exp.f64 (log.f64 (+.f64 re (hypot.f64 re im)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))) (*.f64 re (*.f64 re re)))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im))) (*.f64 (+.f64 re (hypot.f64 re im)) (*.f64 re re))) (*.f64 (+.f64 re (hypot.f64 re im)) (+.f64 re (hypot.f64 re im))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))) (neg.f64 (neg.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)))) (neg.f64 (neg.f64 (+.f64 re (hypot.f64 re im)))))
(pow.f64 (/.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 re (hypot.f64 re im)) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(*.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)) (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 im im))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im im))))
(neg.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im im))))
(neg.f64 (/.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/4 binary64)) (*.f64 im im)))
(/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))
(/.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/4 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 im im)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 im im) (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 im (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re (*.f64 re re)) im))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))))))
(/.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re (*.f64 re re)) im)) im)
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 im (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re (*.f64 re re)) im)))))
(/.f64 (*.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal 1 binary64)) (*.f64 im im))
(/.f64 (neg.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/4 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im))))
(/.f64 (neg.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re (*.f64 re re)) im))) (-.f64 #s(literal 0 binary64) im))
(/.f64 (*.f64 (/.f64 #s(literal -1/4 binary64) im) (*.f64 re (*.f64 re re))) im)
(/.f64 (neg.f64 (*.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 im im)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/4 binary64)))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re (*.f64 re re)) im)))) (neg.f64 (-.f64 #s(literal 0 binary64) im)))
(/.f64 (neg.f64 (*.f64 (/.f64 #s(literal -1/4 binary64) im) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) im))
(pow.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 im (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re (*.f64 re re)) im))) #s(literal -1 binary64))
(*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im im)))
(*.f64 (*.f64 re (*.f64 re re)) (*.f64 #s(literal -1/4 binary64) (/.f64 #s(literal 1 binary64) (*.f64 im im))))
(*.f64 (*.f64 re (*.f64 re re)) (/.f64 #s(literal -1/4 binary64) (*.f64 im im)))
(*.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 im im)))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im)))
(*.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/4 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 im im))))
(*.f64 (/.f64 #s(literal -1/4 binary64) im) (/.f64 (*.f64 re (*.f64 re re)) im))
(*.f64 (/.f64 (*.f64 re (*.f64 re re)) im) (/.f64 #s(literal -1/4 binary64) im))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) (pow.f64 (/.f64 #s(literal -1 binary64) (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/4 binary64))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) im) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re (*.f64 re re)) im)))
(*.f64 (*.f64 re #s(literal -1/4 binary64)) (*.f64 (*.f64 re re) (/.f64 #s(literal 1 binary64) (*.f64 im im))))
(*.f64 (*.f64 re #s(literal -1/4 binary64)) (/.f64 (*.f64 re re) (*.f64 im im)))
(*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re (*.f64 re re)) im)) (/.f64 #s(literal 1 binary64) im))
(*.f64 (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im im)) #s(literal -1/4 binary64))
(*.f64 (/.f64 (*.f64 re #s(literal -1/4 binary64)) im) (/.f64 (*.f64 re re) im))
(*.f64 (/.f64 (*.f64 re re) im) (/.f64 (*.f64 re #s(literal -1/4 binary64)) im))
(*.f64 (/.f64 re im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) im))
(*.f64 (pow.f64 (/.f64 im (*.f64 re #s(literal -1/4 binary64))) #s(literal -1 binary64)) (pow.f64 (/.f64 im (*.f64 re re)) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 re #s(literal -1/4 binary64)) (-.f64 #s(literal 0 binary64) im)) (/.f64 (neg.f64 (*.f64 re re)) im))
(*.f64 (/.f64 (*.f64 re (*.f64 re re)) (-.f64 #s(literal 0 binary64) im)) (/.f64 #s(literal 1/4 binary64) im))
(*.f64 (/.f64 #s(literal -1/4 binary64) (-.f64 #s(literal 0 binary64) im)) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re))) im))
(*.f64 (/.f64 (*.f64 re (*.f64 re re)) #s(literal -1 binary64)) (/.f64 #s(literal 1/4 binary64) (*.f64 im im)))
(*.f64 (/.f64 (*.f64 re #s(literal -1/4 binary64)) #s(literal -1 binary64)) (/.f64 (neg.f64 (*.f64 re re)) (*.f64 im im)))
(*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) im) (/.f64 re im))
(*.f64 (/.f64 (*.f64 (*.f64 re #s(literal -1/4 binary64)) re) im) (/.f64 re im))
(*.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re))) im) (/.f64 #s(literal -1/4 binary64) (-.f64 #s(literal 0 binary64) im)))
(*.f64 (/.f64 #s(literal 1/4 binary64) im) (/.f64 (*.f64 re (*.f64 re re)) (-.f64 #s(literal 0 binary64) im)))
(*.f64 (/.f64 #s(literal -1 binary64) im) (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (-.f64 #s(literal 0 binary64) im)))
(*.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re))) #s(literal -1 binary64)) (/.f64 #s(literal -1/4 binary64) (*.f64 im im)))
(*.f64 (/.f64 (neg.f64 (*.f64 re #s(literal -1/4 binary64))) im) (/.f64 (*.f64 re re) (-.f64 #s(literal 0 binary64) im)))
(*.f64 (/.f64 (neg.f64 (*.f64 re #s(literal -1/4 binary64))) #s(literal -1 binary64)) (/.f64 (*.f64 re re) (*.f64 im im)))
(exp.f64 (*.f64 (log.f64 re) #s(literal 3 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 re)) #s(literal 3/2 binary64)))
(pow.f64 re #s(literal 3 binary64))
(pow.f64 (*.f64 re re) #s(literal 3/2 binary64))
(pow.f64 (pow.f64 re #s(literal 3/2 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 re)) #s(literal 3 binary64))
(*.f64 re (*.f64 re re))
(*.f64 (*.f64 re re) re)
(*.f64 (pow.f64 re #s(literal 3/2 binary64)) (pow.f64 re #s(literal 3/2 binary64)))
(*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64)))
(*.f64 (*.f64 re re) (*.f64 re #s(literal -1/4 binary64)))
(*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))
(*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/4 binary64))
(*.f64 (*.f64 re #s(literal -1/4 binary64)) (*.f64 re re))
(*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) re)
(*.f64 (*.f64 (*.f64 re #s(literal -1/4 binary64)) re) re)
(+.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re))
(+.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im))
(exp.f64 (log.f64 (-.f64 (hypot.f64 re im) re)))
(-.f64 (hypot.f64 re im) re)
(-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))) (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(-.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im))) (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im))))
(-.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re))) (/.f64 (*.f64 re re) (-.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re))))
(fma.f64 #s(literal -1 binary64) re (hypot.f64 re im))
(fma.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)) (-.f64 #s(literal 0 binary64) re))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re re) (*.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re (hypot.f64 re im)) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re))))
(/.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)) (+.f64 re (hypot.f64 re im)))
(/.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)) (-.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 re (hypot.f64 re im)) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (neg.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (neg.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re re) (*.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re))))))
(/.f64 (neg.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re))) (neg.f64 (+.f64 re (hypot.f64 re im))))
(/.f64 (neg.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re))) (neg.f64 (-.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re))))
(/.f64 (exp.f64 (log.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))) (exp.f64 (log.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (exp.f64 (log.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)))) (exp.f64 (log.f64 (+.f64 re (hypot.f64 re im)))))
(/.f64 (-.f64 (*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))) (*.f64 re (*.f64 re re)))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im))) (*.f64 (+.f64 re (hypot.f64 re im)) (*.f64 re re))) (*.f64 (+.f64 re (hypot.f64 re im)) (+.f64 re (hypot.f64 re im))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))) (neg.f64 (neg.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)))) (neg.f64 (neg.f64 (+.f64 re (hypot.f64 re im)))))
(pow.f64 (/.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 re (hypot.f64 re im)) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re))) #s(literal -1 binary64))
(*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(*.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)) (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))))
#s(literal 2 binary64)
(log.f64 #s(literal 2 binary64))

simplify416.0ms (4%)

Algorithm
egg-herbie
Rules
6622×*-lowering-*.f32
6622×*-lowering-*.f64
5370×+-lowering-+.f64
5370×+-lowering-+.f32
1410×distribute-lft-in
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
011579690
139609063
082979063
Stop Event
iter limit
node limit
Counts
504 → 504
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))))))))
(* (sqrt im) (sqrt 2))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(* im (sqrt (/ 1 re)))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (* im (sqrt (/ 1 re))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re)))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* -1/128 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re))))))
(* -2 (* (sqrt re) (sqrt -1)))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -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))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* im (sqrt (/ 1 re)))
(* im (+ (sqrt (/ 1 re)) (* -1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* 7/128 (* (pow im 2) (sqrt (/ 1 (pow re 9)))))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* (pow im 2) (+ (* -33/1024 (* (pow im 2) (sqrt (/ 1 (pow re 13))))) (* 7/128 (sqrt (/ 1 (pow re 9))))))))))
(* (sqrt im) (sqrt 2))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (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 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt 2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(pow (* 2 im) 1/8)
(+ (* -1/8 (* (pow (/ 2 (pow im 7)) 1/8) re)) (pow (* 2 im) 1/8))
(+ (* re (+ (* -1/8 (pow (/ 2 (pow im 7)) 1/8)) (* 1/128 (* (pow (/ 2 (pow im 15)) 1/8) re)))) (pow (* 2 im) 1/8))
(+ (* re (+ (* -1/8 (pow (/ 2 (pow im 7)) 1/8)) (* re (+ (* 1/128 (pow (/ 2 (pow im 15)) 1/8)) (* 21/1024 (* (pow (/ 2 (pow im 23)) 1/8) re)))))) (pow (* 2 im) 1/8))
(exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/6144 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/196608 (pow im 6)) (* 1/5760 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))
(exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))
(+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))))
(+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))
(+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/196608 (pow im 6)) (+ (* 1/6144 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))))) (* 1/5760 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))
(exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 2))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/32 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* 25/2048 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 4))))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/32 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* (pow im 2) (+ (* -451/65536 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 6))) (* 25/2048 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 4))))))))
(exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/128 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/3072 (pow re 3)) (* 1/48 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) (pow im 3)) (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))
(exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* 1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* -1/8 (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* -1/128 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/3072 (pow re 3)) (* 1/48 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) im)) (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* -1/8 (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(* 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 (* 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 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(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 (* 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 (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))))
(* 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)))
(* -1 (* im (sqrt (/ 1 re))))
(* -1 (* im (sqrt (/ 1 re))))
(* -1 (* im (sqrt (/ 1 re))))
(* -1 (* 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)))
(/ (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)
(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)
(* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))
(/ (+ (* 1/4 (* (sqrt (pow im 5)) (/ 1 (sqrt -1/4)))) (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4))))) (pow im 2))
(/ (+ (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (* (pow im 3) (+ (* -1/2 (* (sqrt im) (/ 1 (* re (sqrt -1/4))))) (* 1/4 (* (sqrt (/ 1 im)) (/ 1 (sqrt -1/4))))))) (pow im 2))
(/ (+ (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (* (pow im 3) (+ (* 1/4 (* (sqrt (/ 1 im)) (/ 1 (sqrt -1/4)))) (* im (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (* re (sqrt -1/4))))) (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4)))))))))) (pow im 2))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* 1/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)))) (* 1/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) (pow (sqrt 2) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(* -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)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(* -1 (* im (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))))
(* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))
(* (pow re 2) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))
(* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* (pow re 4) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))))
(* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))
(* (pow re 2) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))
(* (pow re 2) (+ (* -1 (/ (+ (* -1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* re (sqrt -1/4))))) (* 1/2 (* (sqrt (pow im 3)) (/ 1 (sqrt -1/4))))) (pow re 3))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))
(* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))
(/ (+ (* 1/2 (* (sqrt (pow im 5)) (/ 1 (sqrt -1/4)))) (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (pow im 2))
(/ (+ (* (sqrt im) (* (pow re 2) (sqrt -1/4))) (* (pow im 3) (+ (* -1 (* (sqrt im) (/ 1 (* re (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt -1/4))))))) (pow im 2))
(/ (+ (* (sqrt im) (* (pow re 2) (sqrt -1/4))) (* (pow im 3) (+ (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt -1/4)))) (* im (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (* re (sqrt -1/4))))) (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))))))) (pow im 2))
(* (sqrt im) (sqrt 2))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(* (sqrt im) (sqrt 2))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))
(* (pow re 2) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))
(* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* (pow re 4) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))
(* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))
(* (pow re 2) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))
(* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(* (pow re 2) (+ (* -1 (/ (+ (* -1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* re (sqrt -1/4))))) (* (sqrt (pow im 3)) (/ 1 (sqrt -1/4)))) (pow re 3))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(* -1/4 (/ (pow re 4) (pow im 3)))
(/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (pow re 2))) (pow im 3))
(/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (+ (* -2 (* im re)) (pow re 2)))) (pow im 3))
(/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)))) (pow im 3))
(* 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 (/ re im)) 2)))
(* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))
(* -1 (* im (- (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1 (pow re 2)) (* 1/4 (/ (pow re 4) (pow im 2)))) im))) im)) 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)))
(* -1/4 (/ (pow re 4) (pow im 3)))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))
(* (pow re 4) (- (+ (* 2 (/ im (pow re 4))) (/ 1 (* im (pow re 2)))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))
(* -1/4 (/ (pow re 4) (pow im 3)))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))
(* (pow re 4) (- (+ (* -1 (/ (+ 2 (* -2 (/ im re))) (pow re 3))) (/ 1 (* im (pow re 2)))) (* 1/4 (/ 1 (pow im 3)))))
(* 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 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(* im (sqrt (/ 1 re)))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (* im (sqrt (/ 1 re))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re)))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* -1/128 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re))))))
(* -2 (* (sqrt re) (sqrt -1)))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -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))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* im (sqrt (/ 1 re)))
(* im (+ (sqrt (/ 1 re)) (* -1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* 7/128 (* (pow im 2) (sqrt (/ 1 (pow re 9)))))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* (pow im 2) (+ (* -33/1024 (* (pow im 2) (sqrt (/ 1 (pow re 13))))) (* 7/128 (sqrt (/ 1 (pow re 9))))))))))
(* (sqrt im) (sqrt 2))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (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 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt 2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(pow (* 2 im) 1/4)
(+ (* -1/4 (* (pow (/ 2 (pow im 3)) 1/4) re)) (pow (* 2 im) 1/4))
(+ (* re (+ (* -1/4 (pow (/ 2 (pow im 3)) 1/4)) (* 1/32 (* (pow (/ 2 (pow im 7)) 1/4) re)))) (pow (* 2 im) 1/4))
(+ (* re (+ (* -1/4 (pow (/ 2 (pow im 3)) 1/4)) (* re (+ (* 1/32 (pow (/ 2 (pow im 7)) 1/4)) (* 5/128 (* (pow (/ 2 (pow im 11)) 1/4) re)))))) (pow (* 2 im) 1/4))
(exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/1536 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/24576 (pow im 6)) (* 1/2880 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))
(exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/24576 (pow im 6)) (+ (* 1/2880 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6))))) (* 1/1536 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (pow re 6)) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))
(exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 2))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/16 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* 13/512 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 4))))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/16 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* (pow im 2) (+ (* -119/8192 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 6))) (* 13/512 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 4))))))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/384 (pow re 3)) (* 1/24 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) (pow im 3)) (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* 1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* -1/4 (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* -1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/384 (pow re 3)) (* 1/24 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) im)) (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* -1/4 (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(* 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/4 (/ (pow re 3) (pow im 2)))
(* -1/4 (/ (pow re 3) (pow im 2)))
(* -1/4 (/ (pow re 3) (pow im 2)))
(* -1/4 (/ (pow re 3) (pow im 2)))
(* -1/4 (/ (pow re 3) (pow im 2)))
(* -1/4 (/ (pow re 3) (pow im 2)))
(* -1/4 (/ (pow re 3) (pow im 2)))
(* -1/4 (/ (pow re 3) (pow im 2)))
(* -1/4 (/ (pow re 3) (pow im 2)))
(* -1/4 (/ (pow re 3) (pow im 2)))
(* -1/4 (/ (pow re 3) (pow im 2)))
(* -1/4 (/ (pow re 3) (pow im 2)))
(* -1/4 (/ (pow re 3) (pow im 2)))
(* -1/4 (/ (pow re 3) (pow im 2)))
(* -1/4 (/ (pow re 3) (pow im 2)))
(* -1/4 (/ (pow re 3) (pow im 2)))
(* -1/4 (/ (pow re 3) (pow im 2)))
(* -1/4 (/ (pow re 3) (pow im 2)))
(* -1/4 (/ (pow re 3) (pow im 2)))
(* -1/4 (/ (pow re 3) (pow im 2)))
(* -1/4 (/ (pow re 3) (pow im 2)))
(* -1/4 (/ (pow re 3) (pow im 2)))
(* -1/4 (/ (pow re 3) (pow im 2)))
(* -1/4 (/ (pow re 3) (pow im 2)))
(pow re 3)
(pow re 3)
(pow re 3)
(pow re 3)
(pow re 3)
(pow re 3)
(pow re 3)
(pow re 3)
(pow re 3)
(pow re 3)
(pow re 3)
(pow re 3)
(* -1/4 (pow re 3))
(* -1/4 (pow re 3))
(* -1/4 (pow re 3))
(* -1/4 (pow re 3))
(* -1/4 (pow re 3))
(* -1/4 (pow re 3))
(* -1/4 (pow re 3))
(* -1/4 (pow re 3))
(* -1/4 (pow re 3))
(* -1/4 (pow re 3))
(* -1/4 (pow re 3))
(* -1/4 (pow re 3))
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
(* 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))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.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))))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 re (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))))) (*.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)))))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.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))))
(+ (* -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)))))
(+.f64 (*.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 (*.f64 (sqrt.f64 #s(literal 2 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)))))))
(+ (* -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))))))
(+.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 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 #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/64 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))) (sqrt.f64 #s(literal 1/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)))))))
(+.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (+.f64 (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/64 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/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))))))
(* -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)))))))
(*.f64 (+.f64 (*.f64 #s(literal -1/8 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 #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 #s(literal 0 binary64) 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 (-.f64 (*.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/32 binary64) (*.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))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) 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 #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.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))))
(* 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 (+.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 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))))) (*.f64 #s(literal 1/2 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 (+ (* 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 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.f64 (*.f64 im im) (+.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (*.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/256 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 re)) (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)))) (* (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 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.f64 (*.f64 im im) (+.f64 (*.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 im im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im im)) (+.f64 (*.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/256 binary64) (*.f64 #s(literal 1/2 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 #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/256 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/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 (+.f64 (*.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)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (*.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)))))) (+.f64 (*.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/8 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 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 (+.f64 (*.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)))))) (+.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/16 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 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 (+.f64 (*.f64 #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 -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 #s(literal 0 binary64) 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 (+.f64 (*.f64 #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 -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (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/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)))))))) (-.f64 #s(literal 0 binary64) 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 (+.f64 (*.f64 #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 -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 im) (*.f64 re re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) #s(literal 3/16 binary64)) (*.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(-.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (-.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (* im (sqrt (/ 1 re))))
(+.f64 (*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re)))))
(+.f64 (+.f64 (*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (*.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* -1/128 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re))))))
(+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (+.f64 (*.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))) #s(literal 7/128 binary64)) (*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* -2 (* (sqrt re) (sqrt -1)))
(*.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -1 binary64)))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(*.f64 (+.f64 (*.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))))) (-.f64 #s(literal 0 binary64) 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))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (+.f64 (*.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 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) #s(literal 1/4 binary64))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (+.f64 (*.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 -3/64 binary64)) (*.f64 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) #s(literal 1/4 binary64))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (+ (sqrt (/ 1 re)) (* -1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))
(*.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* 7/128 (* (pow im 2) (sqrt (/ 1 (pow re 9)))))))))
(*.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/8 binary64)) (*.f64 (*.f64 #s(literal 7/128 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* (pow im 2) (+ (* -33/1024 (* (pow im 2) (sqrt (/ 1 (pow re 13))))) (* 7/128 (sqrt (/ 1 (pow re 9))))))))))
(*.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/8 binary64)) (*.f64 (*.f64 im im) (+.f64 (*.f64 (*.f64 #s(literal -33/1024 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 13 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) #s(literal 7/128 binary64))))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(*.f64 im (-.f64 (*.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 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (+.f64 (-.f64 (*.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 re (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (+.f64 (-.f64 (*.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 re (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 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 0 binary64) im))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 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/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt 2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (-.f64 (-.f64 (*.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/2 binary64) (sqrt.f64 im)) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 im (*.f64 im im)))) (/.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 0 binary64) im))
(pow (* 2 im) 1/8)
(pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/8 binary64))
(+ (* -1/8 (* (pow (/ 2 (pow im 7)) 1/8) re)) (pow (* 2 im) 1/8))
(+.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/8 binary64)) (*.f64 #s(literal -1/8 binary64) (*.f64 re (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 7 binary64))) #s(literal 1/8 binary64)))))
(+ (* re (+ (* -1/8 (pow (/ 2 (pow im 7)) 1/8)) (* 1/128 (* (pow (/ 2 (pow im 15)) 1/8) re)))) (pow (* 2 im) 1/8))
(+.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/8 binary64)) (*.f64 re (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 7 binary64))) #s(literal 1/8 binary64))) (*.f64 #s(literal 1/128 binary64) (*.f64 re (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 15 binary64))) #s(literal 1/8 binary64)))))))
(+ (* re (+ (* -1/8 (pow (/ 2 (pow im 7)) 1/8)) (* re (+ (* 1/128 (pow (/ 2 (pow im 15)) 1/8)) (* 21/1024 (* (pow (/ 2 (pow im 23)) 1/8) re)))))) (pow (* 2 im) 1/8))
(+.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/8 binary64)) (*.f64 re (+.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 7 binary64))) #s(literal 1/8 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal 1/128 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 15 binary64))) #s(literal 1/8 binary64))) (*.f64 #s(literal 21/1024 binary64) (*.f64 re (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 23 binary64))) #s(literal 1/8 binary64)))))))))
(exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))
(exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))))) (*.f64 re re)))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))
(+.f64 (+.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (*.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (/.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/2048 binary64)) (*.f64 #s(literal 1/192 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64)))) (pow.f64 re #s(literal 4 binary64))))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))))) (*.f64 re re)))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/6144 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/196608 (pow im 6)) (* 1/5760 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (+.f64 (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))))) (*.f64 re re)) (*.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (+.f64 (/.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/2048 binary64)) (*.f64 #s(literal 1/192 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64)))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/6144 binary64) (*.f64 im im)) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64))) (+.f64 (*.f64 #s(literal -1/196608 binary64) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal 1/5760 binary64) (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (*.f64 im im))) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 75/4 binary64)))))) (pow.f64 re #s(literal 6 binary64)))))))
(exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))
(exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re)))))
(+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (/.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))))) (*.f64 re re)))
(+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))
(+.f64 (+.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (*.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (/.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/2048 binary64)) (*.f64 #s(literal 1/192 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64)))) (pow.f64 re #s(literal 4 binary64))))) (/.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))))) (*.f64 re re)))
(+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/196608 (pow im 6)) (+ (* 1/6144 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))))) (* 1/5760 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))
(+.f64 (+.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (*.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (/.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/2048 binary64)) (*.f64 #s(literal 1/192 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64)))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (+.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 1/196608 binary64)) (*.f64 (*.f64 #s(literal 1/6144 binary64) (*.f64 im im)) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64)))) (*.f64 #s(literal 1/5760 binary64) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 75/2 binary64)))) (pow.f64 re #s(literal 6 binary64)))))) (/.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))))) (*.f64 re re)))
(exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))
(exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))) (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))))) (*.f64 re re)))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/32 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* 25/2048 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 4))))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -1/32 binary64) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))) (*.f64 re re)) (/.f64 (*.f64 #s(literal 25/2048 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))))) (pow.f64 re #s(literal 4 binary64))))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/32 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* (pow im 2) (+ (* -451/65536 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 6))) (* 25/2048 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 4))))))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -1/32 binary64) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))) (*.f64 re re)) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -451/65536 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))))) (pow.f64 re #s(literal 6 binary64))) (/.f64 (*.f64 #s(literal 25/2048 binary64) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))) (pow.f64 re #s(literal 4 binary64))))))))
(exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))
(+.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))) im))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))) im) (*.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (/.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/128 binary64)) #s(literal 0 binary64)) (*.f64 im im)))))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/128 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/3072 (pow re 3)) (* 1/48 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) (pow im 3)) (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))) im) (*.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/128 binary64)) #s(literal 0 binary64)) (*.f64 im im)) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/128 binary64) re) #s(literal 0 binary64)) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/3072 binary64)) (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/48 binary64)))) (*.f64 im (*.f64 im im)))))))
(exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))
(exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* 1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))
(+.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))))) im))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* -1/8 (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(-.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) re) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/128 binary64)) #s(literal 0 binary64)) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) im)) im))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* -1/128 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/3072 (pow re 3)) (* 1/48 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) im)) (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* -1/8 (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(-.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) re) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/128 binary64)) #s(literal 0 binary64)) (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (*.f64 (exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/128 binary64) re) #s(literal 0 binary64)) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/3072 binary64)) (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/48 binary64)))) im))) im)) im))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+.f64 (*.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)))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im 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 (+.f64 (*.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 (+.f64 (+.f64 (*.f64 im im) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re))) (/.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 (+.f64 (+.f64 (*.f64 im im) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re))) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.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 (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(*.f64 (+.f64 (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) 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 (+.f64 (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 im im) (*.f64 re re))) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))) (-.f64 #s(literal 0 binary64) 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) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (*.f64 re (*.f64 re 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) (+.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re 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) (+.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 (*.f64 im im) (+.f64 (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -5/64 binary64) (*.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)))))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) (/.f64 (*.f64 re re) (*.f64 im im))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(*.f64 im (+.f64 (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) (/.f64 (*.f64 re re) (*.f64 im im))) (/.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)))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 re 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)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (+.f64 (*.f64 re re) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im))) im)) im)) (-.f64 #s(literal 0 binary64) 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)))
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
(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)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 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 (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 0 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)))
(* -1 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 #s(literal 0 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)) (-.f64 #s(literal 0 binary64) im))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 #s(literal 0 binary64) im))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 #s(literal 0 binary64) im))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 #s(literal 0 binary64) 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)
(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)
(* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re re)) (sqrt.f64 #s(literal -1/4 binary64))))
(/ (+ (* 1/4 (* (sqrt (pow im 5)) (/ 1 (sqrt -1/4)))) (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4))))) (pow im 2))
(/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal -1/4 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 im im))
(/ (+ (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (* (pow im 3) (+ (* -1/2 (* (sqrt im) (/ 1 (* re (sqrt -1/4))))) (* 1/4 (* (sqrt (/ 1 im)) (/ 1 (sqrt -1/4))))))) (pow im 2))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))) (*.f64 (*.f64 im (*.f64 im im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 im) (*.f64 re (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1/4 binary64))))))) (*.f64 im im))
(/ (+ (* 1/2 (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (* (pow im 3) (+ (* 1/4 (* (sqrt (/ 1 im)) (/ 1 (sqrt -1/4)))) (* im (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (* re (sqrt -1/4))))) (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4)))))))))) (pow im 2))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))) (*.f64 (*.f64 im (*.f64 im im)) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1/4 binary64)))) (*.f64 im (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 re (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))))))))) (*.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)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (+.f64 (*.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/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 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)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (*.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 2 binary64))))) (+.f64 (*.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 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(*.f64 im (+.f64 (*.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 2 binary64))))) (+.f64 (+.f64 (*.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 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (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 re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (*.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)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (*.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/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.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)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(*.f64 (+.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (sqrt.f64 #s(literal -2 binary64))))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(*.f64 (-.f64 (+.f64 (*.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/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 im)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 im)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64)))))) (*.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 re (*.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))))))
(* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re re)) (sqrt.f64 #s(literal -1/4 binary64))))
(* (pow re 2) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(*.f64 (*.f64 re re) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64))))))
(* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))
(*.f64 (*.f64 re re) (+.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 (*.f64 re (*.f64 re re)) (sqrt.f64 #s(literal -1/4 binary64)))))))
(* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* (pow re 4) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))))
(*.f64 (*.f64 re re) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 (*.f64 re (*.f64 re re)) (sqrt.f64 #s(literal -1/4 binary64))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))) (*.f64 (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (sqrt.f64 #s(literal -1/4 binary64))) (/.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal 1/4 binary64) im) #s(literal 1/4 binary64))) (pow.f64 re #s(literal 4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64)))))))
(* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re re)) (sqrt.f64 #s(literal -1/4 binary64))))
(* (pow re 2) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(*.f64 (*.f64 re re) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64))))))
(* (pow re 2) (+ (* -1/2 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))
(*.f64 (*.f64 re re) (+.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 (*.f64 re (*.f64 re re)) (sqrt.f64 #s(literal -1/4 binary64)))))))
(* (pow re 2) (+ (* -1 (/ (+ (* -1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* re (sqrt -1/4))))) (* 1/2 (* (sqrt (pow im 3)) (/ 1 (sqrt -1/4))))) (pow re 3))) (+ (* 1/4 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))
(*.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64))))) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (/.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal 1/4 binary64) im) #s(literal 1/4 binary64))) (*.f64 re (sqrt.f64 #s(literal -1/4 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 re (*.f64 re re)))))
(* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re re)) (sqrt.f64 #s(literal -1/4 binary64)))
(/ (+ (* 1/2 (* (sqrt (pow im 5)) (/ 1 (sqrt -1/4)))) (* (sqrt im) (* (pow re 2) (sqrt -1/4)))) (pow im 2))
(/.f64 (+.f64 (*.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 im im))
(/ (+ (* (sqrt im) (* (pow re 2) (sqrt -1/4))) (* (pow im 3) (+ (* -1 (* (sqrt im) (/ 1 (* re (sqrt -1/4))))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt -1/4))))))) (pow im 2))
(/.f64 (+.f64 (*.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))) (*.f64 (*.f64 im (*.f64 im im)) (-.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1/4 binary64)))) (/.f64 (sqrt.f64 im) (*.f64 re (sqrt.f64 #s(literal -1/4 binary64))))))) (*.f64 im im))
(/ (+ (* (sqrt im) (* (pow re 2) (sqrt -1/4))) (* (pow im 3) (+ (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt -1/4)))) (* im (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (* re (sqrt -1/4))))) (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))))))) (pow im 2))
(/.f64 (+.f64 (*.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))) (*.f64 (*.f64 im (*.f64 im im)) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1/4 binary64)))) (*.f64 im (-.f64 (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 re (sqrt.f64 #s(literal -1/4 binary64))))))))) (*.f64 im im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(*.f64 im (-.f64 (*.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 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (+.f64 (-.f64 (*.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 re (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (+.f64 (-.f64 (*.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 re (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -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 0 binary64) im))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -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/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (sqrt.f64 #s(literal -2 binary64))))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(*.f64 (-.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64)))))) (*.f64 im (*.f64 im im)))) (/.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 0 binary64) im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(-.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (-.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re re)) (sqrt.f64 #s(literal -1/4 binary64)))
(* (pow re 2) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))
(*.f64 (*.f64 re re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64)))))
(* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(*.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64)))) (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 (*.f64 re (*.f64 re re)) (sqrt.f64 #s(literal -1/4 binary64))))))
(* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* (pow re 4) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))))
(*.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64)))) (*.f64 (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (sqrt.f64 #s(literal -1/4 binary64))) (/.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal 1/4 binary64) im) #s(literal 1/4 binary64))) (pow.f64 re #s(literal 4 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64)))) (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 (*.f64 re (*.f64 re re)) (sqrt.f64 #s(literal -1/4 binary64))))))
(* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1/4)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re re)) (sqrt.f64 #s(literal -1/4 binary64)))
(* (pow re 2) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4))))
(*.f64 (*.f64 re re) (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64)))))
(* (pow re 2) (+ (* -1 (* (sqrt (pow im 3)) (/ 1 (* (pow re 3) (sqrt -1/4))))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(*.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64)))) (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 (*.f64 re (*.f64 re re)) (sqrt.f64 #s(literal -1/4 binary64))))))
(* (pow re 2) (+ (* -1 (/ (+ (* -1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) (* 1/4 (/ im (pow (sqrt -1/4) 2)))) (* re (sqrt -1/4))))) (* (sqrt (pow im 3)) (/ 1 (sqrt -1/4)))) (pow re 3))) (+ (* 1/2 (* (sqrt im) (/ 1 (* (pow re 2) (sqrt -1/4))))) (* (sqrt (/ 1 (pow im 3))) (sqrt -1/4)))))
(*.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal -1/4 binary64)))) (/.f64 (+.f64 (/.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (sqrt.f64 #s(literal -1/4 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (/.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal 1/4 binary64) im) #s(literal 1/4 binary64))) (*.f64 re (sqrt.f64 #s(literal -1/4 binary64))))))) (*.f64 re (*.f64 re re)))))
(* -1/4 (/ (pow re 4) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im (*.f64 im im)))
(/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (pow re 2))) (pow im 3))
(/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 (*.f64 im im) (*.f64 re re))) (*.f64 im (*.f64 im im)))
(/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (+ (* -2 (* im re)) (pow re 2)))) (pow im 3))
(/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 (*.f64 im im) (*.f64 re (+.f64 re (*.f64 im #s(literal -2 binary64)))))) (*.f64 im (*.f64 im im)))
(/ (+ (* -1/4 (pow re 4)) (* (pow im 2) (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)))) (pow im 3))
(/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 (*.f64 im im) (+.f64 (*.f64 re re) (*.f64 im (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64))))))) (*.f64 im (*.f64 im im)))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) (/.f64 (*.f64 re re) (*.f64 im im))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(*.f64 im (+.f64 (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) (/.f64 (*.f64 re re) (*.f64 im im))) (/.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 (/ re im)) 2)))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 re im)) #s(literal -2 binary64))))
(* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))
(*.f64 (+.f64 (/.f64 (+.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im)) (-.f64 #s(literal 0 binary64) im)) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (- (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1 (pow re 2)) (* 1/4 (/ (pow re 4) (pow im 2)))) im))) im)) 2)))
(*.f64 (+.f64 (/.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im)) (*.f64 re re)) im)) (-.f64 #s(literal 0 binary64) im)) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+.f64 (*.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)))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))))) #s(literal -2 binary64))))
(* -1/4 (/ (pow re 4) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im (*.f64 im im)))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(*.f64 (pow.f64 re #s(literal 4 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (/.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 im im)))))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))
(*.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 2 binary64) (*.f64 re (*.f64 re re))))))
(* (pow re 4) (- (+ (* 2 (/ im (pow re 4))) (/ 1 (* im (pow re 2)))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))
(*.f64 (pow.f64 re #s(literal 4 binary64)) (+.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64))) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 2 binary64) (*.f64 re (*.f64 re re)))))))
(* -1/4 (/ (pow re 4) (pow im 3)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im (*.f64 im im)))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (* 1/4 (/ 1 (pow im 3)))))
(*.f64 (pow.f64 re #s(literal 4 binary64)) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (/.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 im im)))))
(* (pow re 4) (- (/ 1 (* im (pow re 2))) (+ (* 1/4 (/ 1 (pow im 3))) (/ 2 (pow re 3)))))
(*.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 2 binary64) (*.f64 re (*.f64 re re))))))
(* (pow re 4) (- (+ (* -1 (/ (+ 2 (* -2 (/ im re))) (pow re 3))) (/ 1 (* im (pow re 2)))) (* 1/4 (/ 1 (pow im 3)))))
(*.f64 (pow.f64 re #s(literal 4 binary64)) (+.f64 (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 re re))) (/.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 im #s(literal -2 binary64)) re)) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 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 (*.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))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.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))))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 re (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))))) (*.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)))))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.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))))
(+ (* -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)))))
(+.f64 (*.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 (*.f64 (sqrt.f64 #s(literal 2 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)))))))
(+ (* -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))))))
(+.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 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 #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/64 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))) (sqrt.f64 #s(literal 1/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)))))))
(+.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (+.f64 (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/64 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/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))))))
(* -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)))))))
(*.f64 (+.f64 (*.f64 #s(literal -1/8 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 #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 #s(literal 0 binary64) 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 (-.f64 (*.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/32 binary64) (*.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))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) 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 #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.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))))
(* 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 (+.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 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))))) (*.f64 #s(literal 1/2 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 (+ (* 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 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.f64 (*.f64 im im) (+.f64 (*.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 #s(literal 1/4 binary64) (/.f64 (*.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/256 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 re)) (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)))) (* (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 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.f64 (*.f64 im im) (+.f64 (*.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 im im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im im)) (+.f64 (*.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/256 binary64) (*.f64 #s(literal 1/2 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 #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/256 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/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 (+.f64 (*.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)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (*.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)))))) (+.f64 (*.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/8 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 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 (+.f64 (*.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)))))) (+.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/16 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 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 (+.f64 (*.f64 #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 -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 #s(literal 0 binary64) 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 (+.f64 (*.f64 #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 -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (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/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)))))))) (-.f64 #s(literal 0 binary64) 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 (+.f64 (*.f64 #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 -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 im) (*.f64 re re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) #s(literal 3/16 binary64)) (*.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(-.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (-.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (* im (sqrt (/ 1 re))))
(+.f64 (*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re)))))
(+.f64 (+.f64 (*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (*.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* -1/128 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re))))))
(+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (+.f64 (*.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))) #s(literal 7/128 binary64)) (*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* -2 (* (sqrt re) (sqrt -1)))
(*.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -1 binary64)))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(*.f64 (+.f64 (*.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))))) (-.f64 #s(literal 0 binary64) 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))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (+.f64 (*.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 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) #s(literal 1/4 binary64))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (+.f64 (*.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 -3/64 binary64)) (*.f64 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) #s(literal 1/4 binary64))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (+ (sqrt (/ 1 re)) (* -1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))
(*.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* 7/128 (* (pow im 2) (sqrt (/ 1 (pow re 9)))))))))
(*.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/8 binary64)) (*.f64 (*.f64 #s(literal 7/128 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* (pow im 2) (+ (* -33/1024 (* (pow im 2) (sqrt (/ 1 (pow re 13))))) (* 7/128 (sqrt (/ 1 (pow re 9))))))))))
(*.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/8 binary64)) (*.f64 (*.f64 im im) (+.f64 (*.f64 (*.f64 #s(literal -33/1024 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 13 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) #s(literal 7/128 binary64))))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(*.f64 im (-.f64 (*.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 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (+.f64 (-.f64 (*.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 re (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (+.f64 (-.f64 (*.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 re (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 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 0 binary64) im))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 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/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt 2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (-.f64 (-.f64 (*.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/2 binary64) (sqrt.f64 im)) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 im (*.f64 im im)))) (/.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 0 binary64) im))
(pow (* 2 im) 1/4)
(pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64))
(+ (* -1/4 (* (pow (/ 2 (pow im 3)) 1/4) re)) (pow (* 2 im) 1/4))
(+.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 re (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 im (*.f64 im im))) #s(literal 1/4 binary64)))))
(+ (* re (+ (* -1/4 (pow (/ 2 (pow im 3)) 1/4)) (* 1/32 (* (pow (/ 2 (pow im 7)) 1/4) re)))) (pow (* 2 im) 1/4))
(+.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) (*.f64 re (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 im (*.f64 im im))) #s(literal 1/4 binary64))) (*.f64 #s(literal 1/32 binary64) (*.f64 re (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 7 binary64))) #s(literal 1/4 binary64)))))))
(+ (* re (+ (* -1/4 (pow (/ 2 (pow im 3)) 1/4)) (* re (+ (* 1/32 (pow (/ 2 (pow im 7)) 1/4)) (* 5/128 (* (pow (/ 2 (pow im 11)) 1/4) re)))))) (pow (* 2 im) 1/4))
(+.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) (*.f64 re (+.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 im (*.f64 im im))) #s(literal 1/4 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 7 binary64))) #s(literal 1/4 binary64))) (*.f64 #s(literal 5/128 binary64) (*.f64 re (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 11 binary64))) #s(literal 1/4 binary64)))))))))
(exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))))) (*.f64 re re)))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))))) (*.f64 re re)) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (/.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64)) #s(literal 1/96 binary64))) (pow.f64 re #s(literal 4 binary64))))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/1536 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/24576 (pow im 6)) (* 1/2880 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))))) (*.f64 re re)) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (*.f64 im im)) (log.f64 re)))) (+.f64 (/.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64)) #s(literal 1/96 binary64))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/1536 binary64) (*.f64 im im)) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64))) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal -1/24576 binary64))) (*.f64 (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (*.f64 im im))) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 75/4 binary64))) #s(literal 1/2880 binary64))) (pow.f64 re #s(literal 6 binary64)))))))
(exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re)))))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))))) (*.f64 re re)))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))))) (*.f64 re re)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64)) #s(literal 1/96 binary64)))) (pow.f64 re #s(literal 4 binary64)))))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/24576 (pow im 6)) (+ (* 1/2880 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6))))) (* 1/1536 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (pow re 6)) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))))) (*.f64 re re)) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (/.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64)) #s(literal 1/96 binary64))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (+.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 1/24576 binary64)) (*.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 75/2 binary64)) #s(literal 1/2880 binary64))) (*.f64 (*.f64 #s(literal 1/1536 binary64) (*.f64 im im)) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64)))) (pow.f64 re #s(literal 6 binary64)))))))
(exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))))) (*.f64 re re)))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/16 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* 13/512 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 4))))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))) (*.f64 re re)) (/.f64 (*.f64 #s(literal 13/512 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))))) (pow.f64 re #s(literal 4 binary64))))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/16 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* (pow im 2) (+ (* -119/8192 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 6))) (* 13/512 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 4))))))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))) (*.f64 re re)) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -119/8192 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))))) (pow.f64 re #s(literal 6 binary64))) (/.f64 (*.f64 #s(literal 13/512 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))) (pow.f64 re #s(literal 4 binary64))))))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))) im))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))
(+.f64 (+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (/.f64 (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 re re)) #s(literal 0 binary64)) (*.f64 im im)))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))) im))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/384 (pow re 3)) (* 1/24 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) (pow im 3)) (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))) im) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 re re)) #s(literal 0 binary64)) (*.f64 im im)) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) re) #s(literal 0 binary64)) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/384 binary64)) (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/24 binary64)))) (*.f64 im (*.f64 im im)))))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* 1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))))) im))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* -1/4 (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(-.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) re) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 re re)) #s(literal 0 binary64)) im))) im))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* -1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/384 (pow re 3)) (* 1/24 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) im)) (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* -1/4 (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(-.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) re) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (-.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 re re)) #s(literal 0 binary64)) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) re) #s(literal 0 binary64)) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/384 binary64)) (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/24 binary64)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) im)) im)) im))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+.f64 (*.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)))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im 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 (+.f64 (*.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 (+.f64 (+.f64 (*.f64 im im) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re))) (/.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 (+.f64 (+.f64 (*.f64 im im) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re))) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.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 (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(*.f64 (+.f64 (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) 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 (+.f64 (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 im im) (*.f64 re re))) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))) (-.f64 #s(literal 0 binary64) 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) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (*.f64 re (*.f64 re 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) (+.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re 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) (+.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 (*.f64 im im) (+.f64 (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -5/64 binary64) (*.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)))))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) (/.f64 (*.f64 re re) (*.f64 im im))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(*.f64 im (+.f64 (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) (/.f64 (*.f64 re re) (*.f64 im im))) (/.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)))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 re 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)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (+.f64 (*.f64 re re) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im))) im)) im)) (-.f64 #s(literal 0 binary64) im))
im
(+ im (* -1 re))
(-.f64 im re)
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+.f64 im (*.f64 re (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 re im)) #s(literal -1 binary64))))
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(+.f64 im (*.f64 re (+.f64 (*.f64 re (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1/2 binary64) im))) #s(literal -1 binary64))))
(* 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 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 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 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64))) (pow.f64 re #s(literal 6 binary64)))) re)
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(*.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(*.f64 (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) 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 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.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)))))) (-.f64 #s(literal 0 binary64) 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) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.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) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re 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) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (*.f64 (*.f64 im im) (+.f64 (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 (*.f64 #s(literal -5/128 binary64) (*.f64 im im)) (pow.f64 re #s(literal 7 binary64))))) (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re re)))))))
im
(* im (+ 1 (* -1 (/ re im))))
(*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(*.f64 im (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (/.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 (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.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)))) (/.f64 re im)))
(* -1 im)
(-.f64 #s(literal 0 binary64) im)
(* -1 (* im (+ 1 (/ re im))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 #s(literal 1 binary64) (/.f64 re im)))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) im)) re) im)))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im)) (*.f64 #s(literal 1/2 binary64) (*.f64 re re))) (-.f64 #s(literal 0 binary64) im)) re) im)))
(* -1/4 (/ (pow re 3) (pow im 2)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))
(* -1/4 (/ (pow re 3) (pow im 2)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))
(* -1/4 (/ (pow re 3) (pow im 2)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))
(* -1/4 (/ (pow re 3) (pow im 2)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))
(* -1/4 (/ (pow re 3) (pow im 2)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))
(* -1/4 (/ (pow re 3) (pow im 2)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))
(* -1/4 (/ (pow re 3) (pow im 2)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))
(* -1/4 (/ (pow re 3) (pow im 2)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))
(* -1/4 (/ (pow re 3) (pow im 2)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))
(* -1/4 (/ (pow re 3) (pow im 2)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))
(* -1/4 (/ (pow re 3) (pow im 2)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))
(* -1/4 (/ (pow re 3) (pow im 2)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))
(* -1/4 (/ (pow re 3) (pow im 2)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))
(* -1/4 (/ (pow re 3) (pow im 2)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))
(* -1/4 (/ (pow re 3) (pow im 2)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))
(* -1/4 (/ (pow re 3) (pow im 2)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))
(* -1/4 (/ (pow re 3) (pow im 2)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))
(* -1/4 (/ (pow re 3) (pow im 2)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))
(* -1/4 (/ (pow re 3) (pow im 2)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))
(* -1/4 (/ (pow re 3) (pow im 2)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))
(* -1/4 (/ (pow re 3) (pow im 2)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))
(* -1/4 (/ (pow re 3) (pow im 2)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))
(* -1/4 (/ (pow re 3) (pow im 2)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))
(* -1/4 (/ (pow re 3) (pow im 2)))
(/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))
(pow re 3)
(*.f64 re (*.f64 re re))
(pow re 3)
(*.f64 re (*.f64 re re))
(pow re 3)
(*.f64 re (*.f64 re re))
(pow re 3)
(*.f64 re (*.f64 re re))
(pow re 3)
(*.f64 re (*.f64 re re))
(pow re 3)
(*.f64 re (*.f64 re re))
(pow re 3)
(*.f64 re (*.f64 re re))
(pow re 3)
(*.f64 re (*.f64 re re))
(pow re 3)
(*.f64 re (*.f64 re re))
(pow re 3)
(*.f64 re (*.f64 re re))
(pow re 3)
(*.f64 re (*.f64 re re))
(pow re 3)
(*.f64 re (*.f64 re re))
(* -1/4 (pow re 3))
(*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))
(* -1/4 (pow re 3))
(*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))
(* -1/4 (pow re 3))
(*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))
(* -1/4 (pow re 3))
(*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))
(* -1/4 (pow re 3))
(*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))
(* -1/4 (pow re 3))
(*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))
(* -1/4 (pow re 3))
(*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))
(* -1/4 (pow re 3))
(*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))
(* -1/4 (pow re 3))
(*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))
(* -1/4 (pow re 3))
(*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))
(* -1/4 (pow re 3))
(*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))
(* -1/4 (pow re 3))
(*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))
im
(+ im (* -1 re))
(-.f64 im re)
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+.f64 im (*.f64 re (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 re im)) #s(literal -1 binary64))))
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(+.f64 im (*.f64 re (+.f64 (*.f64 re (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1/2 binary64) im))) #s(literal -1 binary64))))
(* 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 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 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 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64))) (pow.f64 re #s(literal 6 binary64)))) re)
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(*.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(*.f64 (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) 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 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.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)))))) (-.f64 #s(literal 0 binary64) 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) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.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) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re 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) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (*.f64 (*.f64 im im) (+.f64 (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 (*.f64 #s(literal -5/128 binary64) (*.f64 im im)) (pow.f64 re #s(literal 7 binary64))))) (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re re)))))))
im
(* im (+ 1 (* -1 (/ re im))))
(*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(*.f64 im (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (/.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 (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.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)))) (/.f64 re im)))
(* -1 im)
(-.f64 #s(literal 0 binary64) im)
(* -1 (* im (+ 1 (/ re im))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 #s(literal 1 binary64) (/.f64 re im)))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) im)) re) im)))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im)) (*.f64 #s(literal 1/2 binary64) (*.f64 re re))) (-.f64 #s(literal 0 binary64) im)) re) im)))

eval181.0ms (1.7%)

Compiler

Compiled 28268 to 3823 computations (86.5% saved)

prune175.0ms (1.7%)

Pruning

18 alts after pruning (7 fresh and 11 done)

PrunedKeptTotal
New107551080
Fresh123
Picked235
Done189
Total1079181097
Accuracy
99.9%
Counts
1097 → 18
Alt Table
Click to see full alt table
StatusAccuracyProgram
31.1%
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
31.1%
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64)))
31.1%
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) im))
31.0%
(*.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))))
31.1%
(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
73.8%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 2 binary64)) #s(literal 2 binary64)))
74.2%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
73.7%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 4 binary64)))
69.5%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (log.f64 (-.f64 (hypot.f64 re im) re)))) #s(literal 1/8 binary64)) #s(literal 4 binary64)))
25.7%
(*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))))))))
39.4%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))) im))))))
51.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
19.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))))
21.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (*.f64 re re) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 im (*.f64 re re))) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))))
22.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64))))
52.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
74.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
53.5%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re))))
Compiler

Compiled 837 to 384 computations (54.1% saved)

regimes62.0ms (0.6%)

Counts
28 → 2
Calls
Call 1
Inputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64))))
(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) im))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 im im) re)))
(*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (*.f64 re re) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 im (*.f64 re re))) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))) im))))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))))))))))
(*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))))))))
(*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))))
(*.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) (*.f64 im (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (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 #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) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 4 binary64)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(*.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 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/8 binary64)) #s(literal 2 binary64)) #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (exp.f64 (log.f64 (-.f64 (hypot.f64 re im) re)))) #s(literal 1/8 binary64)) #s(literal 4 binary64)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 (exp.f64 (log.f64 (-.f64 (hypot.f64 re im) re))) (exp.f64 (log.f64 #s(literal 2 binary64)))) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 im (+.f64 (*.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 im im)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))))
(*.f64 im (+.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.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/2 binary64))))))
Outputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
Calls

7 calls:

10.0ms
re
9.0ms
(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
8.0ms
(*.f64 im im)
8.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))))
8.0ms
im
Results
AccuracySegmentsBranch
91.1%2re
76.8%2im
87.2%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))))
87.2%2(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
87.8%2(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
87.8%2(-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
74.8%1(*.f64 im im)
Compiler

Compiled 69 to 45 computations (34.8% saved)

regimes8.0ms (0.1%)

Counts
16 → 3
Calls
Call 1
Inputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64))))
(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) im))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 im im) re)))
(*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (*.f64 re re) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 im (*.f64 re re))) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))) (*.f64 im im))) im))))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))))))))))
(*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)) (+.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -1/4 binary64))) (*.f64 im im))) im)))))))))
(*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 #s(literal -2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 (*.f64 re re) #s(literal -1/4 binary64)) (*.f64 im (*.f64 im im)))))))))))))
Outputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re))))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
Calls

1 calls:

7.0ms
re
Results
AccuracySegmentsBranch
81.4%3re
Compiler

Compiled 3 to 2 computations (33.3% saved)

regimes3.0ms (0%)

Counts
5 → 3
Calls
Call 1
Inputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64))))
(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) im))
Outputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
Calls

1 calls:

2.0ms
re
Results
AccuracySegmentsBranch
80.9%3re
Compiler

Compiled 3 to 2 computations (33.3% saved)

regimes2.0ms (0%)

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

1 calls:

2.0ms
re
Results
AccuracySegmentsBranch
80.9%3re
Compiler

Compiled 3 to 2 computations (33.3% saved)

regimes3.0ms (0%)

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

2 calls:

1.0ms
re
1.0ms
im
Results
AccuracySegmentsBranch
57.1%2im
61.8%2re
Compiler

Compiled 6 to 4 computations (33.3% saved)

regimes3.0ms (0%)

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 (*.f64 im #s(literal 2 binary64))))
Outputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
Calls

2 calls:

1.0ms
re
1.0ms
im
Results
AccuracySegmentsBranch
52.3%1im
52.3%1re
Compiler

Compiled 6 to 4 computations (33.3% saved)

bsearch22.0ms (0.2%)

Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
18.0ms
1.4046821187065158e-28
8.866121372180784e-28
Results
7.0ms29×2valid
4.0ms51×0valid
3.0ms16×1valid
Compiler

Compiled 154 to 118 computations (23.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 10.0ms
ival-mult: 4.0ms (41% of total)
ival-sqrt: 2.0ms (20.5% of total)
ival-add: 1.0ms (10.3% of total)
backward-pass: 1.0ms (10.3% of total)
ival-sub: 1.0ms (10.3% of total)
const: 0.0ms (0% of total)

bsearch44.0ms (0.4%)

Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
19.0ms
1.4046821187065158e-28
8.866121372180784e-28
21.0ms
-1.84896782952315e+87
-8.842207078185857e+73
Results
20.0ms213×0valid
10.0ms34×2valid
1.0ms1valid
Compiler

Compiled 342 to 282 computations (17.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 19.0ms
ival-mult: 9.0ms (48.6% of total)
ival-sqrt: 5.0ms (27% of total)
ival-add: 2.0ms (10.8% of total)
ival-sub: 2.0ms (10.8% of total)
backward-pass: 1.0ms (5.4% of total)
const: 0.0ms (0% of total)

bsearch52.0ms (0.5%)

Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
19.0ms
1.4046821187065158e-28
8.866121372180784e-28
20.0ms
-1.84896782952315e+87
-8.842207078185857e+73
Results
18.0ms208×0valid
8.0ms31×2valid
3.0ms17×1valid
Compiler

Compiled 310 to 266 computations (14.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 19.0ms
ival-mult: 9.0ms (47.3% of total)
ival-sqrt: 5.0ms (26.3% of total)
ival-add: 2.0ms (10.5% of total)
ival-sub: 2.0ms (10.5% of total)
backward-pass: 1.0ms (5.3% of total)
const: 0.0ms (0% of total)

bsearch101.0ms (1%)

Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
17.0ms
1.4046821187065158e-28
8.866121372180784e-28
25.0ms
-1.84896782952315e+87
-8.842207078185857e+73
Results
24.0ms216×0valid
7.0ms29×2valid
2.0ms11×1valid
Compiler

Compiled 310 to 266 computations (14.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 25.0ms
ival-mult: 15.0ms (61.1% of total)
ival-sqrt: 5.0ms (20.4% of total)
ival-add: 2.0ms (8.2% of total)
ival-sub: 2.0ms (8.2% of total)
backward-pass: 1.0ms (4.1% of total)
const: 0.0ms (0% of total)

bsearch24.0ms (0.2%)

Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
22.0ms
-1.84896782952315e+87
-8.842207078185857e+73
Results
17.0ms160×0valid
Compiler

Compiled 202 to 176 computations (12.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 9.0ms
ival-mult: 4.0ms (46.2% of total)
ival-sqrt: 2.0ms (23.1% of total)
ival-sub: 1.0ms (11.6% of total)
ival-add: 1.0ms (11.6% of total)
const: 0.0ms (0% of total)
backward-pass: 0.0ms (0% of total)

simplify10.0ms (0.1%)

Algorithm
egg-herbie
Rules
22×*-commutative_binary64
+-commutative_binary64
sub-neg_binary64
neg-sub0_binary64
neg-mul-1_binary64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
047122
160122
266122
368122
469122
Stop Event
saturated
Calls
Call 1
Inputs
(if (<=.f64 re #s(literal 6913231011544493/11150372599265311570767859136324180752990208 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re)))
(if (<=.f64 re #s(literal -3500000000000000132571709850489338051206618645930068717053488461558530629959680 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 6913231011544493/11150372599265311570767859136324180752990208 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re)))) (/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))))
(if (<=.f64 re #s(literal -749999999999999993617555756027930405410641278629604048305046368366853738477912064 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 2676089423823675/5575186299632655785383929568162090376495104 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))))
(if (<=.f64 re #s(literal -145000000000000012448002656812759054824481543608135254909751766495799541760 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 2899096875808981/5575186299632655785383929568162090376495104 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))) (*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))))
(if (<=.f64 re #s(literal -410000000000000001425504091161270667527325190888803721288529800066171902235770880 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
Outputs
(if (<=.f64 re #s(literal 6913231011544493/11150372599265311570767859136324180752990208 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re)))
(if (<=.f64 re #s(literal -3500000000000000132571709850489338051206618645930068717053488461558530629959680 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 6913231011544493/11150372599265311570767859136324180752990208 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re)))) (/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))))
(if (<=.f64 re #s(literal -749999999999999993617555756027930405410641278629604048305046368366853738477912064 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 2676089423823675/5575186299632655785383929568162090376495104 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))))
(if (<=.f64 re #s(literal -749999999999999993617555756027930405410641278629604048305046368366853738477912064 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 2676089423823675/5575186299632655785383929568162090376495104 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) im))) (/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))))
(if (<=.f64 re #s(literal -145000000000000012448002656812759054824481543608135254909751766495799541760 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 2899096875808981/5575186299632655785383929568162090376495104 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))) (*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))))
(if (<=.f64 re #s(literal -145000000000000012448002656812759054824481543608135254909751766495799541760 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 2899096875808981/5575186299632655785383929568162090376495104 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) im))) (*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))))
(if (<=.f64 re #s(literal -410000000000000001425504091161270667527325190888803721288529800066171902235770880 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))))
(if (<=.f64 re #s(literal -410000000000000001425504091161270667527325190888803721288529800066171902235770880 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) im))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) im)))

soundness1.8s (17.1%)

Rules
6930×*-lowering-*.f32
6930×*-lowering-*.f64
6618×*-lowering-*.f32
6618×*-lowering-*.f64
4158×+-lowering-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
043200
1218192
21675191
08457191
053359
1363234
23660232
08820232
01263
15063
239663
3490163
0842763
05465244
119294958
276584956
083594956
0134910139
147439803
081629803
01210
11910
23210
35210
48210
512910
624010
741110
866110
990110
10120010
11142510
12148610
13156610
14168010
15180410
16192810
17196110
18196910
0196910
Stop Event
fuel
iter limit
saturated
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
Compiler

Compiled 350 to 226 computations (35.4% saved)

preprocess75.0ms (0.7%)

Remove

(abs im)

Compiler

Compiled 370 to 178 computations (51.9% saved)

end0.0ms (0%)

Profiling

Loading profile data...