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

Time bar (total: 10.0s)

analyze224.0ms (2.2%)

Algorithm
1×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: 67.0ms
ival-mult: 28.0ms (41.5% of total)
ival-sqrt: 19.0ms (28.2% of total)
ival-sub: 6.0ms (8.9% of total)
ival-add: 6.0ms (8.9% of total)
ival->: 6.0ms (8.9% of total)
const: 2.0ms (3% of total)
backward-pass: 1.0ms (1.5% of total)

sample1.9s (19.4%)

Results
777.0ms6278×0valid
463.0ms1189×2valid
174.0ms587×1valid
88.0ms202×3valid
Precisions
Click to see histograms. Total time spent on operations: 990.0ms
ival-mult: 465.0ms (47% of total)
ival-sqrt: 216.0ms (21.8% of total)
backward-pass: 91.0ms (9.2% of total)
ival-add: 90.0ms (9.1% of total)
ival-sub: 75.0ms (7.6% of total)
ival->: 34.0ms (3.4% of total)
const: 20.0ms (2% of total)
Bogosity

preprocess112.0ms (1.1%)

Algorithm
2×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
19160
218160
337960
479160
5125060
6179560
7249460
8320860
9334360
01210
12110
23410
35410
48410
513110
624210
741210
866410
990410
10120310
11142810
12148910
13156910
14168310
15180810
16193210
17196510
18197310
0197310
Stop Event
1×iter limit
1×saturated
1×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)

explain219.0ms (2.2%)

FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1250-3(1.5589399504136132e-300 3.862214865012182e-161)(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
321(1.5189926865273258e-151 1.0273610015611724e-237)0-(-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
270-2(9.1404468965602e-160 9.96894704432234e-241)(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
78.0ms376×0valid
48.0ms82×2valid
14.0ms20×3valid
11.0ms34×1valid
Compiler

Compiled 173 to 38 computations (78% saved)

Precisions
Click to see histograms. Total time spent on operations: 60.0ms
ival-mult: 27.0ms (45.4% of total)
ival-sqrt: 13.0ms (21.8% of total)
backward-pass: 9.0ms (15.1% of total)
ival-sub: 5.0ms (8.4% of total)
ival-add: 4.0ms (6.7% of total)
const: 1.0ms (1.7% 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
▶78.5%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
▶41.8%
(*.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)

simplify60.0ms (0.6%)

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

Useful iterations: 0 (0.0ms)

IterNodesCost
01283
12183
23483
35483
48483
513183
624283
741283
866483
990483
10120383
11142883
12148983
13156983
14168383
15180883
16193283
17196583
18197383
0197383
Stop Event
1×iter limit
1×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

localize190.0ms (1.9%)

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%
(-.f64 (hypot.f64 re im) re)
✓accuracy99.6%
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))
✓accuracy100.0%
(+.f64 (*.f64 re re) (*.f64 im im))
✓accuracy100.0%
(-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
✓accuracy99.6%
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
✓accuracy67.3%
(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
Results
106.0ms68×5exit
53.0ms188×0valid
Compiler

Compiled 115 to 18 computations (84.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 84.0ms
ival-mult: 24.0ms (28.7% of total)
backward-pass: 19.0ms (22.7% of total)
ival-sqrt: 17.0ms (20.3% of total)
compiled-spec: 13.0ms (15.5% of total)
ival-sub: 6.0ms (7.2% of total)
ival-add: 4.0ms (4.8% of total)
const: 1.0ms (1.2% of total)

series26.0ms (0.3%)

Counts
10 → 240
Calls
Call 1
Inputs
#<alt (sqrt (+ (* re re) (* im im)))>
#<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 (* 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))) re)>
#<alt (+ (* re re) (* im im))>
Outputs
#<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 (* 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 (* 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 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 (pow im 2)>
#<alt (+ (pow im 2) (pow re 2))>
#<alt (+ (pow im 2) (pow re 2))>
#<alt (+ (pow im 2) (pow re 2))>
#<alt (pow re 2)>
#<alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))>
#<alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))>
#<alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))>
#<alt (pow re 2)>
#<alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))>
#<alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))>
#<alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))>
#<alt (pow re 2)>
#<alt (+ (pow im 2) (pow re 2))>
#<alt (+ (pow im 2) (pow re 2))>
#<alt (+ (pow im 2) (pow re 2))>
#<alt (pow im 2)>
#<alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))>
#<alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))>
#<alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))>
#<alt (pow im 2)>
#<alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))>
#<alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))>
#<alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))>
Calls

60 calls:

TimeVariablePointExpression
4.0ms
im
@inf
(* 1/2 (sqrt (* 2 (- (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
re
@-inf
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
1.0ms
re
@-inf
(sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))

rewrite276.0ms (2.8%)

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

Useful iterations: 1 (0.0ms)

IterNodesCost
01268
15267
240167
3493367
0859067
Stop Event
1×iter limit
1×node limit
Counts
10 → 365
Calls
Call 1
Inputs
(sqrt (+ (* re re) (* im im)))
(* 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))
(* 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))) re)
(+ (* re re) (* im im))
Outputs
(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 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)))
(hypot.f64 (exp.f64 (log.f64 re)) im)
(hypot.f64 (exp.f64 (log.f64 re)) (exp.f64 (log.f64 im)))
(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 (*.f64 im 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 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.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 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.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 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.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 (*.f64 im 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 (*.f64 im 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 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re re) (*.f64 im im))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re re) (*.f64 im im)))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.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)))
(/.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) (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/2 binary64)) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #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)) (*.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))) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64))) (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)) (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 #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 (hypot.f64 re im) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) re))
(+.f64 (*.f64 #s(literal -2 binary64) re) (*.f64 (hypot.f64 re im) #s(literal 2 binary64)))
(-.f64 (*.f64 (hypot.f64 re im) #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64)))
(-.f64 (*.f64 (hypot.f64 re im) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) re))
(fma.f64 (hypot.f64 re im) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) re))
(fma.f64 #s(literal 2 binary64) (hypot.f64 re im) (*.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 re re) (+.f64 (*.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 (hypot.f64 re im) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -2 binary64) re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (hypot.f64 re im) #s(literal 2 binary64)) (*.f64 (hypot.f64 re im) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) re) (*.f64 #s(literal -2 binary64) re)) (*.f64 (*.f64 (hypot.f64 re im) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) re)))))
(/.f64 (-.f64 (*.f64 (*.f64 (hypot.f64 re im) #s(literal 2 binary64)) (*.f64 (hypot.f64 re im) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -2 binary64) re) (*.f64 #s(literal -2 binary64) re))) (-.f64 (*.f64 (hypot.f64 re im) #s(literal 2 binary64)) (*.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 (*.f64 re re) (*.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) (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/2 binary64)) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #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)) (*.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))) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64))) (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)) (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 #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 (hypot.f64 re im) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) re))
(+.f64 (*.f64 #s(literal -2 binary64) re) (*.f64 (hypot.f64 re im) #s(literal 2 binary64)))
(-.f64 (*.f64 (hypot.f64 re im) #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64)))
(-.f64 (*.f64 (hypot.f64 re im) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) re))
(fma.f64 (hypot.f64 re im) #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) re))
(fma.f64 #s(literal 2 binary64) (hypot.f64 re im) (*.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 re re) (+.f64 (*.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 (hypot.f64 re im) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -2 binary64) re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (hypot.f64 re im) #s(literal 2 binary64)) (*.f64 (hypot.f64 re im) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) re) (*.f64 #s(literal -2 binary64) re)) (*.f64 (*.f64 (hypot.f64 re im) #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) re)))))
(/.f64 (-.f64 (*.f64 (*.f64 (hypot.f64 re im) #s(literal 2 binary64)) (*.f64 (hypot.f64 re im) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -2 binary64) re) (*.f64 #s(literal -2 binary64) re))) (-.f64 (*.f64 (hypot.f64 re im) #s(literal 2 binary64)) (*.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 (*.f64 re re) (*.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 re re) (+.f64 (*.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)) (*.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re)))))
(/.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 re re) (+.f64 (*.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 re re) (+.f64 (*.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 re (*.f64 re (*.f64 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 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 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))))))
(/.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 re (*.f64 re (*.f64 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 re (*.f64 re (*.f64 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 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 9/2 binary64)) (*.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 re (*.f64 re re)))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.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 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))))) (+.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 re (*.f64 re (*.f64 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 re (*.f64 re (*.f64 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 (*.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))) #s(literal 1 binary64)) (+.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 re (*.f64 re (*.f64 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 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 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im 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 re (*.f64 re (*.f64 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 re (*.f64 re (*.f64 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 re re) (+.f64 (*.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 (*.f64 re re) (*.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 re re) (+.f64 (*.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)) (*.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re)))))
(/.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 re re) (+.f64 (*.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 re re) (+.f64 (*.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 re (*.f64 re (*.f64 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 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 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))))))
(/.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 re (*.f64 re (*.f64 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 re (*.f64 re (*.f64 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 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 9/2 binary64)) (*.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 re (*.f64 re re)))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.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 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))))) (+.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 re (*.f64 re (*.f64 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 re (*.f64 re (*.f64 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 (*.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))) #s(literal 1 binary64)) (+.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 re (*.f64 re (*.f64 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 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 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im 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 re (*.f64 re (*.f64 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 re (*.f64 re (*.f64 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 re re) (+.f64 (*.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 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))
(+.f64 (*.f64 re re) (*.f64 im im))
(+.f64 (*.f64 im im) (*.f64 re re))
(+.f64 (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (-.f64 (*.f64 re re) (*.f64 im im))) (neg.f64 (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (-.f64 (*.f64 re re) (*.f64 im im)))))
(exp.f64 (log.f64 (+.f64 (*.f64 re re) (*.f64 im im))))
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 re re) (*.f64 im im)))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) #s(literal 1/2 binary64)))
(fabs.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
(-.f64 (*.f64 im im) (-.f64 #s(literal 0 binary64) (*.f64 re re)))
(-.f64 (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (-.f64 (*.f64 re re) (*.f64 im im))) (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (-.f64 (*.f64 re re) (*.f64 im im))))
(-.f64 (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (-.f64 (*.f64 im im) (*.f64 re re))) (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (-.f64 (*.f64 im im) (*.f64 re re))))
(sqrt.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))))
(fma.f64 re re (*.f64 im im))
(fma.f64 im im (*.f64 re re))
(neg.f64 (/.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(neg.f64 (/.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 re re) (*.f64 im im)))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))))) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (-.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))
(/.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im)))) (-.f64 (*.f64 re re) (*.f64 im im)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (*.f64 im im))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 im im) (*.f64 re re)) (-.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re (*.f64 re re))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))))))) (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))))) (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))))) (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (-.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) (-.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))))) (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (-.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))))))
(/.f64 (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) (-.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))))) (*.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))))) (*.f64 (*.f64 im (*.f64 im (*.f64 im im))) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))))))
(/.f64 (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im)))) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (*.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))))
(/.f64 (-.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re (*.f64 re re)))) (-.f64 (*.f64 im im) (*.f64 re re)))
(/.f64 (-.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) (-.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (*.f64 im (*.f64 im (*.f64 im im))))) (*.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 (*.f64 (hypot.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (hypot.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.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 (*.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 im im)))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (hypot.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(/.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im)))))) (*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))))))) (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))))) (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (-.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))))))) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) (-.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) (-.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))))) (*.f64 (*.f64 im (*.f64 im (*.f64 im im))) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im)))))) (-.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im)))) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im)))) (-.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) #s(literal 1 binary64)) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))
(/.f64 (*.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1 binary64)) (-.f64 (*.f64 re re) (*.f64 im im)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (neg.f64 (-.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re (*.f64 re re))))) (neg.f64 (-.f64 (*.f64 im im) (*.f64 re re))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (-.f64 (*.f64 re re) (*.f64 im im))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (-.f64 (*.f64 re re) (*.f64 im im))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (-.f64 (*.f64 re re) (*.f64 im im))) (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (-.f64 (*.f64 re re) (*.f64 im im)))) (+.f64 (*.f64 (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (-.f64 (*.f64 re re) (*.f64 im im))) (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (-.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (-.f64 (*.f64 re re) (*.f64 im im))) (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (-.f64 (*.f64 re re) (*.f64 im im)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (-.f64 (*.f64 re re) (*.f64 im im))) (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (-.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (-.f64 (*.f64 re re) (*.f64 im im))) (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (-.f64 (*.f64 re re) (*.f64 im im))))) (+.f64 (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (-.f64 (*.f64 re re) (*.f64 im im))) (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (-.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (*.f64 (hypot.f64 re im) (hypot.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))) (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))))
(/.f64 (*.f64 (hypot.f64 re im) (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im)))))) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 (*.f64 (hypot.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (hypot.f64 re im)) (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))))
(/.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (hypot.f64 re im)) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))))))) (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))) (+.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))))) (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (-.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))))))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) (-.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))) (-.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) (-.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re re) (*.f64 im im)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))))) (*.f64 (*.f64 im (*.f64 im (*.f64 im im))) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im)))))))
(/.f64 (*.f64 (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im)))) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re re) (*.f64 im im)))) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im)))))
(/.f64 (/.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im)))) (+.f64 re im)) (-.f64 re im))
(pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1 binary64))
(pow.f64 (hypot.f64 re im) #s(literal 2 binary64))
(pow.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.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 binary64))
(*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re re) (*.f64 im im)))))
(*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (/.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re re) (*.f64 im im))))
(*.f64 (hypot.f64 re im) (hypot.f64 re im))
(*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))))
(*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))))
(*.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re re) (*.f64 im im))))
(*.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (*.f64 im im)))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 re re) (*.f64 im im)))))
(*.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))))) (+.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re re) (*.f64 im im))) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im)))))
(*.f64 (pow.f64 (+.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)) (hypot.f64 re im)))
(*.f64 (-.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 im im) (*.f64 re re))))
(*.f64 (pow.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) #s(literal 1 binary64)) (pow.f64 (/.f64 #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 binary64)))
(*.f64 (pow.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re re) (*.f64 im im))) #s(literal 1 binary64)))
(*.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re im)) (+.f64 re im))
(*.f64 (*.f64 (hypot.f64 re im) (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 (/.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im)))) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (+.f64 (*.f64 re re) (*.f64 im im)))
(*.f64 (/.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) (+.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))))) (*.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))) (*.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) (-.f64 (*.f64 im im) (*.f64 re re))))))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re)))))) (*.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))) (-.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 re re)))))))
(*.f64 (/.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))
(*.f64 (/.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im)))) (-.f64 (*.f64 re (*.f64 re (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))))) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (+.f64 (*.f64 re re) (*.f64 im im)))))

simplify319.0ms (3.2%)

Algorithm
1×egg-herbie
Rules
6836×*-lowering-*.f32
6836×*-lowering-*.f64
3162×+-lowering-+.f64
3162×+-lowering-+.f32
1642×sum3-define
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
05515460
119514904
274324858
082714858
Stop Event
1×iter limit
1×node limit
Counts
240 → 240
Calls
Call 1
Inputs
im
(+ im (* 1/2 (/ (pow re 2) im)))
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
im
(* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* (sqrt im) (sqrt 2))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* (sqrt im) (sqrt 2))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* 2 im)
(+ (* -2 re) (* 2 im))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(/ (pow im 2) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(* -4 re)
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(/ (pow im 2) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* 2 im)
(* im (+ 2 (* -2 (/ re im))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(* -2 im)
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* (sqrt im) (sqrt 2))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* (sqrt im) (sqrt 2))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* 2 im)
(+ (* -2 re) (* 2 im))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(/ (pow im 2) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(* -4 re)
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(/ (pow im 2) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* 2 im)
(* im (+ 2 (* -2 (/ re im))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(* -2 im)
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
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 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)))))
(pow im 2)
(+ (pow im 2) (pow re 2))
(+ (pow im 2) (pow re 2))
(+ (pow im 2) (pow re 2))
(pow re 2)
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(pow re 2)
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(pow re 2)
(+ (pow im 2) (pow re 2))
(+ (pow im 2) (pow re 2))
(+ (pow im 2) (pow re 2))
(pow im 2)
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(pow im 2)
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
Outputs
im
(+ im (* 1/2 (/ (pow re 2) im)))
(+.f64 im (/.f64 (*.f64 #s(literal 1/2 binary64) (*.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 (*.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 (*.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 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)) (+.f64 #s(literal 1 binary64) (/.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 #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)))))))
(* -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 #s(literal 0 binary64) (*.f64 re (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))))))
(* -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 #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))
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 im (*.f64 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 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) im) im)))))))
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 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))) (+.f64 (+.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)))) #s(literal 1 binary64))))
(* -1 im)
(-.f64 #s(literal 0 binary64) im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(*.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 #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 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))) (+.f64 (+.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)))) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) im))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+.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 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/16 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(+.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 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/32 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) #s(literal 1/16 binary64))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) #s(literal 1/2 binary64)))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 im (*.f64 im im))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))
(+ (* -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 (*.f64 #s(literal -1/32 binary64) (*.f64 im (*.f64 im im))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(+.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 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 im (*.f64 im im))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* -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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.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 (-.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) #s(literal 1 binary64)) (/.f64 (+.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 re) #s(literal 1/8 binary64)))) (*.f64 re (*.f64 re re)))) (-.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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) #s(literal 1 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 re) #s(literal 1/8 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 #s(literal -1 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) #s(literal 1/2 binary64)))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(*.f64 im (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal 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 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 im (*.f64 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 #s(literal 1/4 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))))))))
(* 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 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 im (*.f64 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 #s(literal -1/4 binary64) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.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 re)))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))))))))))
(* 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 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) 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/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 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))) (+.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) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))) #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 re (*.f64 re (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1/16 binary64)) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 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))))))
(* -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 #s(literal 0 binary64) im) (+.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 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 -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))))))))
(* -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 re (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 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 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 im) #s(literal 3/16 binary64))) (*.f64 im (*.f64 im im))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #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 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/16 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/8 binary64))))))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1/16 binary64))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1/16 binary64))) (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 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 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1/16 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 (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/4 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (-.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) (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 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 re) #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/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 #s(literal 0 binary64) (*.f64 re (-.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 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 re) #s(literal 1/4 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 (*.f64 #s(literal -1/16 binary64) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))))) (*.f64 re (*.f64 re re))))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))
(*.f64 im (+.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 (*.f64 #s(literal -1/16 binary64) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* 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 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (+.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 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/4 binary64))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/8 binary64))) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.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/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(*.f64 im (neg.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 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)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re)) #s(literal -1/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))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re)) #s(literal -1/2 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))))
(* -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 #s(literal 0 binary64) im) (-.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 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)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re)) #s(literal -1/2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 im) #s(literal 3/8 binary64))) (*.f64 im (*.f64 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 #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) im) (/.f64 (/.f64 (*.f64 re re) 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 (*.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 (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 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.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 (*.f64 im im) (*.f64 re re)) (+.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 #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 (*.f64 im im) (*.f64 re re)) (+.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 #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 #s(literal 1/8 binary64) (*.f64 im im)) (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 #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 (*.f64 re #s(literal -2 binary64)) im) (+.f64 #s(literal 2 binary64) (/.f64 (/.f64 (*.f64 re re) 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 (/.f64 (*.f64 re re) im) im) (/.f64 (*.f64 re #s(literal -2 binary64)) 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 re #s(literal 2 binary64)) im))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im)) im)))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.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)))
(* 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+.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 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/16 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(+.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 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/32 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) #s(literal 1/16 binary64))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) #s(literal 1/2 binary64)))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 im (*.f64 im im))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))
(+ (* -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 (*.f64 #s(literal -1/32 binary64) (*.f64 im (*.f64 im im))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(+.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 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 im (*.f64 im im))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* -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 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.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 (-.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) #s(literal 1 binary64)) (/.f64 (+.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 re) #s(literal 1/8 binary64)))) (*.f64 re (*.f64 re re)))) (-.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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) #s(literal 1 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 re) #s(literal 1/8 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 #s(literal -1 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) #s(literal 1/2 binary64)))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(*.f64 im (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal 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 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 im (*.f64 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 #s(literal 1/4 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))))))))
(* 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 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 im (*.f64 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 #s(literal -1/4 binary64) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (+.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 re)))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))))))))))
(* 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 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) 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/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 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))) (+.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) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))) #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 re (*.f64 re (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1/16 binary64)) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 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))))))
(* -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 #s(literal 0 binary64) im) (+.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 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 -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))))))))
(* -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 re (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 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 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 im) #s(literal 3/16 binary64))) (*.f64 im (*.f64 im im))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #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 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/16 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/8 binary64))))))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1/16 binary64))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1/16 binary64))) (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 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 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1/16 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 (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/4 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (-.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) (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 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 re) #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/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 #s(literal 0 binary64) (*.f64 re (-.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 im (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 re) #s(literal 1/4 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 (*.f64 #s(literal -1/16 binary64) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))))) (*.f64 re (*.f64 re re))))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))
(*.f64 im (+.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 (*.f64 #s(literal -1/16 binary64) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* 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 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (+.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 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/4 binary64))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/8 binary64))) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.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/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(*.f64 im (neg.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 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)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re)) #s(literal -1/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))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re)) #s(literal -1/2 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))))
(* -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 #s(literal 0 binary64) im) (-.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 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)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re)) #s(literal -1/2 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 im) #s(literal 3/8 binary64))) (*.f64 im (*.f64 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 #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) im) (/.f64 (/.f64 (*.f64 re re) 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 (*.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 (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 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.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 (*.f64 im im) (*.f64 re re)) (+.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 #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 (*.f64 im im) (*.f64 re re)) (+.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 #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 #s(literal 1/8 binary64) (*.f64 im im)) (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 #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 (*.f64 re #s(literal -2 binary64)) im) (+.f64 #s(literal 2 binary64) (/.f64 (/.f64 (*.f64 re re) 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 (/.f64 (*.f64 re re) im) im) (/.f64 (*.f64 re #s(literal -2 binary64)) 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 re #s(literal 2 binary64)) im))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im)) im)))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.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)))
im
(+ im (* -1 re))
(-.f64 im re)
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+.f64 im (*.f64 re (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 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 (*.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 (*.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 #s(literal 0 binary64) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)) (+.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 #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 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)) (+.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/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 im (*.f64 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 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) im) im))))))
(* (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 (/.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 im (*.f64 #s(literal -1 binary64) (+.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 (*.f64 re re) im) #s(literal -1/2 binary64)) 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 re))
(-.f64 im re)
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+.f64 im (*.f64 re (+.f64 #s(literal -1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 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 (*.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 (*.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 #s(literal 0 binary64) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)) (+.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 #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 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)) (+.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/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 im (*.f64 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 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) im) im))))))
(* (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 (/.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 im (*.f64 #s(literal -1 binary64) (+.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 (*.f64 re re) im) #s(literal -1/2 binary64)) 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)))
(pow im 2)
(*.f64 im im)
(+ (pow im 2) (pow re 2))
(+.f64 (*.f64 re re) (*.f64 im im))
(+ (pow im 2) (pow re 2))
(+.f64 (*.f64 re re) (*.f64 im im))
(+ (pow im 2) (pow re 2))
(+.f64 (*.f64 re re) (*.f64 im im))
(pow re 2)
(*.f64 re re)
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))
(pow re 2)
(*.f64 re re)
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))
(pow re 2)
(*.f64 re re)
(+ (pow im 2) (pow re 2))
(+.f64 (*.f64 re re) (*.f64 im im))
(+ (pow im 2) (pow re 2))
(+.f64 (*.f64 re re) (*.f64 im im))
(+ (pow im 2) (pow re 2))
(+.f64 (*.f64 re re) (*.f64 im im))
(pow im 2)
(*.f64 im im)
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(*.f64 (*.f64 im im) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 re re) im) im)))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(*.f64 (*.f64 im im) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 re re) im) im)))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(*.f64 (*.f64 im im) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 re re) im) im)))
(pow im 2)
(*.f64 im im)
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(*.f64 (*.f64 im im) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 re re) im) im)))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(*.f64 (*.f64 im im) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 re re) im) im)))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(*.f64 (*.f64 im im) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 re re) im) im)))

eval75.0ms (0.7%)

Compiler

Compiled 20655 to 2201 computations (89.3% saved)

prune59.0ms (0.6%)

Pruning

13 alts after pruning (12 fresh and 1 done)

PrunedKeptTotal
New59312605
Fresh000
Picked112
Done000
Total59413607
Accuracy
99.8%
Counts
607 → 13
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶78.4%
(*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
28.1%
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) #s(literal 1/2 binary64)))
20.4%
(*.f64 im (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 im (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))))))
15.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 im im) re)))
55.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))))))
▶18.1%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re))))
21.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64))))
▶56.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))))
▶55.4%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
✓78.5%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
18.1%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.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)) re))))
▶56.9%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re))))
13.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (*.f64 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 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) im) im)))))))))
Compiler

Compiled 430 to 315 computations (26.7% saved)

simplify137.0ms (1.4%)

Algorithm
1×egg-herbie
Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64))
✓cost-diff0
(sqrt.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re)))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re))))
✓cost-diff256
(*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re))
✓cost-diff0
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im))
✓cost-diff0
(sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im))))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))))
✓cost-diff256
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) 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
(hypot.f64 re im)
✓cost-diff0
(-.f64 (hypot.f64 re im) re)
✓cost-diff0
(*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
✓cost-diff64
(pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64))
Rules
1854×fma-define
1780×*-lowering-*.f32
1780×*-lowering-*.f64
1504×fmsub-define
1420×fma-lowering-fma.f32
Iterations

Useful iterations: 5 (0.0ms)

IterNodesCost
035173
174167
2142167
3317167
4877164
52511161
65931161
08139161
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(* (pow (- (sqrt (+ (* re re) (* im im))) re) 1/2) (* 1/2 (sqrt 2)))
(pow (- (sqrt (+ (* re re) (* im im))) re) 1/2)
(- (sqrt (+ (* re re) (* im im))) re)
(sqrt (+ (* re re) (* im im)))
re
im
1/2
(* 1/2 (sqrt 2))
(sqrt 2)
2
(* 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) im)))))
1/2
(sqrt (* im (+ 2 (/ (* re -2) im))))
(* im (+ 2 (/ (* re -2) im)))
im
(+ 2 (/ (* re -2) im))
2
(/ (* re -2) im)
(* re -2)
re
-2
(* 1/2 (sqrt (* (+ (/ (* im im) (* re re)) 4) (- 0 re))))
1/2
(sqrt (* (+ (/ (* im im) (* re re)) 4) (- 0 re)))
(* (+ (/ (* im im) (* re re)) 4) (- 0 re))
(+ (/ (* im im) (* re re)) 4)
(/ (* im im) (* re re))
(* im im)
im
(* re re)
re
4
(- 0 re)
0
Outputs
(* (pow (- (sqrt (+ (* re re) (* im im))) re) 1/2) (* 1/2 (sqrt 2)))
(*.f64 (sqrt.f64 (-.f64 (hypot.f64 re im) re)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(pow (- (sqrt (+ (* re re) (* im im))) re) 1/2)
(sqrt.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
1/2
#s(literal 1/2 binary64)
(* 1/2 (sqrt 2))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(* 1/2 (sqrt (* im 2)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
1/2
#s(literal 1/2 binary64)
(sqrt (* im 2))
(sqrt.f64 (*.f64 im #s(literal 2 binary64)))
(* im 2)
(*.f64 im #s(literal 2 binary64))
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) im)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re))))
1/2
#s(literal 1/2 binary64)
(sqrt (* im (+ 2 (/ (* re -2) im))))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re)))
(* im (+ 2 (/ (* re -2) im)))
(*.f64 #s(literal 2 binary64) (-.f64 im re))
im
(+ 2 (/ (* re -2) im))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im))
2
#s(literal 2 binary64)
(/ (* re -2) im)
(/.f64 (*.f64 re #s(literal -2 binary64)) im)
(* re -2)
(*.f64 re #s(literal -2 binary64))
re
-2
#s(literal -2 binary64)
(* 1/2 (sqrt (* (+ (/ (* im im) (* re re)) 4) (- 0 re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))
1/2
#s(literal 1/2 binary64)
(sqrt (* (+ (/ (* im im) (* re re)) 4) (- 0 re)))
(sqrt.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))
(* (+ (/ (* im im) (* re re)) 4) (- 0 re))
(-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))
(+ (/ (* im im) (* re re)) 4)
(+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64))
(/ (* im im) (* re re))
(/.f64 (/.f64 im (/.f64 re im)) re)
(* im im)
(*.f64 im im)
im
(* re re)
(*.f64 re re)
re
4
#s(literal 4 binary64)
(- 0 re)
(-.f64 #s(literal 0 binary64) re)
0
#s(literal 0 binary64)

localize187.0ms (1.9%)

Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
✓accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re))))
✓accuracy96.3%
(*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re))
✓accuracy93.4%
(sqrt.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re)))
✓accuracy89.1%
(/.f64 (*.f64 im im) (*.f64 re re))
✓accuracy100.0%
(*.f64 re #s(literal -2 binary64))
✓accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))))
✓accuracy100.0%
(sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im))))
✓accuracy94.9%
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) 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 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
✓accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
✓accuracy100.0%
(-.f64 (hypot.f64 re im) re)
✓accuracy99.7%
(*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
Results
78.0ms144×0invalid
64.0ms112×0valid
Compiler

Compiled 206 to 35 computations (83% saved)

Precisions
Click to see histograms. Total time spent on operations: 78.0ms
ival-mult: 34.0ms (43.4% of total)
ival-sqrt: 13.0ms (16.6% of total)
compiled-spec: 11.0ms (14% of total)
ival-pow: 7.0ms (8.9% of total)
ival-div: 4.0ms (5.1% of total)
ival-add: 4.0ms (5.1% of total)
ival-sub: 4.0ms (5.1% of total)
const: 1.0ms (1.3% of total)
backward-pass: 0.0ms (0% of total)

series57.0ms (0.6%)

Counts
23 → 456
Calls
Call 1
Inputs
#<alt (pow (- (sqrt (+ (* re re) (* im im))) re) 1/2)>
#<alt (* (pow (- (sqrt (+ (* re re) (* im im))) re) 1/2) (* 1/2 (sqrt 2)))>
#<alt (- (sqrt (+ (* re re) (* im im))) re)>
#<alt (sqrt (+ (* re re) (* im im)))>
#<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 (* im (+ 2 (/ (* re -2) im)))>
#<alt (* 1/2 (sqrt (* im (+ 2 (/ (* re -2) im)))))>
#<alt (sqrt (* im (+ 2 (/ (* re -2) im))))>
#<alt (+ 2 (/ (* re -2) im))>
#<alt (* (+ (/ (* im im) (* re re)) 4) (- 0 re))>
#<alt (* 1/2 (sqrt (* (+ (/ (* im im) (* re re)) 4) (- 0 re))))>
#<alt (sqrt (* (+ (/ (* im im) (* re re)) 4) (- 0 re)))>
#<alt (+ (/ (* im im) (* re re)) 4)>
#<alt (sqrt 2)>
#<alt (* 1/2 (sqrt 2))>
#<alt (* re -2)>
#<alt (/ (* im im) (* re re))>
Outputs
#<alt (sqrt im)>
#<alt (+ (sqrt im) (* -1/2 (* (sqrt (/ 1 im)) re)))>
#<alt (+ (sqrt im) (* re (+ (* -1/2 (sqrt (/ 1 im))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) re)))))>
#<alt (+ (sqrt im) (* re (+ (* -1/2 (sqrt (/ 1 im))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) re)) (* 1/8 (sqrt (/ 1 (pow im 3)))))))))>
#<alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))>
#<alt (+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))>
#<alt (+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))))>
#<alt (+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (pow im 5) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))))>
#<alt (* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* re (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))>
#<alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))>
#<alt (* im (+ (* -1/16 (* (/ (pow im 2) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 1/2))))>
#<alt (* im (+ (* (sqrt (/ 1 re)) (sqrt 1/2)) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt re)))))))>
#<alt (* im (+ (* (sqrt (/ 1 re)) (sqrt 1/2)) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (sqrt 1/2))))))))))>
#<alt (sqrt im)>
#<alt (* im (+ (sqrt (/ 1 im)) (* -1/2 (* (sqrt (/ 1 (pow im 3))) re))))>
#<alt (* im (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)) (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2))))))>
#<alt (* im (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2)))))))>
#<alt (* -1 (* (sqrt im) (sqrt -1)))>
#<alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1)))))>
#<alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))>
#<alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (sqrt -1)))) (* 1/4 (* (sqrt im) (* (pow re 2) (sqrt -1))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))>
#<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 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 (* 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 (* -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/2 (* (sqrt re) (sqrt -2)))>
#<alt (+ (* 1/2 (* (sqrt re) (sqrt -2))) (* 1/2 (* (/ im (sqrt -2)) (sqrt (/ 1 re)))))>
#<alt (+ (* 1/2 (* (sqrt re) (sqrt -2))) (* im (+ (* -1/4 (* (/ im (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (/ 1 (sqrt -2)))))))>
#<alt (+ (* 1/2 (* (sqrt re) (sqrt -2))) (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (/ 1 (sqrt -2)))) (* im (+ (* -1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (pow (sqrt -2) 3)))) (* 1/4 (* (/ im (pow (sqrt -2) 5)) (sqrt (/ 1 (pow re 5))))))))))>
#<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) (pow (sqrt 2) 3)))) (* 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 7))) (/ (pow re 3) (pow (sqrt 2) 5)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))>
#<alt (* -1/2 (* (sqrt im) (* (pow (sqrt -1) 2) (sqrt 2))))>
#<alt (* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))))))>
#<alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (pow (sqrt -1) 2)) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2))))))))>
#<alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (pow (sqrt -1) 2)) (pow (sqrt 2) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 7))) (/ (* (pow re 3) (pow (sqrt -1) 2)) (pow (sqrt 2) 5)))) (+ (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (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 (pow im 3))) (/ re (pow (sqrt 2) 3)))))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (/ 1 (pow (sqrt 2) 3)))) (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ re (pow (sqrt 2) 5)))))))))>
#<alt (* 1/2 (* (sqrt re) (sqrt -2)))>
#<alt (* re (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -2))) (* 1/2 (* (/ im (sqrt -2)) (sqrt (/ 1 (pow re 3)))))))>
#<alt (* re (+ (* -1/4 (* (/ (pow im 2) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -2))) (* 1/2 (* (/ im (sqrt -2)) (sqrt (/ 1 (pow re 3))))))))>
#<alt (* re (+ (* -1/4 (* (/ (pow im 2) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (/ (pow im 3) (pow (sqrt -2) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -2))) (* 1/2 (* (/ im (sqrt -2)) (sqrt (/ 1 (pow re 3)))))))))>
#<alt (* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* re (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))) (* 1/2 (* (/ (* im (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))))))>
#<alt (* -1 (* re (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))) (* 1/2 (* (/ (* im (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3)))))))))>
#<alt (* -1 (* re (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (/ (* (pow im 3) (sqrt -1)) (pow (sqrt 2) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))) (* 1/2 (* (/ (* im (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))))))))>
#<alt (* (sqrt re) (sqrt -2))>
#<alt (+ (* (sqrt re) (sqrt -2)) (* (/ im (sqrt -2)) (sqrt (/ 1 re))))>
#<alt (+ (* im (+ (* -1/2 (* (/ im (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (/ 1 (sqrt -2))))) (* (sqrt re) (sqrt -2)))>
#<alt (+ (* im (+ (* im (+ (* -1/2 (* (sqrt (/ 1 (pow re 3))) (/ 1 (pow (sqrt -2) 3)))) (* 1/2 (* (/ im (pow (sqrt -2) 5)) (sqrt (/ 1 (pow re 5))))))) (* (sqrt (/ 1 re)) (/ 1 (sqrt -2))))) (* (sqrt re) (sqrt -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) (pow (sqrt 2) 3)))) (* (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 7))) (/ (pow re 3) (pow (sqrt 2) 5)))) (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* -1 (* (sqrt im) (* (pow (sqrt -1) 2) (sqrt 2))))>
#<alt (* -1 (* im (+ (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2))) (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2))))))>
#<alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (pow (sqrt -1) 2)) (pow (sqrt 2) 3)))) (+ (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2))) (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))))))>
#<alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (pow (sqrt -1) 2)) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 7))) (/ (* (pow re 3) (pow (sqrt -1) 2)) (pow (sqrt 2) 5)))) (+ (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2))) (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (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 (pow im 3))) (/ re (pow (sqrt 2) 3)))))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ 1 (pow (sqrt 2) 3)))) (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ re (pow (sqrt 2) 5)))))))) (* (sqrt im) (sqrt 2)))>
#<alt (* (sqrt re) (sqrt -2))>
#<alt (* re (+ (* (sqrt (/ 1 re)) (sqrt -2)) (* (/ im (sqrt -2)) (sqrt (/ 1 (pow re 3))))))>
#<alt (* re (+ (* -1/2 (* (/ (pow im 2) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* (sqrt (/ 1 re)) (sqrt -2)) (* (/ im (sqrt -2)) (sqrt (/ 1 (pow re 3)))))))>
#<alt (* re (+ (* -1/2 (* (/ (pow im 2) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (/ (pow im 3) (pow (sqrt -2) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* (sqrt (/ 1 re)) (sqrt -2)) (* (/ im (sqrt -2)) (sqrt (/ 1 (pow re 3))))))))>
#<alt (* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* re (+ (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))) (* (/ (* im (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3)))))))>
#<alt (* -1 (* re (+ (* -1/2 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))) (* (/ (* im (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))))))>
#<alt (* -1 (* re (+ (* -1/2 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (/ (* (pow im 3) (sqrt -1)) (pow (sqrt 2) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))) (* (/ (* im (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3)))))))))>
#<alt 2>
#<alt (+ 2 (* -2 (/ re im)))>
#<alt (+ 2 (* -2 (/ re im)))>
#<alt (+ 2 (* -2 (/ re im)))>
#<alt (* -2 (/ re im))>
#<alt (* re (- (* 2 (/ 1 re)) (* 2 (/ 1 im))))>
#<alt (* re (- (* 2 (/ 1 re)) (* 2 (/ 1 im))))>
#<alt (* re (- (* 2 (/ 1 re)) (* 2 (/ 1 im))))>
#<alt (* -2 (/ re im))>
#<alt (* -1 (* re (- (* 2 (/ 1 im)) (* 2 (/ 1 re)))))>
#<alt (* -1 (* re (- (* 2 (/ 1 im)) (* 2 (/ 1 re)))))>
#<alt (* -1 (* re (- (* 2 (/ 1 im)) (* 2 (/ 1 re)))))>
#<alt (* -2 (/ re im))>
#<alt (/ (+ (* -2 re) (* 2 im)) im)>
#<alt (/ (+ (* -2 re) (* 2 im)) im)>
#<alt (/ (+ (* -2 re) (* 2 im)) im)>
#<alt 2>
#<alt (+ 2 (* -2 (/ re im)))>
#<alt (+ 2 (* -2 (/ re im)))>
#<alt (+ 2 (* -2 (/ re im)))>
#<alt 2>
#<alt (+ 2 (* -2 (/ re im)))>
#<alt (+ 2 (* -2 (/ re im)))>
#<alt (+ 2 (* -2 (/ re im)))>
#<alt (* -4 re)>
#<alt (+ (* -4 re) (* -1 (/ (pow im 2) re)))>
#<alt (+ (* -4 re) (* -1 (/ (pow im 2) re)))>
#<alt (+ (* -4 re) (* -1 (/ (pow im 2) re)))>
#<alt (* -1 (/ (pow im 2) re))>
#<alt (* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))>
#<alt (* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))>
#<alt (* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))>
#<alt (* -1 (/ (pow im 2) re))>
#<alt (* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))>
#<alt (* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))>
#<alt (* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))>
#<alt (* -1 (/ (pow im 2) re))>
#<alt (/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)>
#<alt (/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)>
#<alt (/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)>
#<alt (* -4 re)>
#<alt (* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))>
#<alt (* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))>
#<alt (* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))>
#<alt (* -4 re)>
#<alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))>
#<alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))>
#<alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))>
#<alt (* (sqrt re) (sqrt -1))>
#<alt (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt -1)))>
#<alt (+ (* (sqrt re) (sqrt -1)) (* (pow im 2) (+ (* -1/128 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 7))))) (* 1/8 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))))))>
#<alt (+ (* (sqrt re) (sqrt -1)) (* (pow im 2) (+ (* 1/8 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))) (* (pow im 2) (+ (* -1/128 (* (sqrt (/ 1 (pow re 7))) (sqrt -1))) (* 1/1024 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 11))))))))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))>
#<alt (* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))>
#<alt (* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (+ (* 2 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))))>
#<alt (* -1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))>
#<alt (* -1 (* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))))>
#<alt (* -1 (* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (+ (* 2 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (/ (sqrt -1) im) (sqrt (pow re 5)))) re)>
#<alt (/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (pow re 3) (+ (* -1 (* (/ (sqrt -1) (pow im 3)) (sqrt (pow re 3)))) (* (/ (sqrt -1) im) (sqrt (/ 1 re)))))) re)>
#<alt (/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (pow re 3) (+ (* (/ (sqrt -1) im) (sqrt (/ 1 re))) (* (pow re 3) (+ (* -1 (* (/ (sqrt -1) (pow im 3)) (sqrt (/ 1 (pow re 3))))) (* 2 (* (/ (sqrt -1) (pow im 5)) (sqrt re)))))))) re)>
#<alt (* (sqrt re) (sqrt -1))>
#<alt (* re (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1))))>
#<alt (* re (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* re (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/1024 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 (pow re 13))))) (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* (sqrt re) (sqrt -1)))>
#<alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* 1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (pow re 3)))) (* -1/1024 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 re))))) (pow re 3))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* 2 (* (sqrt re) (sqrt -1)))>
#<alt (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 2 (* (sqrt re) (sqrt -1))))>
#<alt (+ (* 2 (* (sqrt re) (sqrt -1))) (* (pow im 2) (+ (* -1/64 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 7))))) (* 1/4 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))))))>
#<alt (+ (* 2 (* (sqrt re) (sqrt -1))) (* (pow im 2) (+ (* 1/4 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))) (* (pow im 2) (+ (* -1/64 (* (sqrt (/ 1 (pow re 7))) (sqrt -1))) (* 1/512 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 11))))))))))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* im (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1))))>
#<alt (* im (+ (* -2 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* im (+ (* -2 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (+ (* 4 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* -1 (* im (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* -1 (* im (+ (* -2 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* im (+ (* -2 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (+ (* 4 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (sqrt (/ 1 re)) (sqrt -1)))))))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (/ (+ (* 2 (* (/ (sqrt -1) im) (sqrt (pow re 5)))) (* (* im (sqrt -1)) (sqrt re))) re)>
#<alt (/ (+ (* (* im (sqrt -1)) (sqrt re)) (* (pow re 3) (+ (* -2 (* (/ (sqrt -1) (pow im 3)) (sqrt (pow re 3)))) (* 2 (* (/ (sqrt -1) im) (sqrt (/ 1 re))))))) re)>
#<alt (/ (+ (* (* im (sqrt -1)) (sqrt re)) (* (pow re 3) (+ (* 2 (* (/ (sqrt -1) im) (sqrt (/ 1 re)))) (* (pow re 3) (+ (* -2 (* (/ (sqrt -1) (pow im 3)) (sqrt (/ 1 (pow re 3))))) (* 4 (* (/ (sqrt -1) (pow im 5)) (sqrt re)))))))) re)>
#<alt (* 2 (* (sqrt re) (sqrt -1)))>
#<alt (* re (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* re (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* re (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/512 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 (pow re 13))))) (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1)))))))>
#<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/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 (* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (pow re 3)))) (* -1/512 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 re))))) (pow re 3))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt 4>
#<alt (+ 4 (/ (pow im 2) (pow re 2)))>
#<alt (+ 4 (/ (pow im 2) (pow re 2)))>
#<alt (+ 4 (/ (pow im 2) (pow re 2)))>
#<alt (/ (pow im 2) (pow re 2))>
#<alt (* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2))))>
#<alt (* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2))))>
#<alt (* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2))))>
#<alt (/ (pow im 2) (pow re 2))>
#<alt (* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2))))>
#<alt (* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2))))>
#<alt (* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2))))>
#<alt (/ (pow im 2) (pow re 2))>
#<alt (/ (+ (* 4 (pow re 2)) (pow im 2)) (pow re 2))>
#<alt (/ (+ (* 4 (pow re 2)) (pow im 2)) (pow re 2))>
#<alt (/ (+ (* 4 (pow re 2)) (pow im 2)) (pow re 2))>
#<alt 4>
#<alt (+ 4 (/ (pow im 2) (pow re 2)))>
#<alt (+ 4 (/ (pow im 2) (pow re 2)))>
#<alt (+ 4 (/ (pow im 2) (pow re 2)))>
#<alt 4>
#<alt (+ 4 (/ (pow im 2) (pow re 2)))>
#<alt (+ 4 (/ (pow im 2) (pow re 2)))>
#<alt (+ 4 (/ (pow im 2) (pow re 2)))>
#<alt (* -2 re)>
#<alt (* -2 re)>
#<alt (* -2 re)>
#<alt (* -2 re)>
#<alt (* -2 re)>
#<alt (* -2 re)>
#<alt (* -2 re)>
#<alt (* -2 re)>
#<alt (* -2 re)>
#<alt (* -2 re)>
#<alt (* -2 re)>
#<alt (* -2 re)>
#<alt (/ (pow im 2) (pow re 2))>
#<alt (/ (pow im 2) (pow re 2))>
#<alt (/ (pow im 2) (pow re 2))>
#<alt (/ (pow im 2) (pow re 2))>
#<alt (/ (pow im 2) (pow re 2))>
#<alt (/ (pow im 2) (pow re 2))>
#<alt (/ (pow im 2) (pow re 2))>
#<alt (/ (pow im 2) (pow re 2))>
#<alt (/ (pow im 2) (pow re 2))>
#<alt (/ (pow im 2) (pow re 2))>
#<alt (/ (pow im 2) (pow re 2))>
#<alt (/ (pow im 2) (pow re 2))>
#<alt (/ (pow im 2) (pow re 2))>
#<alt (/ (pow im 2) (pow re 2))>
#<alt (/ (pow im 2) (pow re 2))>
#<alt (/ (pow im 2) (pow re 2))>
#<alt (/ (pow im 2) (pow re 2))>
#<alt (/ (pow im 2) (pow re 2))>
#<alt (/ (pow im 2) (pow re 2))>
#<alt (/ (pow im 2) (pow re 2))>
#<alt (/ (pow im 2) (pow re 2))>
#<alt (/ (pow im 2) (pow re 2))>
#<alt (/ (pow im 2) (pow re 2))>
#<alt (/ (pow im 2) (pow re 2))>
Calls

114 calls:

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

rewrite314.0ms (3.1%)

Algorithm
1×batch-egg-rewrite
Rules
3952×*-lowering-*.f32
3952×*-lowering-*.f64
3456×/-lowering-/.f32
3456×/-lowering-/.f64
1708×+-lowering-+.f64
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
035153
1184144
21452143
08606143
Stop Event
1×iter limit
1×node limit
Counts
23 → 461
Calls
Call 1
Inputs
(pow (- (sqrt (+ (* re re) (* im im))) re) 1/2)
(* (pow (- (sqrt (+ (* re re) (* im im))) re) 1/2) (* 1/2 (sqrt 2)))
(- (sqrt (+ (* re re) (* im im))) re)
(sqrt (+ (* re re) (* im im)))
(* 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)
(* im (+ 2 (/ (* re -2) im)))
(* 1/2 (sqrt (* im (+ 2 (/ (* re -2) im)))))
(sqrt (* im (+ 2 (/ (* re -2) im))))
(+ 2 (/ (* re -2) im))
(* (+ (/ (* im im) (* re re)) 4) (- 0 re))
(* 1/2 (sqrt (* (+ (/ (* im im) (* re re)) 4) (- 0 re))))
(sqrt (* (+ (/ (* im im) (* re re)) 4) (- 0 re)))
(+ (/ (* im im) (* re re)) 4)
(sqrt 2)
(* 1/2 (sqrt 2))
(* re -2)
(/ (* im im) (* re re))
Outputs
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 (hypot.f64 re im) re))))
(exp.f64 (*.f64 (log.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (+.f64 (*.f64 (log.f64 (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) (*.f64 (log.f64 (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64))))
(sqrt.f64 (-.f64 (hypot.f64 re im) re))
(/.f64 #s(literal 1 binary64) (sqrt.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) (sqrt.f64 (/.f64 (+.f64 re (hypot.f64 re im)) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)))))
(/.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 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.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 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re re) (*.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re))))))
(/.f64 (sqrt.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re))) (sqrt.f64 (+.f64 re (hypot.f64 re im))))
(/.f64 (sqrt.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re))) (sqrt.f64 (-.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))) (sqrt.f64 (neg.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)))) (sqrt.f64 (neg.f64 (+.f64 re (hypot.f64 re im)))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))) (neg.f64 (sqrt.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)))) (neg.f64 (sqrt.f64 (+.f64 re (hypot.f64 re im)))))
(pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (-.f64 (hypot.f64 re im) re)))
(*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))) #s(literal 1/2 binary64)))
(*.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 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 (hypot.f64 re im) re)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (hypot.f64 re im) re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 (hypot.f64 re im) re)))
(*.f64 (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)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (hypot.f64 re im) re))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64))) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)))
(+.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re))
(+.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im))
(+.f64 (+.f64 (hypot.f64 re im) #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) re))
(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 (hypot.f64 re im) #s(literal 0 binary64)) re)
(-.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 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (/.f64 #s(literal 1 binary64) re) (hypot.f64 re im))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) (*.f64 re 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 (-.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 (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) re) (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) re))
(/.f64 (+.f64 (*.f64 (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (*.f64 re re)) (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (*.f64 re re)))
(/.f64 (+.f64 (*.f64 (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (/.f64 (*.f64 re re) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) #s(literal 1 binary64))) (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (/.f64 (*.f64 re re) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))))
(/.f64 (+.f64 (*.f64 (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (/.f64 re (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) #s(literal 1 binary64))) (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (/.f64 re (-.f64 #s(literal 0 binary64) (*.f64 re re)))))
(/.f64 (+.f64 (*.f64 (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))))
(/.f64 (+.f64 (*.f64 (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) re)))
(/.f64 (+.f64 (*.f64 (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 re re) (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 re re) (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re))))))
(/.f64 (+.f64 (*.f64 (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re))) (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re))))
(/.f64 (+.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) re) (*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) re))
(/.f64 (+.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (*.f64 re re)) (*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re re)))
(/.f64 (+.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (/.f64 (*.f64 re re) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) #s(literal 1 binary64))) (*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (/.f64 (*.f64 re re) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))))
(/.f64 (+.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (/.f64 re (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) #s(literal 1 binary64))) (*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (/.f64 re (-.f64 #s(literal 0 binary64) (*.f64 re re)))))
(/.f64 (+.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (-.f64 #s(literal 0 binary64) (*.f64 re re))))
(/.f64 (+.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (-.f64 #s(literal 0 binary64) re)) (*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re))))) (*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (-.f64 #s(literal 0 binary64) re)))
(/.f64 (+.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 re re) (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re))))) (*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 re re) (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re))))))
(/.f64 (+.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re))) (*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.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 re (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))))) (*.f64 re (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 re (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))))) (*.f64 re (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.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 (*.f64 re re) (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))))) (*.f64 (*.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 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re re) (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))))) (*.f64 (*.f64 re re) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))) (*.f64 (/.f64 (*.f64 re re) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))))) (*.f64 (/.f64 (*.f64 re re) (-.f64 #s(literal 0 binary64) (*.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 (+.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (/.f64 (*.f64 re re) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))))) (*.f64 (/.f64 (*.f64 re re) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))) (*.f64 (/.f64 re (-.f64 #s(literal 0 binary64) (*.f64 re re))) (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))))) (*.f64 (/.f64 re (-.f64 #s(literal 0 binary64) (*.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 (+.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (/.f64 re (-.f64 #s(literal 0 binary64) (*.f64 re re))) (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))))) (*.f64 (/.f64 re (-.f64 #s(literal 0 binary64) (*.f64 re re))) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.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 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.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 (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.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 (-.f64 #s(literal 0 binary64) re) (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(/.f64 (+.f64 (*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re))) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (-.f64 #s(literal 0 binary64) re) (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.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 (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 re re) (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re)))) (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))))) (*.f64 (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 re re) (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re)))) (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 re re) (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re)))) (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))))) (*.f64 (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 re re) (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re)))) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.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 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re)) (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))))) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re)) (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re)) (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))))) (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re)) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (-.f64 (*.f64 (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) re)))
(/.f64 (-.f64 (*.f64 (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (*.f64 re re)) (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (*.f64 re re)))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (-.f64 #s(literal 0 binary64) re)) (*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (-.f64 #s(literal 0 binary64) re)))
(/.f64 (-.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (*.f64 re re)) (*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re re)))
(/.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)))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) (+.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im)))))
(/.f64 (+.f64 (pow.f64 (+.f64 (hypot.f64 re im) #s(literal 0 binary64)) #s(literal 3 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 (+.f64 (hypot.f64 re im) #s(literal 0 binary64)) (+.f64 (hypot.f64 re im) #s(literal 0 binary64))) (-.f64 (*.f64 re re) (*.f64 (+.f64 (hypot.f64 re im) #s(literal 0 binary64)) (-.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 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 re re) (*.f64 im im)))))
(hypot.f64 re im)
(hypot.f64 im re)
(fabs.f64 (hypot.f64 re im))
(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.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 (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (sqrt.f64 (+.f64 (*.f64 im (*.f64 im (*.f64 im im))) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 im im)))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im)))))) (sqrt.f64 (neg.f64 (-.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 im (*.f64 im im)) (*.f64 re (*.f64 re re)))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.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 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (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 (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (sqrt.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)))))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re re) (*.f64 im im))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.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)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 im) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(sqrt.f64 (*.f64 im #s(literal 2 binary64)))
(pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 im #s(literal 2 binary64))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 im #s(literal 2 binary64)))) #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 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)))
(*.f64 im #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) im)
(*.f64 #s(literal 1/2 binary64) (pow.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)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(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)))) (pow.f64 (+.f64 re im) #s(literal 1/2 binary64)))
(/.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))) (pow.f64 (+.f64 re im) #s(literal 1/2 binary64)))
(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 im #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) re)))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.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)))
(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)))
(/.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 (neg.f64 (*.f64 #s(literal 2 binary64) (-.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 #s(literal 2 binary64) (-.f64 (*.f64 im im) (*.f64 re re)))) (neg.f64 (+.f64 re im)))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) #s(literal 2 binary64))) (neg.f64 (+.f64 (*.f64 im im) (*.f64 re (+.f64 re im)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) #s(literal 2 binary64))) (neg.f64 (+.f64 re im)))
(/.f64 (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 im (*.f64 im im))) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 im #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) re)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) re))) (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) re))))))
(/.f64 (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 im (*.f64 im im))) (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 im #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64))) (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64))))))
(*.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 (+.f64 im #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) re))
(-.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)))
(-.f64 (+.f64 im #s(literal 0 binary64)) re)
(-.f64 (/.f64 (*.f64 im im) (-.f64 im (-.f64 #s(literal 0 binary64) re))) (/.f64 (*.f64 re re) (-.f64 im (-.f64 #s(literal 0 binary64) re))))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (/.f64 #s(literal 1 binary64) re) im)
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) (*.f64 re re)) im)
(fma.f64 #s(literal -1 binary64) re im)
(/.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 #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 im) (*.f64 re re)) (+.f64 re im))
(/.f64 (-.f64 (*.f64 im im) (*.f64 re re)) (-.f64 im (-.f64 #s(literal 0 binary64) re)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.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) (neg.f64 (/.f64 (+.f64 re im) (-.f64 (*.f64 im im) (*.f64 re 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 (*.f64 im im)) (*.f64 re (*.f64 re re)))) (neg.f64 (+.f64 (*.f64 im im) (-.f64 (*.f64 re re) (*.f64 im (-.f64 #s(literal 0 binary64) re))))))
(/.f64 (neg.f64 (-.f64 (*.f64 im im) (*.f64 re re))) (neg.f64 (+.f64 re im)))
(/.f64 (neg.f64 (-.f64 (*.f64 im im) (*.f64 re re))) (neg.f64 (-.f64 im (-.f64 #s(literal 0 binary64) re))))
(/.f64 (-.f64 (*.f64 (*.f64 im (*.f64 im im)) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re im)))) (*.f64 (+.f64 (*.f64 im im) (*.f64 re (+.f64 re im))) (*.f64 re (*.f64 re re)))) (*.f64 (+.f64 (*.f64 im im) (*.f64 re (+.f64 re im))) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re im)))))
(/.f64 (-.f64 (*.f64 (*.f64 im im) (+.f64 re im)) (*.f64 (+.f64 re im) (*.f64 re re))) (*.f64 (+.f64 re im) (+.f64 re im)))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))))) (neg.f64 (neg.f64 (+.f64 (*.f64 im im) (*.f64 re (+.f64 re im))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 im im) (*.f64 re re)))) (neg.f64 (neg.f64 (+.f64 re im))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im im))) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 (-.f64 #s(literal 0 binary64) re) im))))
(/.f64 (+.f64 (pow.f64 (+.f64 im #s(literal 0 binary64)) #s(literal 3 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 (+.f64 im #s(literal 0 binary64)) (+.f64 im #s(literal 0 binary64))) (-.f64 (*.f64 re re) (*.f64 (+.f64 im #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) re)))))
(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 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64)) (*.f64 im #s(literal 2 binary64)))
(-.f64 (/.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 im #s(literal 2 binary64))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64)))))
(fma.f64 re (*.f64 (/.f64 #s(literal -2 binary64) im) im) (*.f64 im #s(literal 2 binary64)))
(fma.f64 im #s(literal 2 binary64) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64)))
(fma.f64 im (/.f64 (*.f64 re #s(literal -2 binary64)) im) (*.f64 im #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) im (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64)))
(fma.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64) (*.f64 im #s(literal 2 binary64)))
(fma.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) im (*.f64 im #s(literal 2 binary64)))
(fma.f64 (*.f64 re im) (/.f64 #s(literal -2 binary64) im) (*.f64 im #s(literal 2 binary64)))
(fma.f64 (*.f64 im (*.f64 re #s(literal -2 binary64))) (/.f64 #s(literal 1 binary64) im) (*.f64 im #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 im (*.f64 im im))) (*.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -8 binary64)) #s(literal 1 binary64))) (+.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 im #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64))) (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 im #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64)))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64))))
(/.f64 (*.f64 im (+.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -8 binary64)) (*.f64 im (*.f64 im im))))) (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) #s(literal 2 binary64)) (/.f64 im (*.f64 re #s(literal -2 binary64))))))
(/.f64 (*.f64 im (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 re re) (*.f64 im im))))) (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))
(/.f64 (*.f64 (+.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -8 binary64)) (*.f64 im (*.f64 im im)))) im) (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) #s(literal 2 binary64)) (/.f64 im (*.f64 re #s(literal -2 binary64))))))
(/.f64 (*.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 re re) (*.f64 im im)))) im) (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))
(/.f64 (neg.f64 (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 im (*.f64 im im))) (*.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -8 binary64)) #s(literal 1 binary64)))) (neg.f64 (+.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 im #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64))) (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 im #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64))))) (neg.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 im (+.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -8 binary64)) (*.f64 im (*.f64 im im)))))) (neg.f64 (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) #s(literal 2 binary64)) (/.f64 im (*.f64 re #s(literal -2 binary64)))))))
(/.f64 (neg.f64 (*.f64 im (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 re re) (*.f64 im im)))))) (neg.f64 (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -8 binary64)) (*.f64 im (*.f64 im im)))) im)) (neg.f64 (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) #s(literal 2 binary64)) (/.f64 im (*.f64 re #s(literal -2 binary64)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 re re) (*.f64 im im)))) im)) (neg.f64 (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -8 binary64)) #s(literal 1 binary64)) (*.f64 #s(literal 8 binary64) (*.f64 im (*.f64 im im)))) (+.f64 (*.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64))) (-.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 im #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64)) (*.f64 im #s(literal 2 binary64))))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))
(*.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) im)
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64)))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 im) (*.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (pow.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 im (*.f64 im im))) (*.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -8 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (+.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 im #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64))) (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64)))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 im #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64)))))
(/.f64 (sqrt.f64 (*.f64 im (+.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -8 binary64)) (*.f64 im (*.f64 im im)))))) (sqrt.f64 (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) #s(literal 2 binary64)) (/.f64 im (*.f64 re #s(literal -2 binary64)))))))
(/.f64 (sqrt.f64 (*.f64 im (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 re re) (*.f64 im im)))))) (pow.f64 (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
(/.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -8 binary64)) (*.f64 im (*.f64 im im)))) im)) (sqrt.f64 (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) #s(literal 2 binary64)) (/.f64 im (*.f64 re #s(literal -2 binary64)))))))
(/.f64 (sqrt.f64 (*.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 re re) (*.f64 im im)))) im)) (pow.f64 (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
(pow.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64))) (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64)))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64))))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 im) (pow.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) #s(literal 1/2 binary64)) (sqrt.f64 im))
(*.f64 (pow.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1 binary64))) #s(literal 1/4 binary64)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im))
(+.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) #s(literal 2 binary64))
(-.f64 (/.f64 #s(literal 4 binary64) (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im))) (/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 re re) (*.f64 im im))) (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im))))
(-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 re re) (*.f64 im im))) (-.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) #s(literal 2 binary64))) (/.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) #s(literal 2 binary64))))
(fma.f64 re (/.f64 #s(literal -2 binary64) im) #s(literal 2 binary64))
(fma.f64 #s(literal -2 binary64) (/.f64 re im) #s(literal 2 binary64))
(fma.f64 #s(literal -2 binary64) (*.f64 re (/.f64 #s(literal 1 binary64) im)) #s(literal 2 binary64))
(fma.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 #s(literal 1 binary64) im) #s(literal 2 binary64))
(fma.f64 (*.f64 re #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) im)) #s(literal 2 binary64))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im) #s(literal 2 binary64))
(fma.f64 (/.f64 #s(literal 1 binary64) im) (*.f64 re #s(literal -2 binary64)) #s(literal 2 binary64))
(fma.f64 (/.f64 #s(literal -2 binary64) im) re #s(literal 2 binary64))
(/.f64 (+.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -8 binary64)) (*.f64 im (*.f64 im im)))) (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) #s(literal 2 binary64)) (/.f64 im (*.f64 re #s(literal -2 binary64))))))
(/.f64 (+.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -8 binary64)) (*.f64 im (*.f64 im im)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 re re) (*.f64 im im))) (-.f64 #s(literal 4 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 re #s(literal -2 binary64))) im))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) #s(literal 2 binary64)) (/.f64 im (*.f64 re #s(literal -2 binary64))))) (+.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -8 binary64)) (*.f64 im (*.f64 im im))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 re re) (*.f64 im im))))))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 re re) (*.f64 im im)))) (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) #s(literal 2 binary64)) (/.f64 im (*.f64 re #s(literal -2 binary64))))) (+.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -8 binary64)) (*.f64 im (*.f64 im im)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 re re) (*.f64 im im)))))))
(/.f64 (neg.f64 (+.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -8 binary64)) (*.f64 im (*.f64 im im))))) (neg.f64 (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) #s(literal 2 binary64)) (/.f64 im (*.f64 re #s(literal -2 binary64)))))))
(/.f64 (neg.f64 (+.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -8 binary64)) (*.f64 im (*.f64 im im))))) (neg.f64 (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 re re) (*.f64 im im))) (-.f64 #s(literal 4 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 re #s(literal -2 binary64))) im)))))
(/.f64 (neg.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 re re) (*.f64 im im))))) (neg.f64 (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im))))
(/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) #s(literal 2 binary64)))
(/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im))) (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 re re) (*.f64 im im))))) (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im))))
(/.f64 (neg.f64 (neg.f64 (+.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -8 binary64)) (*.f64 im (*.f64 im im)))))) (neg.f64 (neg.f64 (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) #s(literal 2 binary64)) (/.f64 im (*.f64 re #s(literal -2 binary64))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 re re) (*.f64 im im)))))) (neg.f64 (neg.f64 (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))))
(/.f64 (neg.f64 (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 4 binary64))) (neg.f64 (-.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) #s(literal 2 binary64))))
(pow.f64 (/.f64 (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) #s(literal 2 binary64)) (/.f64 im (*.f64 re #s(literal -2 binary64))))) (+.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -8 binary64)) (*.f64 im (*.f64 im im))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 re re) (*.f64 im im))))) #s(literal -1 binary64))
(*.f64 (+.f64 #s(literal 8 binary64) (/.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -8 binary64)) (*.f64 im (*.f64 im im)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) #s(literal 2 binary64)) (/.f64 im (*.f64 re #s(literal -2 binary64)))))))
(*.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 re re) (*.f64 im im)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im))))
(+.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) #s(literal 0 binary64)) (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re)))
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 im im) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 4 binary64)))
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 4 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 im im) (*.f64 re re))))
(+.f64 (*.f64 #s(literal 0 binary64) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64))) (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re)))
(+.f64 (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (-.f64 #s(literal 0 binary64) re)) (*.f64 #s(literal 4 binary64) (-.f64 #s(literal 0 binary64) re)))
(+.f64 (*.f64 #s(literal 4 binary64) (-.f64 #s(literal 0 binary64) re)) (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (-.f64 #s(literal 0 binary64) re)))
(fma.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (-.f64 #s(literal 0 binary64) re) (*.f64 #s(literal 4 binary64) (-.f64 #s(literal 0 binary64) re)))
(fma.f64 #s(literal 4 binary64) (-.f64 #s(literal 0 binary64) re) (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (-.f64 #s(literal 0 binary64) re)))
(fma.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) #s(literal 0 binary64) (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re)))
(fma.f64 #s(literal 0 binary64) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re)))
(fma.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 im im) (*.f64 re re)) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 4 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 4 binary64) (*.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 im im) (*.f64 re re))))
(neg.f64 (*.f64 re (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64))))
(neg.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) re))
(/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (-.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 16 binary64)) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re))) (*.f64 re re)))
(/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 (-.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 16 binary64)) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re))) re))
(/.f64 (*.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal -16 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64)) (*.f64 re re)))
(/.f64 (*.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal -16 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64)) re))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64))) (*.f64 (*.f64 re re) (-.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 16 binary64)) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal -16 binary64))) (*.f64 (*.f64 re re) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64))) (*.f64 re (-.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 16 binary64)) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal -16 binary64))) (*.f64 re (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64))))
(/.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re))
(/.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re re))) re)
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64))) (-.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 16 binary64)) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal -16 binary64))) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64)))
(/.f64 (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64)) (-.f64 #s(literal 0 binary64) re)) (-.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 16 binary64)) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re))))
(/.f64 (*.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal -16 binary64)) (-.f64 #s(literal 0 binary64) re)) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64))) (*.f64 re re))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64))) re)
(/.f64 (neg.f64 (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (neg.f64 (*.f64 (-.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 16 binary64)) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re))) (*.f64 re re))))
(/.f64 (neg.f64 (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (neg.f64 (*.f64 (-.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 16 binary64)) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re))) re)))
(/.f64 (neg.f64 (*.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal -16 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (neg.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64)) (*.f64 re re))))
(/.f64 (neg.f64 (*.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal -16 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (neg.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64)) re)))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64)))) (neg.f64 (*.f64 (*.f64 re re) (-.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 16 binary64)) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal -16 binary64)))) (neg.f64 (*.f64 (*.f64 re re) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64)))) (neg.f64 (*.f64 re (-.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 16 binary64)) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal -16 binary64)))) (neg.f64 (*.f64 re (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))
(/.f64 (neg.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64)))) (neg.f64 (-.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 16 binary64)) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal -16 binary64)))) (neg.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64))))
(/.f64 (neg.f64 (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64)) (-.f64 #s(literal 0 binary64) re))) (neg.f64 (-.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 16 binary64)) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal -16 binary64)) (-.f64 #s(literal 0 binary64) re))) (neg.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)))) (-.f64 #s(literal 0 binary64) re))
(/.f64 (+.f64 (pow.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) #s(literal 0 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) #s(literal 0 binary64)) (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) #s(literal 0 binary64))) (-.f64 (*.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re)) (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re))) (*.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) #s(literal 0 binary64)) (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 im im) (*.f64 re re))) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 4 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 im im) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 im im) (*.f64 re re)))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 4 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 4 binary64))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 im im) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 4 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 4 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 im im) (*.f64 re re))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 4 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 4 binary64))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 im im) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 im im) (*.f64 re re)))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 4 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 im im) (*.f64 re re)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 0 binary64) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 0 binary64) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64))) (*.f64 #s(literal 0 binary64) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)))) (-.f64 (*.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re)) (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re))) (*.f64 (*.f64 #s(literal 0 binary64) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64))) (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (-.f64 #s(literal 0 binary64) re)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 4 binary64) (-.f64 #s(literal 0 binary64) re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (-.f64 #s(literal 0 binary64) re)) (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (-.f64 #s(literal 0 binary64) re))) (-.f64 (*.f64 (*.f64 #s(literal 4 binary64) (-.f64 #s(literal 0 binary64) re)) (*.f64 #s(literal 4 binary64) (-.f64 #s(literal 0 binary64) re))) (*.f64 (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (-.f64 #s(literal 0 binary64) re)) (*.f64 #s(literal 4 binary64) (-.f64 #s(literal 0 binary64) re))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 4 binary64) (-.f64 #s(literal 0 binary64) re)) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (-.f64 #s(literal 0 binary64) re)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 4 binary64) (-.f64 #s(literal 0 binary64) re)) (*.f64 #s(literal 4 binary64) (-.f64 #s(literal 0 binary64) re))) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (-.f64 #s(literal 0 binary64) re)) (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (-.f64 #s(literal 0 binary64) re))) (*.f64 (*.f64 #s(literal 4 binary64) (-.f64 #s(literal 0 binary64) re)) (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (-.f64 #s(literal 0 binary64) re))))))
(*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re))
(*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)))
(*.f64 (/.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) re) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) re))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) re) (/.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) re))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re))))
(*.f64 (sqrt.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64))) (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re))) #s(literal 1/2 binary64)))
(sqrt.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re)))
(/.f64 (sqrt.f64 (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 (*.f64 (-.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 16 binary64)) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re))) (*.f64 re re))))
(/.f64 (sqrt.f64 (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (sqrt.f64 (*.f64 (-.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 16 binary64)) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re))) re)))
(/.f64 (sqrt.f64 (*.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal -16 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64)) (*.f64 re re))))
(/.f64 (sqrt.f64 (*.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal -16 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (sqrt.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64)) re)))
(/.f64 (sqrt.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64)))) (sqrt.f64 (*.f64 (*.f64 re re) (-.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 16 binary64)) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re))))))
(/.f64 (sqrt.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal -16 binary64)))) (sqrt.f64 (*.f64 (*.f64 re re) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64)))))
(/.f64 (sqrt.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64)))) (sqrt.f64 (*.f64 re (-.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 16 binary64)) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re))))))
(/.f64 (sqrt.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal -16 binary64)))) (sqrt.f64 (*.f64 re (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64)))))
(/.f64 (sqrt.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) re)
(/.f64 (sqrt.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (sqrt.f64 re))
(/.f64 (sqrt.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64)))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 16 binary64)) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re)))))
(/.f64 (sqrt.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal -16 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64))))
(/.f64 (sqrt.f64 (*.f64 (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64)) (-.f64 #s(literal 0 binary64) re))) (sqrt.f64 (-.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 16 binary64)) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re)))))
(/.f64 (sqrt.f64 (*.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal -16 binary64)) (-.f64 #s(literal 0 binary64) re))) (sqrt.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64))))
(/.f64 (sqrt.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)))) re)
(/.f64 (sqrt.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)))) (sqrt.f64 re))
(pow.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re)) (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re)))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64))) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64))))
(*.f64 (pow.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/4 binary64)))
(+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64))
(+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))
(-.f64 (/.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64))) (/.f64 #s(literal 16 binary64) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64))))
(-.f64 (/.f64 #s(literal 16 binary64) (-.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))) (/.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) (-.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))
(fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 4 binary64))
(fma.f64 (*.f64 im im) (/.f64 #s(literal 1 binary64) (*.f64 re re)) #s(literal 4 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 re re))) #s(literal 4 binary64))
(fma.f64 (/.f64 im re) (/.f64 im re) #s(literal 4 binary64))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64))
(fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) (*.f64 im im) #s(literal 4 binary64))
(fma.f64 (/.f64 (*.f64 im im) re) (/.f64 #s(literal 1 binary64) re) #s(literal 4 binary64))
(fma.f64 (/.f64 im (*.f64 re re)) im #s(literal 4 binary64))
(/.f64 (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64)) (-.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 16 binary64)) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re))))
(/.f64 (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64)) (+.f64 #s(literal 16 binary64) (/.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64)) (/.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 16 binary64)) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re))) (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64)) (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal -16 binary64))))
(/.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal -16 binary64)) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 16 binary64)) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re))) (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64)) (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal -16 binary64)))))
(/.f64 (neg.f64 (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64))) (neg.f64 (-.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 16 binary64)) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re)))))
(/.f64 (neg.f64 (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64))) (neg.f64 (+.f64 #s(literal 16 binary64) (/.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64)) (/.f64 (*.f64 re re) (*.f64 im im))))))
(/.f64 (neg.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal -16 binary64))) (neg.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64))))
(/.f64 (-.f64 #s(literal 16 binary64) (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im)))) (-.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))
(/.f64 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64))) (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64)) #s(literal 16 binary64))) (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64)) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64)))) (neg.f64 (neg.f64 (-.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 16 binary64)) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal -16 binary64)))) (neg.f64 (neg.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 16 binary64) (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))))) (neg.f64 (-.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))
(pow.f64 (/.f64 (-.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 16 binary64)) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re))) (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64)) (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal -16 binary64))) #s(literal -1 binary64))
(*.f64 (+.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) #s(literal 64 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal 16 binary64)) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re)))))
(*.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal -16 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal -4 binary64))))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))
(*.f64 re #s(literal -2 binary64))
(*.f64 #s(literal -2 binary64) re)
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (/.f64 im re))))
(exp.f64 (*.f64 (log.f64 (/.f64 im re)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 re re) (*.f64 im im))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (*.f64 re re)) (/.f64 (*.f64 im im) (-.f64 #s(literal 0 binary64) (*.f64 re re))))
(neg.f64 (/.f64 (*.f64 im im) (-.f64 #s(literal 0 binary64) (*.f64 re re))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (*.f64 re re)))
(/.f64 (*.f64 im im) (*.f64 re re))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (-.f64 #s(literal 0 binary64) (*.f64 re re)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 re re) (*.f64 im im)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 re (/.f64 (*.f64 im im) re)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (/.f64 (*.f64 im im) re) re)
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 re (/.f64 (*.f64 im im) re))))
(/.f64 (*.f64 (*.f64 im im) #s(literal 1 binary64)) (*.f64 re re))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im))) (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re))))
(/.f64 (neg.f64 (/.f64 (*.f64 im im) re)) (-.f64 #s(literal 0 binary64) re))
(/.f64 (*.f64 (/.f64 im re) im) re)
(/.f64 (neg.f64 (*.f64 (*.f64 im im) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (*.f64 im im) re))) (neg.f64 (-.f64 #s(literal 0 binary64) re)))
(/.f64 (neg.f64 (*.f64 (/.f64 im re) im)) (-.f64 #s(literal 0 binary64) re))
(pow.f64 (/.f64 im re) #s(literal 2 binary64))
(pow.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 re (/.f64 (*.f64 im im) re)) #s(literal -1 binary64))
(*.f64 im (/.f64 im (*.f64 re re)))
(*.f64 (*.f64 im im) (/.f64 #s(literal 1 binary64) (*.f64 re re)))
(*.f64 (*.f64 im im) (pow.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 re re))))
(*.f64 (/.f64 im re) (/.f64 im re))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) (*.f64 im im))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) #s(literal -1 binary64)))
(*.f64 (/.f64 (*.f64 im im) re) (/.f64 #s(literal 1 binary64) re))
(*.f64 (/.f64 im (*.f64 re re)) im)
(*.f64 (/.f64 im #s(literal 1 binary64)) (/.f64 im (*.f64 re re)))
(*.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 im im) re))
(*.f64 (/.f64 im (-.f64 #s(literal 0 binary64) re)) (/.f64 (-.f64 #s(literal 0 binary64) im) re))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) im) re) (/.f64 im (-.f64 #s(literal 0 binary64) re)))
(*.f64 (/.f64 #s(literal -1 binary64) re) (/.f64 (*.f64 im im) (-.f64 #s(literal 0 binary64) re)))
(*.f64 (/.f64 im #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 re re)))

simplify396.0ms (4%)

Algorithm
1×egg-herbie
Rules
7526×*-lowering-*.f32
7526×*-lowering-*.f64
5224×+-lowering-+.f64
5224×+-lowering-+.f32
1716×distribute-rgt-in
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
011678158
142747694
085277694
Stop Event
1×iter limit
1×node limit
Counts
456 → 456
Calls
Call 1
Inputs
(sqrt im)
(+ (sqrt im) (* -1/2 (* (sqrt (/ 1 im)) re)))
(+ (sqrt im) (* re (+ (* -1/2 (sqrt (/ 1 im))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) re)))))
(+ (sqrt im) (* re (+ (* -1/2 (sqrt (/ 1 im))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) re)) (* 1/8 (sqrt (/ 1 (pow im 3)))))))))
(* (* im (sqrt 1/2)) (sqrt (/ 1 re)))
(+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))))
(+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (pow im 5) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* -1 (* re (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(* (* im (sqrt 1/2)) (sqrt (/ 1 re)))
(* im (+ (* -1/16 (* (/ (pow im 2) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 1/2))))
(* im (+ (* (sqrt (/ 1 re)) (sqrt 1/2)) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* (sqrt (/ 1 re)) (sqrt 1/2)) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (sqrt 1/2))))))))))
(sqrt im)
(* im (+ (sqrt (/ 1 im)) (* -1/2 (* (sqrt (/ 1 (pow im 3))) re))))
(* im (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)) (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2))))))
(* im (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2)))))))
(* -1 (* (sqrt im) (sqrt -1)))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1)))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (sqrt -1)))) (* 1/4 (* (sqrt im) (* (pow re 2) (sqrt -1))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))
(* 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))))))))
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))))))))
(* 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)))))
(* -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/2 (* (sqrt re) (sqrt -2)))
(+ (* 1/2 (* (sqrt re) (sqrt -2))) (* 1/2 (* (/ im (sqrt -2)) (sqrt (/ 1 re)))))
(+ (* 1/2 (* (sqrt re) (sqrt -2))) (* im (+ (* -1/4 (* (/ im (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (/ 1 (sqrt -2)))))))
(+ (* 1/2 (* (sqrt re) (sqrt -2))) (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (/ 1 (sqrt -2)))) (* im (+ (* -1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (pow (sqrt -2) 3)))) (* 1/4 (* (/ im (pow (sqrt -2) 5)) (sqrt (/ 1 (pow re 5))))))))))
(* 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) (pow (sqrt 2) 3)))) (* 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 7))) (/ (pow re 3) (pow (sqrt 2) 5)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (pow (sqrt -1) 2) (sqrt 2))))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (pow (sqrt -1) 2)) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2))))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (pow (sqrt -1) 2)) (pow (sqrt 2) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 7))) (/ (* (pow re 3) (pow (sqrt -1) 2)) (pow (sqrt 2) 5)))) (+ (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (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 (pow im 3))) (/ re (pow (sqrt 2) 3)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (/ 1 (pow (sqrt 2) 3)))) (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ re (pow (sqrt 2) 5)))))))))
(* 1/2 (* (sqrt re) (sqrt -2)))
(* re (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -2))) (* 1/2 (* (/ im (sqrt -2)) (sqrt (/ 1 (pow re 3)))))))
(* re (+ (* -1/4 (* (/ (pow im 2) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -2))) (* 1/2 (* (/ im (sqrt -2)) (sqrt (/ 1 (pow re 3))))))))
(* re (+ (* -1/4 (* (/ (pow im 2) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (/ (pow im 3) (pow (sqrt -2) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -2))) (* 1/2 (* (/ im (sqrt -2)) (sqrt (/ 1 (pow re 3)))))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* -1 (* re (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))) (* 1/2 (* (/ (* im (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))))))
(* -1 (* re (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))) (* 1/2 (* (/ (* im (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3)))))))))
(* -1 (* re (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (/ (* (pow im 3) (sqrt -1)) (pow (sqrt 2) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))) (* 1/2 (* (/ (* im (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))))))))
(* (sqrt re) (sqrt -2))
(+ (* (sqrt re) (sqrt -2)) (* (/ im (sqrt -2)) (sqrt (/ 1 re))))
(+ (* im (+ (* -1/2 (* (/ im (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (/ 1 (sqrt -2))))) (* (sqrt re) (sqrt -2)))
(+ (* im (+ (* im (+ (* -1/2 (* (sqrt (/ 1 (pow re 3))) (/ 1 (pow (sqrt -2) 3)))) (* 1/2 (* (/ im (pow (sqrt -2) 5)) (sqrt (/ 1 (pow re 5))))))) (* (sqrt (/ 1 re)) (/ 1 (sqrt -2))))) (* (sqrt re) (sqrt -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) (pow (sqrt 2) 3)))) (* (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 7))) (/ (pow re 3) (pow (sqrt 2) 5)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (pow (sqrt -1) 2) (sqrt 2))))
(* -1 (* im (+ (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2))) (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (pow (sqrt -1) 2)) (pow (sqrt 2) 3)))) (+ (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2))) (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (pow (sqrt -1) 2)) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 7))) (/ (* (pow re 3) (pow (sqrt -1) 2)) (pow (sqrt 2) 5)))) (+ (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2))) (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (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 (pow im 3))) (/ re (pow (sqrt 2) 3)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ 1 (pow (sqrt 2) 3)))) (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ re (pow (sqrt 2) 5)))))))) (* (sqrt im) (sqrt 2)))
(* (sqrt re) (sqrt -2))
(* re (+ (* (sqrt (/ 1 re)) (sqrt -2)) (* (/ im (sqrt -2)) (sqrt (/ 1 (pow re 3))))))
(* re (+ (* -1/2 (* (/ (pow im 2) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* (sqrt (/ 1 re)) (sqrt -2)) (* (/ im (sqrt -2)) (sqrt (/ 1 (pow re 3)))))))
(* re (+ (* -1/2 (* (/ (pow im 2) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (/ (pow im 3) (pow (sqrt -2) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* (sqrt (/ 1 re)) (sqrt -2)) (* (/ im (sqrt -2)) (sqrt (/ 1 (pow re 3))))))))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* -1 (* re (+ (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))) (* (/ (* im (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3)))))))
(* -1 (* re (+ (* -1/2 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))) (* (/ (* im (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))))))
(* -1 (* re (+ (* -1/2 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (/ (* (pow im 3) (sqrt -1)) (pow (sqrt 2) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))) (* (/ (* im (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3)))))))))
2
(+ 2 (* -2 (/ re im)))
(+ 2 (* -2 (/ re im)))
(+ 2 (* -2 (/ re im)))
(* -2 (/ re im))
(* re (- (* 2 (/ 1 re)) (* 2 (/ 1 im))))
(* re (- (* 2 (/ 1 re)) (* 2 (/ 1 im))))
(* re (- (* 2 (/ 1 re)) (* 2 (/ 1 im))))
(* -2 (/ re im))
(* -1 (* re (- (* 2 (/ 1 im)) (* 2 (/ 1 re)))))
(* -1 (* re (- (* 2 (/ 1 im)) (* 2 (/ 1 re)))))
(* -1 (* re (- (* 2 (/ 1 im)) (* 2 (/ 1 re)))))
(* -2 (/ re im))
(/ (+ (* -2 re) (* 2 im)) im)
(/ (+ (* -2 re) (* 2 im)) im)
(/ (+ (* -2 re) (* 2 im)) im)
2
(+ 2 (* -2 (/ re im)))
(+ 2 (* -2 (/ re im)))
(+ 2 (* -2 (/ re im)))
2
(+ 2 (* -2 (/ re im)))
(+ 2 (* -2 (/ re im)))
(+ 2 (* -2 (/ re im)))
(* -4 re)
(+ (* -4 re) (* -1 (/ (pow im 2) re)))
(+ (* -4 re) (* -1 (/ (pow im 2) re)))
(+ (* -4 re) (* -1 (/ (pow im 2) re)))
(* -1 (/ (pow im 2) re))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(* -1 (/ (pow im 2) re))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(* -1 (/ (pow im 2) re))
(/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)
(/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)
(/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)
(* -4 re)
(* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))
(* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))
(* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))
(* -4 re)
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(* (sqrt re) (sqrt -1))
(+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt -1)))
(+ (* (sqrt re) (sqrt -1)) (* (pow im 2) (+ (* -1/128 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 7))))) (* 1/8 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))))))
(+ (* (sqrt re) (sqrt -1)) (* (pow im 2) (+ (* 1/8 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))) (* (pow im 2) (+ (* -1/128 (* (sqrt (/ 1 (pow re 7))) (sqrt -1))) (* 1/1024 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 11))))))))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))
(* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))
(* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (+ (* 2 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))))
(* -1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))
(* -1 (* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))))
(* -1 (* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (+ (* 2 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (/ (sqrt -1) im) (sqrt (pow re 5)))) re)
(/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (pow re 3) (+ (* -1 (* (/ (sqrt -1) (pow im 3)) (sqrt (pow re 3)))) (* (/ (sqrt -1) im) (sqrt (/ 1 re)))))) re)
(/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (pow re 3) (+ (* (/ (sqrt -1) im) (sqrt (/ 1 re))) (* (pow re 3) (+ (* -1 (* (/ (sqrt -1) (pow im 3)) (sqrt (/ 1 (pow re 3))))) (* 2 (* (/ (sqrt -1) (pow im 5)) (sqrt re)))))))) re)
(* (sqrt re) (sqrt -1))
(* re (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1))))
(* re (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(* re (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/1024 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 (pow re 13))))) (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* (sqrt re) (sqrt -1)))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(* -1 (* re (+ (* -1 (/ (+ (* 1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (pow re 3)))) (* -1/1024 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 re))))) (pow re 3))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(* 2 (* (sqrt re) (sqrt -1)))
(+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 2 (* (sqrt re) (sqrt -1))))
(+ (* 2 (* (sqrt re) (sqrt -1))) (* (pow im 2) (+ (* -1/64 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 7))))) (* 1/4 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))))))
(+ (* 2 (* (sqrt re) (sqrt -1))) (* (pow im 2) (+ (* 1/4 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))) (* (pow im 2) (+ (* -1/64 (* (sqrt (/ 1 (pow re 7))) (sqrt -1))) (* 1/512 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 11))))))))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* im (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1))))
(* im (+ (* -2 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(* im (+ (* -2 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (+ (* 4 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* -1 (* im (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(* -1 (* im (+ (* -2 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* im (+ (* -2 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (+ (* 4 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (sqrt (/ 1 re)) (sqrt -1)))))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(/ (+ (* 2 (* (/ (sqrt -1) im) (sqrt (pow re 5)))) (* (* im (sqrt -1)) (sqrt re))) re)
(/ (+ (* (* im (sqrt -1)) (sqrt re)) (* (pow re 3) (+ (* -2 (* (/ (sqrt -1) (pow im 3)) (sqrt (pow re 3)))) (* 2 (* (/ (sqrt -1) im) (sqrt (/ 1 re))))))) re)
(/ (+ (* (* im (sqrt -1)) (sqrt re)) (* (pow re 3) (+ (* 2 (* (/ (sqrt -1) im) (sqrt (/ 1 re)))) (* (pow re 3) (+ (* -2 (* (/ (sqrt -1) (pow im 3)) (sqrt (/ 1 (pow re 3))))) (* 4 (* (/ (sqrt -1) (pow im 5)) (sqrt re)))))))) re)
(* 2 (* (sqrt re) (sqrt -1)))
(* re (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1)))))
(* re (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* re (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/512 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 (pow re 13))))) (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1)))))))
(* -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/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))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (pow re 3)))) (* -1/512 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 re))))) (pow re 3))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
4
(+ 4 (/ (pow im 2) (pow re 2)))
(+ 4 (/ (pow im 2) (pow re 2)))
(+ 4 (/ (pow im 2) (pow re 2)))
(/ (pow im 2) (pow re 2))
(* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2))))
(* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2))))
(* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2))))
(/ (pow im 2) (pow re 2))
(* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2))))
(* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2))))
(* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2))))
(/ (pow im 2) (pow re 2))
(/ (+ (* 4 (pow re 2)) (pow im 2)) (pow re 2))
(/ (+ (* 4 (pow re 2)) (pow im 2)) (pow re 2))
(/ (+ (* 4 (pow re 2)) (pow im 2)) (pow re 2))
4
(+ 4 (/ (pow im 2) (pow re 2)))
(+ 4 (/ (pow im 2) (pow re 2)))
(+ 4 (/ (pow im 2) (pow re 2)))
4
(+ 4 (/ (pow im 2) (pow re 2)))
(+ 4 (/ (pow im 2) (pow re 2)))
(+ 4 (/ (pow im 2) (pow re 2)))
(* -2 re)
(* -2 re)
(* -2 re)
(* -2 re)
(* -2 re)
(* -2 re)
(* -2 re)
(* -2 re)
(* -2 re)
(* -2 re)
(* -2 re)
(* -2 re)
(/ (pow im 2) (pow re 2))
(/ (pow im 2) (pow re 2))
(/ (pow im 2) (pow re 2))
(/ (pow im 2) (pow re 2))
(/ (pow im 2) (pow re 2))
(/ (pow im 2) (pow re 2))
(/ (pow im 2) (pow re 2))
(/ (pow im 2) (pow re 2))
(/ (pow im 2) (pow re 2))
(/ (pow im 2) (pow re 2))
(/ (pow im 2) (pow re 2))
(/ (pow im 2) (pow re 2))
(/ (pow im 2) (pow re 2))
(/ (pow im 2) (pow re 2))
(/ (pow im 2) (pow re 2))
(/ (pow im 2) (pow re 2))
(/ (pow im 2) (pow re 2))
(/ (pow im 2) (pow re 2))
(/ (pow im 2) (pow re 2))
(/ (pow im 2) (pow re 2))
(/ (pow im 2) (pow re 2))
(/ (pow im 2) (pow re 2))
(/ (pow im 2) (pow re 2))
(/ (pow im 2) (pow re 2))
Outputs
(sqrt im)
(sqrt.f64 im)
(+ (sqrt im) (* -1/2 (* (sqrt (/ 1 im)) re)))
(+.f64 (sqrt.f64 im) (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re)))
(+ (sqrt im) (* re (+ (* -1/2 (sqrt (/ 1 im))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) re)))))
(+.f64 (sqrt.f64 im) (*.f64 re (+.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/8 binary64) (*.f64 re (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))))))
(+ (sqrt im) (* re (+ (* -1/2 (sqrt (/ 1 im))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) re)) (* 1/8 (sqrt (/ 1 (pow im 3)))))))))
(+.f64 (sqrt.f64 im) (*.f64 re (+.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 re (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 re (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))))) (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))))))
(* (* im (sqrt 1/2)) (sqrt (/ 1 re)))
(*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(+.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))))
(+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))))))
(+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (pow im 5) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))))
(+.f64 (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/512 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 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))))))) (+.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (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 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(* -1 (* re (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(*.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/16 binary64) (/.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)))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(*.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/16 binary64) (/.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)))))) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/32 binary64) (/.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)))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* (* im (sqrt 1/2)) (sqrt (/ 1 re)))
(*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (+ (* -1/16 (* (/ (pow im 2) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 1/2))))
(*.f64 im (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* im (+ (* (sqrt (/ 1 re)) (sqrt 1/2)) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (+.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (*.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 (+ (* (sqrt (/ 1 re)) (sqrt 1/2)) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (sqrt 1/2))))))))))
(*.f64 im (+.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.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/2 binary64) (sqrt.f64 re)) (/.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))))))))))
(sqrt im)
(sqrt.f64 im)
(* im (+ (sqrt (/ 1 im)) (* -1/2 (* (sqrt (/ 1 (pow im 3))) re))))
(*.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal -1/2 binary64) (*.f64 re (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))))
(* im (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)) (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2))))))
(*.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 re (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re))))))
(* im (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2)))))))
(*.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 re (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) #s(literal 1/8 binary64)))))
(* -1 (* (sqrt im) (sqrt -1)))
(*.f64 (sqrt.f64 im) (neg.f64 (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1)))))
(*.f64 (+.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 -1 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))
(*.f64 (+.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 -1 binary64))))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 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 -1 binary64)))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (sqrt -1)))) (* 1/4 (* (sqrt im) (* (pow re 2) (sqrt -1))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))
(*.f64 (-.f64 (+.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 -1 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 im) (*.f64 re re)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 im im)) (/.f64 #s(literal 3/8 binary64) 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/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 re (sqrt.f64 #s(literal 2 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+.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 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal 2 binary64))))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(+.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 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 re (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal 2 binary64)))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal 2 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 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/1024 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/64 binary64) (/.f64 (*.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 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 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 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 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 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 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 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 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 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 (*.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 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 im (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(*.f64 im (+.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 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(*.f64 im (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))) (*.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 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))) (*.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 (*.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 (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.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 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 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)))))))
(* 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 (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 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 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 #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 #s(literal -1/2 binary64) (*.f64 (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 -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 #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 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 #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/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re re)))))) (-.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 #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 (sqrt.f64 im) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re re))) #s(literal 3/16 binary64)) (*.f64 im (*.f64 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 #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 #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 #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 #s(literal 1 binary64) (-.f64 (+.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 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 (*.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 #s(literal 1/2 binary64) (*.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 (*.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 (*.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 #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)))))))
(* -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 #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))
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 #s(literal 1 binary64) (+.f64 (+.f64 (/.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)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))))
(* -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 #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)))))))
(* -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 #s(literal 1 binary64) (+.f64 (+.f64 (/.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)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* 1/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 #s(literal -1/2 binary64) (*.f64 (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 #s(literal -1/2 binary64) (*.f64 (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 #s(literal -1/2 binary64) (*.f64 (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 #s(literal -1/2 binary64) (*.f64 (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 -1 binary64)) (sqrt.f64 #s(literal 2 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 -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal -1 binary64)))))
(+ (* 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 -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 im (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (*.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 -1 binary64)) (sqrt.f64 #s(literal 2 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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #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 (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (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/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.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 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (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)))))))
(* 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 (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/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 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (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 (-.f64 #s(literal 0 binary64) 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 #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/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 #s(literal 0 binary64) 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 -2 binary64))) (sqrt.f64 #s(literal -1 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 #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))))))))
(* -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 #s(literal 0 binary64) im) (+.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 (+.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 #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/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))))))))
(* 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 re (sqrt.f64 #s(literal 2 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* -1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+.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 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal 2 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 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 re (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re (sqrt.f64 #s(literal 2 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 -1 binary64)) (sqrt.f64 #s(literal 2 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 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 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 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.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 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/32 binary64) (*.f64 (/.f64 (*.f64 (*.f64 im (*.f64 im 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 7 binary64))))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #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 -1 binary64)) (sqrt.f64 #s(literal 2 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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (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) (*.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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (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) (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im (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 re #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 im im))))) (-.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 im im)))) (*.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (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) (*.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))
(* (sqrt re) (* (sqrt -1) (sqrt 2)))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 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 -1 binary64)) (sqrt.f64 #s(literal 2 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 -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 im (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (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 -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 im (+.f64 (*.f64 #s(literal 1/2 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/8 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #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 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))) (*.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/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 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)))))))
(* 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 #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/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 (/.f64 #s(literal 1 binary64) im)) (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 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 #s(literal 0 binary64) im) (+.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) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64)))))))
(* -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 #s(literal 0 binary64) 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 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -2 binary64))) (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 -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))))))
(* -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 #s(literal 0 binary64) im) (+.f64 (+.f64 (*.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 -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 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64))))))))
(* (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 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* -1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (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 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal 2 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 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 re (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (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 re (sqrt.f64 #s(literal 2 binary64))))))))))
(* (sqrt re) (* (sqrt -1) (sqrt 2)))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 #s(literal -1 binary64))))))
(* 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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.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 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (/.f64 (*.f64 (*.f64 im (*.f64 im 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 7 binary64)))))))))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) 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) (*.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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) 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) (*.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 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 im im))))) (-.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 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 im im)))) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))))))) (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) 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) (*.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 re #s(literal -2 binary64)) (*.f64 im #s(literal 2 binary64)))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 im #s(literal 2 binary64)))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 im #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 re #s(literal -2 binary64)) (*.f64 im #s(literal 2 binary64)))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 im #s(literal 2 binary64)))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 im #s(literal 2 binary64)))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* re (- (* 2 (/ im re)) 2))
(*.f64 re (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 im re)) #s(literal -2 binary64)))
(* re (- (* 2 (/ im re)) 2))
(*.f64 re (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 im re)) #s(literal -2 binary64)))
(* re (- (* 2 (/ im re)) 2))
(*.f64 re (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 im 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 #s(literal -2 binary64) im) re)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 2 (* -2 (/ im re)))))
(*.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) im) re)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 2 (* -2 (/ im re)))))
(*.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) im) 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 #s(literal 0 binary64) (*.f64 im (+.f64 (/.f64 re im) #s(literal -1 binary64))))
(* -1 (* im (- (/ re im) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (/.f64 re im) #s(literal -1 binary64))))
(* -1 (* im (- (/ re im) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (/.f64 re im) #s(literal -1 binary64))))
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 #s(literal 0 binary64) (*.f64 re (-.f64 #s(literal 1 binary64) (/.f64 im re))))
(* -1 (* re (+ 1 (* -1 (/ im re)))))
(-.f64 #s(literal 0 binary64) (*.f64 re (-.f64 #s(literal 1 binary64) (/.f64 im re))))
(* -1 (* re (+ 1 (* -1 (/ im re)))))
(-.f64 #s(literal 0 binary64) (*.f64 re (-.f64 #s(literal 1 binary64) (/.f64 im re))))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 im #s(literal 2 binary64)))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 im #s(literal 2 binary64)))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 im #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 re #s(literal -2 binary64)) (*.f64 im #s(literal 2 binary64)))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 im #s(literal 2 binary64)))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 im #s(literal 2 binary64)))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* re (- (* 2 (/ im re)) 2))
(*.f64 re (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 im re)) #s(literal -2 binary64)))
(* re (- (* 2 (/ im re)) 2))
(*.f64 re (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 im re)) #s(literal -2 binary64)))
(* re (- (* 2 (/ im re)) 2))
(*.f64 re (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 im 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 #s(literal -2 binary64) im) re)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 2 (* -2 (/ im re)))))
(*.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) im) re)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 2 (* -2 (/ im re)))))
(*.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) im) re)) (-.f64 #s(literal 0 binary64) re))
(* 1/2 (* (sqrt re) (sqrt -2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -2 binary64)))
(+ (* 1/2 (* (sqrt re) (sqrt -2))) (* 1/2 (* (/ im (sqrt -2)) (sqrt (/ 1 re)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (/.f64 im (sqrt.f64 #s(literal -2 binary64))))))
(+ (* 1/2 (* (sqrt re) (sqrt -2))) (* im (+ (* -1/4 (* (/ im (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (/ 1 (sqrt -2)))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 im (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 im (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -2 binary64)))))))
(+ (* 1/2 (* (sqrt re) (sqrt -2))) (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (/ 1 (sqrt -2)))) (* im (+ (* -1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (pow (sqrt -2) 3)))) (* 1/4 (* (/ im (pow (sqrt -2) 5)) (sqrt (/ 1 (pow re 5))))))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 im (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 im (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 im (pow.f64 (sqrt.f64 #s(literal -2 binary64)) #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/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 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))) (*.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) (pow (sqrt 2) 3)))) (* 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 (/.f64 #s(literal 1 binary64) im)) (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))))))))
(* 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 7))) (/ (pow re 3) (pow (sqrt 2) 5)))) (* 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/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))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (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 7 binary64)))) (*.f64 re (*.f64 re re))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))))
(* -1/2 (* (sqrt im) (* (pow (sqrt -1) 2) (sqrt 2))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (sqrt.f64 im) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.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 #s(literal 0 binary64) re)) (sqrt.f64 #s(literal 2 binary64))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (pow (sqrt -1) 2)) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2))))))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.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 #s(literal 0 binary64) re)) (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 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) (sqrt.f64 #s(literal 2 binary64)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (pow (sqrt -1) 2)) (pow (sqrt 2) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 7))) (/ (* (pow re 3) (pow (sqrt -1) 2)) (pow (sqrt 2) 5)))) (+ (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))))))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.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 7 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re)))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.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 #s(literal 0 binary64) re)) (sqrt.f64 #s(literal 2 binary64)))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -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 (pow im 3))) (/ re (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 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (*.f64 #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 (pow im 3))) (/ 1 (pow (sqrt 2) 3)))) (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ re (pow (sqrt 2) 5)))))))))
(+.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) (*.f64 im (*.f64 im im)))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (/.f64 re (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))))))
(* 1/2 (* (sqrt re) (sqrt -2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -2 binary64)))
(* re (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -2))) (* 1/2 (* (/ im (sqrt -2)) (sqrt (/ 1 (pow re 3)))))))
(*.f64 re (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 im (sqrt.f64 #s(literal -2 binary64)))))))
(* re (+ (* -1/4 (* (/ (pow im 2) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -2))) (* 1/2 (* (/ im (sqrt -2)) (sqrt (/ 1 (pow re 3))))))))
(*.f64 re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 im (sqrt.f64 #s(literal -2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 im im) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64)))))))
(* re (+ (* -1/4 (* (/ (pow im 2) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (/ (pow im 3) (pow (sqrt -2) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -2))) (* 1/2 (* (/ im (sqrt -2)) (sqrt (/ 1 (pow re 3)))))))))
(*.f64 re (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 im im) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 im (sqrt.f64 #s(literal -2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) (/.f64 (*.f64 im (*.f64 im im)) (pow.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 5 binary64))))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(* -1 (* re (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))) (* 1/2 (* (/ (* im (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 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/4 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))) (* 1/2 (* (/ (* im (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3)))))))))
(*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 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/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (/ (* (pow im 3) (sqrt -1)) (pow (sqrt 2) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))) (* 1/2 (* (/ (* im (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))))))))
(*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 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/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))) (-.f64 #s(literal 0 binary64) re))
(* (sqrt re) (sqrt -2))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -2 binary64)))
(+ (* (sqrt re) (sqrt -2)) (* (/ im (sqrt -2)) (sqrt (/ 1 re))))
(+.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (/.f64 im (sqrt.f64 #s(literal -2 binary64)))))
(+ (* im (+ (* -1/2 (* (/ im (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (/ 1 (sqrt -2))))) (* (sqrt re) (sqrt -2)))
(+.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -2 binary64))) (*.f64 im (+.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 im (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64)))))))))
(+ (* im (+ (* im (+ (* -1/2 (* (sqrt (/ 1 (pow re 3))) (/ 1 (pow (sqrt -2) 3)))) (* 1/2 (* (/ im (pow (sqrt -2) 5)) (sqrt (/ 1 (pow re 5))))))) (* (sqrt (/ 1 re)) (/ 1 (sqrt -2))))) (* (sqrt re) (sqrt -2)))
(+.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -2 binary64))) (*.f64 im (+.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 im (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 im (pow.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 5 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 (/.f64 #s(literal 1 binary64) im)) (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)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (-.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (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))))))
(* 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 7))) (/ (pow re 3) (pow (sqrt 2) 5)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (-.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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (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 7 binary64)))) (*.f64 re (*.f64 re re))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 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) (* (pow (sqrt -1) 2) (sqrt 2))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (sqrt.f64 im) #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(* -1 (* im (+ (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2))) (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2))))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.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 #s(literal 0 binary64) re)) (sqrt.f64 #s(literal 2 binary64)))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (pow (sqrt -1) 2)) (pow (sqrt 2) 3)))) (+ (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2))) (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.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 #s(literal 0 binary64) re)) (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 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) (sqrt.f64 #s(literal 2 binary64)))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (pow (sqrt -1) 2)) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 7))) (/ (* (pow re 3) (pow (sqrt -1) 2)) (pow (sqrt 2) 5)))) (+ (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2))) (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2))))))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.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 #s(literal 0 binary64) 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 7 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re)))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 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 (pow im 3))) (/ re (pow (sqrt 2) 3)))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (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) (*.f64 im (*.f64 im im)))) (/.f64 re (*.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))))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ 1 (pow (sqrt 2) 3)))) (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ re (pow (sqrt 2) 5)))))))) (* (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) (*.f64 im (*.f64 im im)))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (/.f64 re (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(* (sqrt re) (sqrt -2))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -2 binary64)))
(* re (+ (* (sqrt (/ 1 re)) (sqrt -2)) (* (/ im (sqrt -2)) (sqrt (/ 1 (pow re 3))))))
(*.f64 re (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 im (sqrt.f64 #s(literal -2 binary64))))))
(* re (+ (* -1/2 (* (/ (pow im 2) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* (sqrt (/ 1 re)) (sqrt -2)) (* (/ im (sqrt -2)) (sqrt (/ 1 (pow re 3)))))))
(*.f64 re (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 im (sqrt.f64 #s(literal -2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 im im) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64)))))))
(* re (+ (* -1/2 (* (/ (pow im 2) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (/ (pow im 3) (pow (sqrt -2) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* (sqrt (/ 1 re)) (sqrt -2)) (* (/ im (sqrt -2)) (sqrt (/ 1 (pow re 3))))))))
(*.f64 re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 im im) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64))))) (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 im (sqrt.f64 #s(literal -2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) (/.f64 (*.f64 im (*.f64 im im)) (pow.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 5 binary64))))))))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(* -1 (* re (+ (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))) (* (/ (* im (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3)))))))
(*.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 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/2 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))) (* (/ (* im (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))))))
(*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 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/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1/2 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (/ (* (pow im 3) (sqrt -1)) (pow (sqrt 2) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))) (* (/ (* im (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3)))))))))
(*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 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/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))) (-.f64 #s(literal 0 binary64) re))
2
#s(literal 2 binary64)
(+ 2 (* -2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im))
(+ 2 (* -2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im))
(+ 2 (* -2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im))
(* -2 (/ re im))
(/.f64 (*.f64 re #s(literal -2 binary64)) im)
(* re (- (* 2 (/ 1 re)) (* 2 (/ 1 im))))
(*.f64 re (+.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 #s(literal -2 binary64) im)))
(* re (- (* 2 (/ 1 re)) (* 2 (/ 1 im))))
(*.f64 re (+.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 #s(literal -2 binary64) im)))
(* re (- (* 2 (/ 1 re)) (* 2 (/ 1 im))))
(*.f64 re (+.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 #s(literal -2 binary64) im)))
(* -2 (/ re im))
(/.f64 (*.f64 re #s(literal -2 binary64)) im)
(* -1 (* re (- (* 2 (/ 1 im)) (* 2 (/ 1 re)))))
(-.f64 #s(literal 0 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 2 binary64) im) (/.f64 #s(literal -2 binary64) re))))
(* -1 (* re (- (* 2 (/ 1 im)) (* 2 (/ 1 re)))))
(-.f64 #s(literal 0 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 2 binary64) im) (/.f64 #s(literal -2 binary64) re))))
(* -1 (* re (- (* 2 (/ 1 im)) (* 2 (/ 1 re)))))
(-.f64 #s(literal 0 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 2 binary64) im) (/.f64 #s(literal -2 binary64) re))))
(* -2 (/ re im))
(/.f64 (*.f64 re #s(literal -2 binary64)) im)
(/ (+ (* -2 re) (* 2 im)) im)
(/.f64 (+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 im #s(literal 2 binary64))) im)
(/ (+ (* -2 re) (* 2 im)) im)
(/.f64 (+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 im #s(literal 2 binary64))) im)
(/ (+ (* -2 re) (* 2 im)) im)
(/.f64 (+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 im #s(literal 2 binary64))) im)
2
#s(literal 2 binary64)
(+ 2 (* -2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im))
(+ 2 (* -2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im))
(+ 2 (* -2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im))
2
#s(literal 2 binary64)
(+ 2 (* -2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im))
(+ 2 (* -2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im))
(+ 2 (* -2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(+ (* -4 re) (* -1 (/ (pow im 2) re)))
(-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))
(+ (* -4 re) (* -1 (/ (pow im 2) re)))
(-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))
(+ (* -4 re) (* -1 (/ (pow im 2) re)))
(-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 re #s(literal -4 binary64)) (*.f64 im im)) (/.f64 #s(literal -1 binary64) re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 re #s(literal -4 binary64)) (*.f64 im im)) (/.f64 #s(literal -1 binary64) re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 re #s(literal -4 binary64)) (*.f64 im im)) (/.f64 #s(literal -1 binary64) re)))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 re #s(literal -4 binary64)) (*.f64 im im)) (/.f64 #s(literal -1 binary64) re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 re #s(literal -4 binary64)) (*.f64 im im)) (/.f64 #s(literal -1 binary64) re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 re #s(literal -4 binary64)) (*.f64 im im)) (/.f64 #s(literal -1 binary64) re)))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)
(/.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal -4 binary64)) (*.f64 im im)) re)
(/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)
(/.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal -4 binary64)) (*.f64 im im)) re)
(/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)
(/.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal -4 binary64)) (*.f64 im im)) re)
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))
(*.f64 re (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (*.f64 re re)) #s(literal -4 binary64)))
(* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))
(*.f64 re (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (*.f64 re re)) #s(literal -4 binary64)))
(* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))
(*.f64 re (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (*.f64 re re)) #s(literal -4 binary64)))
(* -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 (/ (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 (/ (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))
(* (sqrt re) (sqrt -1))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64)))
(+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt -1)))
(+.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))))))
(+ (* (sqrt re) (sqrt -1)) (* (pow im 2) (+ (* -1/128 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 7))))) (* 1/8 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))))))
(+.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -1/128 binary64) (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64))))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))))))
(+ (* (sqrt re) (sqrt -1)) (* (pow im 2) (+ (* 1/8 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))) (* (pow im 2) (+ (* -1/128 (* (sqrt (/ 1 (pow re 7))) (sqrt -1))) (* 1/1024 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 11))))))))))
(+.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -1/128 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))))) (*.f64 (*.f64 #s(literal 1/1024 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 11 binary64))))))))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))
(*.f64 im (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 im im))))
(* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))
(*.f64 im (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 im im))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (pow.f64 im #s(literal 4 binary64)))))
(* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (+ (* 2 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))))
(*.f64 im (-.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 11 binary64)))) (pow.f64 im #s(literal 6 binary64))))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 im im))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (pow.f64 im #s(literal 4 binary64)))))
(* -1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 im im))))
(* -1 (* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 im im))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (pow.f64 im #s(literal 4 binary64)))))
(* -1 (* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (+ (* 2 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 11 binary64)))) (pow.f64 im #s(literal 6 binary64))))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 im im))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (pow.f64 im #s(literal 4 binary64)))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (/ (sqrt -1) im) (sqrt (pow re 5)))) re)
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 5 binary64)))) im)) re)
(/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (pow re 3) (+ (* -1 (* (/ (sqrt -1) (pow im 3)) (sqrt (pow re 3)))) (* (/ (sqrt -1) im) (sqrt (/ 1 re)))))) re)
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (*.f64 re (*.f64 re re)) (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) im)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 im (*.f64 im im)))))) re)
(/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (pow re 3) (+ (* (/ (sqrt -1) im) (sqrt (/ 1 re))) (* (pow re 3) (+ (* -1 (* (/ (sqrt -1) (pow im 3)) (sqrt (/ 1 (pow re 3))))) (* 2 (* (/ (sqrt -1) (pow im 5)) (sqrt re)))))))) re)
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) im)) (*.f64 (*.f64 re (*.f64 re re)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 im #s(literal 5 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (*.f64 im (*.f64 im im)))))))) re)
(* (sqrt re) (sqrt -1))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64)))
(* re (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1))))
(*.f64 re (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (*.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))))))
(* re (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(*.f64 re (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (*.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 (*.f64 #s(literal -1/128 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(* re (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/1024 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 (pow re 13))))) (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(*.f64 re (+.f64 (*.f64 (*.f64 #s(literal -1/128 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))) (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (*.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 (*.f64 #s(literal 1/1024 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 13 binary64))))))))
(* -1 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 re) (neg.f64 (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(*.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* 1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)))) (*.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/128 binary64))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (pow re 3)))) (* -1/1024 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 re))))) (pow re 3))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)))) (/.f64 (+.f64 (*.f64 #s(literal -1/128 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))))) (*.f64 #s(literal -1/1024 binary64) (*.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 re (*.f64 re re)))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* 2 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))
(+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 2 (* (sqrt re) (sqrt -1))))
(+.f64 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))))))
(+ (* 2 (* (sqrt re) (sqrt -1))) (* (pow im 2) (+ (* -1/64 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 7))))) (* 1/4 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))))))
(+.f64 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 im im) (+.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))))) #s(literal -1/64 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))))))
(+ (* 2 (* (sqrt re) (sqrt -1))) (* (pow im 2) (+ (* 1/4 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))) (* (pow im 2) (+ (* -1/64 (* (sqrt (/ 1 (pow re 7))) (sqrt -1))) (* 1/512 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 11))))))))))
(+.f64 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (*.f64 im im) (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64))))) #s(literal -1/64 binary64)) (*.f64 (*.f64 #s(literal 1/512 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 11 binary64))))))))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* im (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1))))
(*.f64 im (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 im im)))))
(* im (+ (* -2 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(*.f64 im (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 im im)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (pow.f64 im #s(literal 4 binary64))))))
(* im (+ (* -2 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (+ (* 4 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(*.f64 im (+.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (pow.f64 im #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 im im)))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 11 binary64)))) (pow.f64 im #s(literal 6 binary64)))))))
(* -1 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* im (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 im im)))))
(* -1 (* im (+ (* -2 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 im im)))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (pow.f64 im #s(literal 4 binary64))))))
(* -1 (* im (+ (* -2 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (+ (* 4 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (sqrt (/ 1 re)) (sqrt -1)))))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (pow.f64 im #s(literal 4 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 im im)))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 11 binary64)))) (pow.f64 im #s(literal 6 binary64)))))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(/ (+ (* 2 (* (/ (sqrt -1) im) (sqrt (pow re 5)))) (* (* im (sqrt -1)) (sqrt re))) re)
(/.f64 (+.f64 (*.f64 im (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) im)) (sqrt.f64 (pow.f64 re #s(literal 5 binary64))))) re)
(/ (+ (* (* im (sqrt -1)) (sqrt re)) (* (pow re 3) (+ (* -2 (* (/ (sqrt -1) (pow im 3)) (sqrt (pow re 3)))) (* 2 (* (/ (sqrt -1) im) (sqrt (/ 1 re))))))) re)
(/.f64 (+.f64 (*.f64 im (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))) re)
(/ (+ (* (* im (sqrt -1)) (sqrt re)) (* (pow re 3) (+ (* 2 (* (/ (sqrt -1) im) (sqrt (/ 1 re)))) (* (pow re 3) (+ (* -2 (* (/ (sqrt -1) (pow im 3)) (sqrt (/ 1 (pow re 3))))) (* 4 (* (/ (sqrt -1) (pow im 5)) (sqrt re)))))))) re)
(/.f64 (+.f64 (*.f64 im (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (*.f64 im (*.f64 im im)))) (*.f64 #s(literal 4 binary64) (/.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 im #s(literal 5 binary64))))))))) re)
(* 2 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))
(* re (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1)))))
(*.f64 re (+.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 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))))
(* re (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(*.f64 re (+.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 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))) (*.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) (pow.f64 re #s(literal 9 binary64)))))))
(* re (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/512 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 (pow re 13))))) (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1)))))))
(*.f64 re (+.f64 (*.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) (pow.f64 re #s(literal 9 binary64))))) (+.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 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 1/512 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 13 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))) (*.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 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* 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 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))) (/.f64 (+.f64 (*.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 #s(literal 1/4 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 (/ (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (pow re 3)))) (* -1/512 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 re))))) (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 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)))) (/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re))))) #s(literal -1/64 binary64)) (*.f64 #s(literal -1/512 binary64) (*.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 re (*.f64 re re)))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
4
#s(literal 4 binary64)
(+ 4 (/ (pow im 2) (pow re 2)))
(+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))
(+ 4 (/ (pow im 2) (pow re 2)))
(+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))
(+ 4 (/ (pow im 2) (pow re 2)))
(+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))
(* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2))))
(*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 4 binary64) (*.f64 im im)) (/.f64 #s(literal 1 binary64) (*.f64 re re))))
(* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2))))
(*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 4 binary64) (*.f64 im im)) (/.f64 #s(literal 1 binary64) (*.f64 re re))))
(* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2))))
(*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 4 binary64) (*.f64 im im)) (/.f64 #s(literal 1 binary64) (*.f64 re re))))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))
(* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2))))
(*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 4 binary64) (*.f64 im im)) (/.f64 #s(literal 1 binary64) (*.f64 re re))))
(* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2))))
(*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 4 binary64) (*.f64 im im)) (/.f64 #s(literal 1 binary64) (*.f64 re re))))
(* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2))))
(*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 4 binary64) (*.f64 im im)) (/.f64 #s(literal 1 binary64) (*.f64 re re))))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))
(/ (+ (* 4 (pow re 2)) (pow im 2)) (pow re 2))
(/.f64 (+.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 re re))) (*.f64 re re))
(/ (+ (* 4 (pow re 2)) (pow im 2)) (pow re 2))
(/.f64 (+.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 re re))) (*.f64 re re))
(/ (+ (* 4 (pow re 2)) (pow im 2)) (pow re 2))
(/.f64 (+.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 re re))) (*.f64 re re))
4
#s(literal 4 binary64)
(+ 4 (/ (pow im 2) (pow re 2)))
(+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))
(+ 4 (/ (pow im 2) (pow re 2)))
(+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))
(+ 4 (/ (pow im 2) (pow re 2)))
(+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))
4
#s(literal 4 binary64)
(+ 4 (/ (pow im 2) (pow re 2)))
(+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))
(+ 4 (/ (pow im 2) (pow re 2)))
(+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))
(+ 4 (/ (pow im 2) (pow re 2)))
(+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))
(/ (pow im 2) (pow re 2))
(/.f64 (*.f64 im im) (*.f64 re re))

eval112.0ms (1.1%)

Compiler

Compiled 24788 to 3403 computations (86.3% saved)

prune113.0ms (1.1%)

Pruning

18 alts after pruning (14 fresh and 4 done)

PrunedKeptTotal
New9089917
Fresh257
Picked235
Done011
Total91218930
Accuracy
99.9%
Counts
930 → 18
Alt Table
Click to see full alt table
StatusAccuracyProgram
21.5%
(*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
28.1%
(*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
20.4%
(*.f64 (*.f64 im (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.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 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
▶56.6%
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 im re)))
28.1%
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) #s(literal 1/2 binary64)))
▶55.0%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
▶28.2%
(*.f64 #s(literal 1/2 binary64) (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))))
15.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 im im) re)))
▶19.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))
55.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))))))
5.6%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -2 binary64))))
▶21.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64))))
✓56.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))))
✓55.4%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
✓78.5%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
✓56.9%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re))))
13.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (*.f64 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 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) im) im)))))))))
51.6%
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 1/2 binary64))))
Compiler

Compiled 478 to 367 computations (23.2% saved)

simplify189.0ms (1.9%)

Algorithm
1×egg-herbie
Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
✓cost-diff0
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))
✓cost-diff0
(*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))))
✓cost-diff0
(*.f64 im #s(literal 2 binary64))
✓cost-diff0
(pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
✓cost-diff6528
(pow.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
✓cost-diff0
(*.f64 re #s(literal -4 binary64))
✓cost-diff0
(-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))
✓cost-diff0
(sqrt.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) 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
(sqrt.f64 (-.f64 im re))
✓cost-diff0
(sqrt.f64 #s(literal 2 binary64))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
✓cost-diff0
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 im re)))
Rules
2320×*-lowering-*.f32
2320×*-lowering-*.f64
2058×fma-define
2050×fma-lowering-fma.f32
2050×fma-lowering-fma.f64
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
031161
163157
2132155
3299155
4449155
5673155
61794155
72398155
83888155
96981155
08319155
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(* (* 1/2 (sqrt 2)) (sqrt (- im re)))
(* 1/2 (sqrt 2))
1/2
(sqrt 2)
2
(sqrt (- im re))
(- im re)
im
re
(* 1/2 (sqrt (* re -4)))
1/2
(sqrt (* re -4))
(* re -4)
re
-4
(* 1/2 (sqrt (- (* re -4) (/ (* im im) re))))
1/2
(sqrt (- (* re -4) (/ (* im im) re)))
(- (* re -4) (/ (* im im) re))
(* re -4)
re
-4
(/ (* im im) re)
(* im im)
im
(* 1/2 (pow (pow (* im 2) 1/4) 2))
1/2
(pow (pow (* im 2) 1/4) 2)
(pow (* im 2) 1/4)
(* im 2)
im
2
1/4
(* 1/2 (* im (* (* (sqrt 1/2) (sqrt (/ 1 re))) (sqrt 2))))
1/2
(* im (* (* (sqrt 1/2) (sqrt (/ 1 re))) (sqrt 2)))
im
(* (* (sqrt 1/2) (sqrt (/ 1 re))) (sqrt 2))
(* (sqrt 1/2) (sqrt (/ 1 re)))
(sqrt 1/2)
(sqrt (/ 1 re))
(/ 1 re)
1
re
(sqrt 2)
2
Outputs
(* (* 1/2 (sqrt 2)) (sqrt (- im re)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 im re)))
(* 1/2 (sqrt 2))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
1/2
#s(literal 1/2 binary64)
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(sqrt (- im re))
(sqrt.f64 (-.f64 im re))
(- im re)
(-.f64 im re)
im
re
(* 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 (sqrt (- (* re -4) (/ (* im im) re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))
1/2
#s(literal 1/2 binary64)
(sqrt (- (* re -4) (/ (* im im) re)))
(sqrt.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)))
(- (* re -4) (/ (* im im) re))
(-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))
(* re -4)
(*.f64 re #s(literal -4 binary64))
re
-4
#s(literal -4 binary64)
(/ (* im im) re)
(/.f64 (*.f64 im im) re)
(* im im)
(*.f64 im im)
im
(* 1/2 (pow (pow (* im 2) 1/4) 2))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) im)))
1/2
#s(literal 1/2 binary64)
(pow (pow (* im 2) 1/4) 2)
(sqrt.f64 (*.f64 #s(literal 2 binary64) im))
(pow (* im 2) 1/4)
(pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64))
(* im 2)
(*.f64 #s(literal 2 binary64) im)
im
2
#s(literal 2 binary64)
1/4
#s(literal 1/4 binary64)
(* 1/2 (* im (* (* (sqrt 1/2) (sqrt (/ 1 re))) (sqrt 2))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))))
1/2
#s(literal 1/2 binary64)
(* im (* (* (sqrt 1/2) (sqrt (/ 1 re))) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))))
im
(* (* (sqrt 1/2) (sqrt (/ 1 re))) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* (sqrt 1/2) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(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
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)

localize168.0ms (1.7%)

Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
✓accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (*.f64 im (*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))))
✓accuracy100.0%
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
✓accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
✓accuracy100.0%
(sqrt.f64 #s(literal 1/2 binary64))
✓accuracy100.0%
(pow.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
✓accuracy100.0%
(pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64))
✓accuracy100.0%
(*.f64 im #s(literal 2 binary64))
✓accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
✓accuracy100.0%
(*.f64 re #s(literal -4 binary64))
✓accuracy100.0%
(*.f64 im im)
✓accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))
✓accuracy100.0%
(sqrt.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) 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%
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 im re)))
✓accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
✓accuracy100.0%
(sqrt.f64 (-.f64 im re))
✓accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
Results
120.0ms256×0invalid
Compiler

Compiled 178 to 32 computations (82% saved)

Precisions
Click to see histograms. Total time spent on operations: 49.0ms
ival-mult: 19.0ms (38.8% of total)
ival-sqrt: 11.0ms (22.5% of total)
ival-pow: 10.0ms (20.4% of total)
ival-div: 4.0ms (8.2% of total)
ival-sub: 3.0ms (6.1% of total)
const: 1.0ms (2% of total)
backward-pass: 0.0ms (0% of total)

series89.0ms (0.9%)

Counts
21 → 300
Calls
Call 1
Inputs
#<alt (* (* 1/2 (sqrt 2)) (sqrt (- im re)))>
#<alt (* 1/2 (sqrt 2))>
#<alt (sqrt 2)>
#<alt (sqrt (- im re))>
#<alt (* 1/2 (sqrt (* re -4)))>
#<alt (sqrt (* re -4))>
#<alt (* re -4)>
#<alt (* 1/2 (sqrt (- (* re -4) (/ (* im im) re))))>
#<alt (sqrt (- (* re -4) (/ (* im im) re)))>
#<alt (- (* re -4) (/ (* im im) re))>
#<alt (pow (pow (* im 2) 1/4) 2)>
#<alt (* 1/2 (pow (pow (* im 2) 1/4) 2))>
#<alt (pow (* im 2) 1/4)>
#<alt (* im 2)>
#<alt (* 1/2 (* im (* (* (sqrt 1/2) (sqrt (/ 1 re))) (sqrt 2))))>
#<alt (* im (* (* (sqrt 1/2) (sqrt (/ 1 re))) (sqrt 2)))>
#<alt (* (* (sqrt 1/2) (sqrt (/ 1 re))) (sqrt 2))>
#<alt (* (sqrt 1/2) (sqrt (/ 1 re)))>
#<alt (* im im)>
#<alt (sqrt 1/2)>
#<alt (sqrt (/ 1 re))>
Outputs
#<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) (* (pow (sqrt -1) 2) (sqrt 2))))>
#<alt (* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (pow (sqrt -1) 2) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2)))))))>
#<alt (* -1 (* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (pow (sqrt -1) 2) (sqrt 2))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (pow (sqrt -1) 2) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2))))))))>
#<alt (* -1 (* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (pow (sqrt -1) 2) (sqrt 2))))) (+ (* 1/32 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (* (pow (sqrt -1) 2) (sqrt 2))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (pow (sqrt -1) 2) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2)))))))))>
#<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))>
#<alt (+ (* 1/2 (* (/ im (sqrt -1)) (sqrt (/ 1 re)))) (* (sqrt re) (sqrt -1)))>
#<alt (+ (* im (+ (* -1/8 (* (/ im (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (/ 1 (sqrt -1)))))) (* (sqrt re) (sqrt -1)))>
#<alt (+ (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (/ 1 (sqrt -1)))) (* im (+ (* -1/8 (* (sqrt (/ 1 (pow re 3))) (/ 1 (pow (sqrt -1) 3)))) (* 1/16 (* (/ im (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 5))))))))) (* (sqrt re) (sqrt -1)))>
#<alt (sqrt im)>
#<alt (* im (+ (sqrt (/ 1 im)) (* -1/2 (* (sqrt (/ 1 (pow im 3))) re))))>
#<alt (* im (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)) (* -1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))))))>
#<alt (* im (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* -1/16 (* (sqrt (/ 1 (pow im 7))) (pow re 3)))))))>
#<alt (* -1 (* (sqrt im) (pow (sqrt -1) 2)))>
#<alt (* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (pow (sqrt -1) 2)))) (* (sqrt (/ 1 im)) (pow (sqrt -1) 2)))))>
#<alt (* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (pow (sqrt -1) 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (pow (sqrt -1) 2)))) (* (sqrt (/ 1 im)) (pow (sqrt -1) 2))))))>
#<alt (* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (pow (sqrt -1) 2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (pow (sqrt -1) 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (pow (sqrt -1) 2)))) (* (sqrt (/ 1 im)) (pow (sqrt -1) 2)))))))>
#<alt (sqrt im)>
#<alt (+ (sqrt im) (* -1/2 (* (sqrt (/ 1 im)) re)))>
#<alt (+ (sqrt im) (* re (+ (* -1/2 (sqrt (/ 1 im))) (* -1/8 (* (sqrt (/ 1 (pow im 3))) re)))))>
#<alt (+ (sqrt im) (* re (+ (* -1/2 (sqrt (/ 1 im))) (* re (+ (* -1/8 (sqrt (/ 1 (pow im 3)))) (* -1/16 (* (sqrt (/ 1 (pow im 5))) re)))))))>
#<alt (* (sqrt re) (sqrt -1))>
#<alt (* re (+ (* 1/2 (* (/ im (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (sqrt -1))))>
#<alt (* re (+ (* -1/8 (* (/ (pow im 2) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (/ im (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* re (+ (* -1/8 (* (/ (pow im 2) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (/ (pow im 3) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (/ im (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* (sqrt re) (sqrt -1)))>
#<alt (* -1 (* re (+ (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (* (pow im 3) (sqrt -1)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (sqrt -1)))))))>
#<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)) (sqrt (/ 1 re))))>
#<alt (/ (+ (* -1 (* (/ 1 (* im (sqrt -1))) (sqrt (pow re 5)))) (* 1/2 (* (* im (sqrt -1)) (sqrt re)))) re)>
#<alt (/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (pow re 3) (+ (* -1 (* (/ 1 (* im (sqrt -1))) (sqrt (/ 1 re)))) (* -1 (* (/ 1 (* (pow im 3) (pow (sqrt -1) 3))) (sqrt (pow re 3))))))) re)>
#<alt (/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (pow re 3) (+ (* -1 (* (/ 1 (* im (sqrt -1))) (sqrt (/ 1 re)))) (* (pow re 3) (+ (* -2 (* (/ 1 (* (pow im 5) (pow (sqrt -1) 5))) (sqrt re))) (* -1 (* (/ 1 (* (pow im 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (pow re 3)))))))))) re)>
#<alt (* (sqrt re) (sqrt -1))>
#<alt (* re (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1))))>
#<alt (* re (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* re (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/1024 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 (pow re 13))))) (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* (sqrt re) (sqrt -1)))>
#<alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* 1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (pow re 3)))) (* -1/1024 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 re))))) (pow re 3))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* 1/2 (* (sqrt re) (sqrt -4)))>
#<alt (+ (* -1/4 (* (/ (pow im 2) (sqrt -4)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt re) (sqrt -4))))>
#<alt (+ (* 1/2 (* (sqrt re) (sqrt -4))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt -4)))) (* -1/16 (* (/ (pow im 2) (pow (sqrt -4) 3)) (sqrt (/ 1 (pow re 7))))))))>
#<alt (+ (* 1/2 (* (sqrt re) (sqrt -4))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt -4)))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 7))) (/ 1 (pow (sqrt -4) 3)))) (* -1/32 (* (/ (pow im 2) (pow (sqrt -4) 5)) (sqrt (/ 1 (pow re 11))))))))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* im (+ (* -1 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* im (+ (* -1 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -1 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* im (+ (* -2 (* (/ 1 (* (pow im 6) (pow (sqrt -1) 5))) (sqrt (pow re 11)))) (+ (* -1 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -1 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1)))))))>
#<alt (* -1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* -1 (* im (+ (* -1 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* im (+ (* -1 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -1 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1)))))))>
#<alt (* -1 (* im (+ (* -2 (* (/ 1 (* (pow im 6) (pow (sqrt -1) 5))) (sqrt (pow re 11)))) (+ (* -1 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -1 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))))))))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (/ (+ (* -2 (* (/ 1 (* im (sqrt -1))) (sqrt (pow re 5)))) (* (* im (sqrt -1)) (sqrt re))) re)>
#<alt (/ (+ (* (* im (sqrt -1)) (sqrt re)) (* (pow re 3) (+ (* -2 (* (/ 1 (* im (sqrt -1))) (sqrt (/ 1 re)))) (* -2 (* (/ 1 (* (pow im 3) (pow (sqrt -1) 3))) (sqrt (pow re 3))))))) re)>
#<alt (/ (+ (* (* im (sqrt -1)) (sqrt re)) (* (pow re 3) (+ (* -2 (* (/ 1 (* im (sqrt -1))) (sqrt (/ 1 re)))) (* (pow re 3) (+ (* -4 (* (/ 1 (* (pow im 5) (pow (sqrt -1) 5))) (sqrt re))) (* -2 (* (/ 1 (* (pow im 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (pow re 3)))))))))) re)>
#<alt (* 2 (* (sqrt re) (sqrt -1)))>
#<alt (* re (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* re (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* re (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/512 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 (pow re 13))))) (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1)))))))>
#<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/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 (* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (pow re 3)))) (* -1/512 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 re))))) (pow re 3))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (+ (* -1/2 (* (/ (pow im 2) (sqrt -4)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt -4)))>
#<alt (+ (* (sqrt re) (sqrt -4)) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt -4)))) (* -1/8 (* (/ (pow im 2) (pow (sqrt -4) 3)) (sqrt (/ 1 (pow re 7))))))))>
#<alt (+ (* (sqrt re) (sqrt -4)) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt -4)))) (* (pow im 2) (+ (* -1/8 (* (sqrt (/ 1 (pow re 7))) (/ 1 (pow (sqrt -4) 3)))) (* -1/16 (* (/ (pow im 2) (pow (sqrt -4) 5)) (sqrt (/ 1 (pow re 11))))))))))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* im (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1))))>
#<alt (* im (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -2 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* im (+ (* -4 (* (/ 1 (* (pow im 6) (pow (sqrt -1) 5))) (sqrt (pow re 11)))) (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -2 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* -1 (* im (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* -1 (* im (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -2 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* im (+ (* -4 (* (/ 1 (* (pow im 6) (pow (sqrt -1) 5))) (sqrt (pow re 11)))) (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -2 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* (sqrt (/ 1 re)) (sqrt -1)))))))>
#<alt (* -1 (/ (pow im 2) re))>
#<alt (/ (- (* -4 (pow re 2)) (pow im 2)) re)>
#<alt (/ (- (* -4 (pow re 2)) (pow im 2)) re)>
#<alt (/ (- (* -4 (pow re 2)) (pow im 2)) re)>
#<alt (* -4 re)>
#<alt (* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))>
#<alt (* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))>
#<alt (* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))>
#<alt (* -4 re)>
#<alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))>
#<alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))>
#<alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))>
#<alt (* -4 re)>
#<alt (+ (* -4 re) (* -1 (/ (pow im 2) re)))>
#<alt (+ (* -4 re) (* -1 (/ (pow im 2) re)))>
#<alt (+ (* -4 re) (* -1 (/ (pow im 2) re)))>
#<alt (* -1 (/ (pow im 2) re))>
#<alt (* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))>
#<alt (* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))>
#<alt (* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))>
#<alt (* -1 (/ (pow im 2) re))>
#<alt (* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))>
#<alt (* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))>
#<alt (* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))>
#<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 (* 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 (exp (* 1/4 (+ (log 2) (log im))))>
#<alt (exp (* 1/4 (+ (log 2) (log im))))>
#<alt (exp (* 1/4 (+ (log 2) (log im))))>
#<alt (exp (* 1/4 (+ (log 2) (log im))))>
#<alt (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))>
#<alt (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))>
#<alt (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))>
#<alt (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))>
#<alt (exp (* 1/4 (+ (log -2) (* -1 (log (/ -1 im))))))>
#<alt (exp (* 1/4 (+ (log -2) (* -1 (log (/ -1 im))))))>
#<alt (exp (* 1/4 (+ (log -2) (* -1 (log (/ -1 im))))))>
#<alt (exp (* 1/4 (+ (log -2) (* -1 (log (/ -1 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 (* 2 im)>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<alt (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))>
#<alt (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))>
#<alt (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))>
#<alt (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))>
#<alt (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))>
#<alt (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))>
#<alt (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))>
#<alt (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))>
#<alt (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))>
#<alt (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))>
#<alt (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))>
#<alt (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))>
#<alt (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2))))>
#<alt (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2))))>
#<alt (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2))))>
#<alt (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2))))>
#<alt (* (sqrt (/ 1 re)) (sqrt 1/2))>
#<alt (* (sqrt (/ 1 re)) (sqrt 1/2))>
#<alt (* (sqrt (/ 1 re)) (sqrt 1/2))>
#<alt (* (sqrt (/ 1 re)) (sqrt 1/2))>
#<alt (* (sqrt (/ 1 re)) (sqrt 1/2))>
#<alt (* (sqrt (/ 1 re)) (sqrt 1/2))>
#<alt (* (sqrt (/ 1 re)) (sqrt 1/2))>
#<alt (* (sqrt (/ 1 re)) (sqrt 1/2))>
#<alt (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 1/2)))>
#<alt (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 1/2)))>
#<alt (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 1/2)))>
#<alt (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 1/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 (pow im 2)>
#<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))>
Calls

75 calls:

TimeVariablePointExpression
42.0ms
im
@0
(pow (* im 2) 1/4)
13.0ms
im
@-inf
(pow (* im 2) 1/4)
7.0ms
im
@inf
(pow (* im 2) 1/4)
3.0ms
re
@inf
(* 1/2 (sqrt (* re -4)))
2.0ms
im
@0
(* 1/2 (* im (* (* (sqrt 1/2) (sqrt (/ 1 re))) (sqrt 2))))

rewrite302.0ms (3%)

Algorithm
1×batch-egg-rewrite
Rules
4832×*-lowering-*.f32
4832×*-lowering-*.f64
2608×/-lowering-/.f32
2608×/-lowering-/.f64
1776×frac-times
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
031124
1131112
277696
0875796
Stop Event
1×iter limit
1×node limit
Counts
21 → 456
Calls
Call 1
Inputs
(* (* 1/2 (sqrt 2)) (sqrt (- im re)))
(* 1/2 (sqrt 2))
(sqrt 2)
(sqrt (- im re))
(* 1/2 (sqrt (* re -4)))
(sqrt (* re -4))
(* re -4)
(* 1/2 (sqrt (- (* re -4) (/ (* im im) re))))
(sqrt (- (* re -4) (/ (* im im) re)))
(- (* re -4) (/ (* im im) re))
(pow (pow (* im 2) 1/4) 2)
(* 1/2 (pow (pow (* im 2) 1/4) 2))
(pow (* im 2) 1/4)
(* im 2)
(* 1/2 (* im (* (* (sqrt 1/2) (sqrt (/ 1 re))) (sqrt 2))))
(* im (* (* (sqrt 1/2) (sqrt (/ 1 re))) (sqrt 2)))
(* (* (sqrt 1/2) (sqrt (/ 1 re))) (sqrt 2))
(* (sqrt 1/2) (sqrt (/ 1 re)))
(* im im)
(sqrt 1/2)
(sqrt (/ 1 re))
Outputs
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))))) (sqrt.f64 (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 (*.f64 im im) (*.f64 re re)))) (pow.f64 (+.f64 im re) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (pow.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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 im re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 im re)))
(*.f64 (sqrt.f64 (-.f64 im re)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 im re)))))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (-.f64 im re) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (-.f64 im re) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 (sqrt.f64 (-.f64 im re)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (-.f64 im re) #s(literal 1/4 binary64))) (pow.f64 (-.f64 im re) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (*.f64 (sqrt.f64 (-.f64 im re)) #s(literal 1/2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(exp.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 2 binary64)))))
(sqrt.f64 #s(literal 2 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #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/8 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (-.f64 im re)) #s(literal 1/2 binary64)))
(sqrt.f64 (-.f64 im re))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 im re))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))) (sqrt.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))))))
(/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (+.f64 im re) #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (*.f64 im im) (*.f64 re re)))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))) (sqrt.f64 (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))) (sqrt.f64 (+.f64 (*.f64 im im) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (-.f64 #s(literal 0 binary64) re) im)))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 im im) (*.f64 re re))) (pow.f64 (+.f64 im re) #s(literal 1/2 binary64)))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re))))))
(/.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (*.f64 re re))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 im re))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (*.f64 im im) (*.f64 re re)))) (neg.f64 (pow.f64 (+.f64 im re) #s(literal 1/2 binary64))))
(pow.f64 (-.f64 im re) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (-.f64 im re) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (-.f64 im re) (-.f64 im re)) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (-.f64 im re))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re))))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re))))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 im im) (*.f64 re re))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 im re)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (*.f64 im im) (*.f64 re re))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 im re))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 im im) (*.f64 re re))) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 im re) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (-.f64 im re) #s(literal 1/4 binary64)) (pow.f64 (-.f64 im re) #s(literal 1/4 binary64)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 re #s(literal -4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 re #s(literal -4 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal -4 binary64)) (*.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 re #s(literal -4 binary64)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (*.f64 re #s(literal -4 binary64)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal -4 binary64))) (sqrt.f64 re))
(*.f64 (*.f64 #s(literal 1/2 binary64) (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)))
(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))
(pow.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (*.f64 re #s(literal -4 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.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 #s(literal -4 binary64) (/.f64 #s(literal 1 binary64) re))
(/.f64 (*.f64 re #s(literal -4 binary64)) #s(literal 1 binary64))
(/.f64 (*.f64 #s(literal -4 binary64) (-.f64 #s(literal 0 binary64) re)) #s(literal -1 binary64))
(*.f64 re #s(literal -4 binary64))
(*.f64 #s(literal -4 binary64) re)
(*.f64 (*.f64 re #s(literal -4 binary64)) #s(literal 1 binary64))
(/.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64))) (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im))))))) (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im))))))) (sqrt.f64 (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))) #s(literal 1/4 binary64))) (pow.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))) #s(literal 1/2 binary64)))
(sqrt.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))) (sqrt.f64 (-.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64))) (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))) (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im))))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64))) (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im)))))) (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im)))))) (sqrt.f64 (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))
(/.f64 (sqrt.f64 (+.f64 (neg.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64)))) (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im)))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))))
(/.f64 (sqrt.f64 (+.f64 (neg.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64))) (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im)))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64))) (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im))))))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im))))))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))
(pow.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))) (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64))) (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im)))))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64))) (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64))) (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im)))))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))
(*.f64 (pow.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))) #s(literal 1/4 binary64)) (pow.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))) #s(literal 1/4 binary64)))
(+.f64 (*.f64 re #s(literal -4 binary64)) (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))))
(+.f64 (*.f64 re #s(literal -4 binary64)) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (/.f64 im (/.f64 re im)))))
(+.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (/.f64 im (/.f64 re im))))
(+.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))) (fma.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) #s(literal 1 binary64) (/.f64 im (/.f64 re im))))
(+.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))) (fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (/.f64 #s(literal 1 binary64) re) (/.f64 im (/.f64 re im))))
(+.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))) (fma.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 im re) (/.f64 im (/.f64 re im))))
(+.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))) (+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (/.f64 im (/.f64 re im))) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (/.f64 im (/.f64 re im)))))
(+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 re #s(literal -4 binary64)))
(+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (+.f64 (*.f64 re #s(literal -4 binary64)) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (/.f64 im (/.f64 re im)))))
(+.f64 (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))) (neg.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))))
(+.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))) (neg.f64 (/.f64 (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im)))) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))
(+.f64 (fma.f64 re #s(literal -4 binary64) (neg.f64 (*.f64 (/.f64 #s(literal -1 binary64) re) (-.f64 #s(literal 0 binary64) (*.f64 im im))))) (fma.f64 (/.f64 #s(literal 1 binary64) re) (-.f64 #s(literal 0 binary64) (*.f64 im im)) (*.f64 (/.f64 #s(literal -1 binary64) re) (-.f64 #s(literal 0 binary64) (*.f64 im im)))))
(+.f64 (fma.f64 #s(literal -4 binary64) re (neg.f64 (*.f64 (/.f64 #s(literal -1 binary64) re) (-.f64 #s(literal 0 binary64) (*.f64 im im))))) (fma.f64 (/.f64 #s(literal 1 binary64) re) (-.f64 #s(literal 0 binary64) (*.f64 im im)) (*.f64 (/.f64 #s(literal -1 binary64) re) (-.f64 #s(literal 0 binary64) (*.f64 im im)))))
(-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))
(-.f64 (*.f64 re #s(literal -4 binary64)) (-.f64 (/.f64 im (/.f64 re im)) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (/.f64 im (/.f64 re im)))))
(-.f64 #s(literal 0 binary64) (-.f64 (/.f64 im (/.f64 re im)) (*.f64 re #s(literal -4 binary64))))
(-.f64 (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))) (/.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))))
(-.f64 (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))) (-.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (/.f64 im (/.f64 re im)))))
(-.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))) (/.f64 (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im)))) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))
(-.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))) (-.f64 (/.f64 (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im)))) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (/.f64 im (/.f64 re im)))))
(-.f64 (+.f64 (*.f64 re #s(literal -4 binary64)) #s(literal 0 binary64)) (/.f64 im (/.f64 re im)))
(fma.f64 im (-.f64 #s(literal 0 binary64) (/.f64 im re)) (*.f64 re #s(literal -4 binary64)))
(fma.f64 re #s(literal -4 binary64) (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))))
(fma.f64 #s(literal -4 binary64) re (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))))
(fma.f64 (*.f64 im im) (/.f64 #s(literal -1 binary64) re) (*.f64 re #s(literal -4 binary64)))
(fma.f64 #s(literal -1 binary64) (/.f64 im (/.f64 re im)) (*.f64 re #s(literal -4 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (/.f64 #s(literal 1 binary64) re) (*.f64 re #s(literal -4 binary64)))
(fma.f64 (-.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64))) (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (/.f64 im (/.f64 re im))))
(fma.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (/.f64 im (/.f64 re im))))
(fma.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 im re) (*.f64 re #s(literal -4 binary64)))
(neg.f64 (/.f64 (-.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64))) (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))))
(neg.f64 (/.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))
(neg.f64 (/.f64 (+.f64 (neg.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64)))) (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im))))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))))
(neg.f64 (/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64))) (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im))))) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))
(/.f64 (-.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64))) (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im))))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))
(/.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im))))) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))
(/.f64 (+.f64 (neg.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64)))) (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))))
(/.f64 (+.f64 (neg.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64))) (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))
(/.f64 (-.f64 (*.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))) (*.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))) (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im)))))) (*.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))) (*.f64 (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))) (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im)))))) (*.f64 (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im))))) #s(literal 1 binary64)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re)))) #s(literal -262144 binary64)) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im)))) (/.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im)))) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im))))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) #s(literal 4096 binary64)) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im)))) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im)))) (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64)))))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) #s(literal 4096 binary64)) (/.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im)))) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im)))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64))) (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im))))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) #s(literal 4096 binary64)) (/.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im)))) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im)))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) #s(literal 256 binary64)) (*.f64 (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im)))) (+.f64 (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im)))) (*.f64 (*.f64 re re) #s(literal 16 binary64))))) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) #s(literal 256 binary64)) (/.f64 (/.f64 im (/.f64 re im)) (*.f64 (/.f64 re (*.f64 im im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im)))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im))))) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))
(/.f64 (neg.f64 (+.f64 (neg.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64)))) (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))))
(/.f64 (neg.f64 (+.f64 (neg.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64))) (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))) #s(literal 3 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (/.f64 im (/.f64 re im))) #s(literal 3 binary64))) (+.f64 (*.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))) (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))) (-.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (/.f64 im (/.f64 re im))) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (/.f64 im (/.f64 re im)))) (*.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (/.f64 im (/.f64 re im)))))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im))))) (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64)))) (+.f64 (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im)))) (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 re #s(literal -4 binary64))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))) (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))) (+.f64 (*.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))) (/.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))) (*.f64 (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))) (/.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im)))) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))) (/.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))) (+.f64 (*.f64 (/.f64 (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im)))) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))) (/.f64 (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im)))) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))) (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))) (/.f64 (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im)))) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))))
(/.f64 (-.f64 (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im)))) (*.f64 (*.f64 re re) #s(literal 16 binary64))) (-.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 re #s(literal -4 binary64))))
(/.f64 (-.f64 (*.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))) (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (/.f64 im (/.f64 re im))) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (/.f64 im (/.f64 re im))))) (-.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (/.f64 im (/.f64 re im)))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))) (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))) (*.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))) (/.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))))) (+.f64 (/.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))) (/.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))) (/.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))) (*.f64 (/.f64 (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im)))) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))) (/.f64 (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im)))) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))) (+.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))) (/.f64 (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im)))) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))
(/.f64 (*.f64 (-.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64))) (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im))))) #s(literal 1 binary64)) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))
(*.f64 (-.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64))) (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))))
(*.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))) (*.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))))
(*.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im)))))
(*.f64 (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))) (*.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))
(*.f64 (+.f64 (neg.f64 (*.f64 re (*.f64 (*.f64 re re) #s(literal -64 binary64)))) (/.f64 (/.f64 im (/.f64 re im)) (/.f64 (/.f64 re (*.f64 im im)) (/.f64 im (/.f64 re im))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 im (/.f64 re im)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))))
(*.f64 (+.f64 (neg.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64))) (/.f64 (*.f64 im im) (/.f64 re (/.f64 im (/.f64 re im))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 im (/.f64 re im))))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) im))))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) im))) #s(literal 1 binary64)))
(sqrt.f64 (*.f64 #s(literal 2 binary64) im))
(pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)) #s(literal 4 binary64))
(pow.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 im im) #s(literal 4 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) im))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im))
(*.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 (pow.f64 im #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) im)) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 im #s(literal 1/4 binary64)) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) im)) #s(literal 1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 im #s(literal 1/4 binary64)) (*.f64 (pow.f64 im #s(literal 1/4 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) im) im) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 3/8 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 3/8 binary64)) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) (*.f64 (pow.f64 im #s(literal 1/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 3/8 binary64))))
(*.f64 (pow.f64 im #s(literal 1/8 binary64)) (*.f64 (pow.f64 im #s(literal 1/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) im)) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 im #s(literal 1/8 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 3/8 binary64))))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/16 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/16 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 3/8 binary64))))
(*.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) im) im) #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 #s(literal 2 binary64) im)) #s(literal 1/4 binary64)) (pow.f64 im #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 3/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 im) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 3/8 binary64)) #s(literal 1 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) im) im) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (sqrt.f64 im) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) im) im) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)))
(*.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 3/8 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64))) (pow.f64 im #s(literal 1/8 binary64)))
(*.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 3/8 binary64)) (pow.f64 im #s(literal 1/8 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)))
(*.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 3/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/16 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/16 binary64)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 im) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 im))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64)) #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 (pow.f64 im #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64)) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 im #s(literal 1/4 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) im)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 im #s(literal 1/4 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64)) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64)) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 3/8 binary64)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 im) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (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 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) im) im) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 3/8 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal 1/4 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) im)) #s(literal 1/4 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 3/8 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) im) im) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 3/8 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64))) (pow.f64 im #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 im #s(literal 1/4 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 #s(literal 2 binary64) im))))
(exp.f64 (*.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) im)) #s(literal 1/8 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64))) #s(literal 1/8 binary64)))
(pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64)) #s(literal 1 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) #s(literal 1/8 binary64))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 #s(literal 2 binary64) im)))
(*.f64 (pow.f64 im #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 im #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) (pow.f64 im #s(literal 1/4 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) (*.f64 (pow.f64 im #s(literal 1/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64))))
(*.f64 (pow.f64 im #s(literal 1/8 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64))))
(*.f64 (pow.f64 im #s(literal 1/8 binary64)) (*.f64 (pow.f64 im #s(literal 1/8 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/16 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/16 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64))))
(*.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/16 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/16 binary64)))
(*.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)) (pow.f64 im #s(literal 1/8 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)))
(*.f64 (*.f64 (pow.f64 im #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)))
(*.f64 (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 im #s(literal 1/8 binary64))) (pow.f64 im #s(literal 1/8 binary64)))
(*.f64 (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64))) (pow.f64 im #s(literal 1/8 binary64)))
(exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) im)))
(*.f64 #s(literal 2 binary64) im)
(*.f64 im #s(literal 2 binary64))
(*.f64 (exp.f64 (log.f64 im)) (exp.f64 (log.f64 #s(literal 2 binary64))))
(*.f64 (exp.f64 (log.f64 #s(literal 2 binary64))) (exp.f64 (log.f64 im)))
(/.f64 (*.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 re))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 re))
(*.f64 #s(literal 1/2 binary64) (*.f64 im (pow.f64 re #s(literal -1/2 binary64))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 im (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 #s(literal 1/2 binary64) im)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 im (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))))
(*.f64 im (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1/2 binary64))))
(*.f64 im (*.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) im)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) im) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (pow.f64 re #s(literal -1/2 binary64)))))
(*.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)) (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) im)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) im)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) #s(literal 1/2 binary64)))
(*.f64 (*.f64 im (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) im)))
(*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 im (pow.f64 re #s(literal -1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (*.f64 im (pow.f64 re #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1/2 binary64))) im)
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (pow.f64 re #s(literal -1/2 binary64)))) #s(literal 1 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) im))
(*.f64 (*.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) im)
(*.f64 (*.f64 (*.f64 im (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) #s(literal 1 binary64)) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (*.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 re #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 re #s(literal -1/2 binary64)))
(/.f64 im (sqrt.f64 re))
(/.f64 (*.f64 im #s(literal 1 binary64)) (sqrt.f64 re))
(/.f64 (*.f64 im #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 re))
(/.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 re))
(/.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))))
(*.f64 im (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) im))
(*.f64 #s(literal 1 binary64) (*.f64 im (pow.f64 re #s(literal -1/2 binary64))))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) im)
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 #s(literal 1 binary64) im))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 im (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)))))
(*.f64 (*.f64 im (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im))
(*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) im)))
(*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))))
(*.f64 (*.f64 im (pow.f64 re #s(literal -1/2 binary64))) #s(literal 1 binary64))
(*.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) im) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)))
(*.f64 (*.f64 im #s(literal 1 binary64)) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (*.f64 im (pow.f64 re #s(literal -1/4 binary64))) (pow.f64 re #s(literal -1/4 binary64)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (*.f64 im (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 im (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (pow.f64 re #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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)))
(fabs.f64 (pow.f64 re #s(literal -1/2 binary64)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(neg.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 re))
(/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)))
(/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (sqrt.f64 #s(literal -1 binary64))) (neg.f64 (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64))))
(pow.f64 re #s(literal -1/2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 re) #s(literal -1 binary64))
(pow.f64 (pow.f64 re #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 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 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))))
(*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal -1 binary64) re)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) re) #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 re #s(literal -1/4 binary64)) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 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 (sqrt.f64 (pow.f64 re #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -1/2 binary64))))
(*.f64 (pow.f64 (sqrt.f64 re) #s(literal -1/2 binary64)) (pow.f64 (sqrt.f64 re) #s(literal -1/2 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (pow.f64 re #s(literal -1/4 binary64))) (pow.f64 re #s(literal -1/4 binary64)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1/2 binary64) re)) #s(literal 1/2 binary64)))
(exp.f64 (+.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 1/2 binary64))))
(exp.f64 (+.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 1/2 binary64)) (*.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 1/2 binary64))))
(sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))
(/.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 re))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 1/2 binary64))))
(/.f64 (sqrt.f64 #s(literal -1/2 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (sqrt.f64 #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)))
(pow.f64 (/.f64 #s(literal 1/2 binary64) re) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (pow.f64 re #s(literal -1/2 binary64))))
(*.f64 (pow.f64 (/.f64 #s(literal 1/2 binary64) re) #s(literal 1/4 binary64)) (pow.f64 (/.f64 #s(literal 1/2 binary64) re) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (pow.f64 re #s(literal -1/4 binary64))) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (pow.f64 re #s(literal -1/4 binary64))))
(*.f64 (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64))) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 re #s(literal -1/4 binary64))) (pow.f64 re #s(literal -1/4 binary64)))
(*.f64 (*.f64 (pow.f64 re #s(literal -1/2 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 im) #s(literal 2 binary64)))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 im im)))
(neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)))
(pow.f64 im #s(literal 2 binary64))
(pow.f64 (*.f64 im im) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 im)) #s(literal 2 binary64))
(*.f64 im im)
(*.f64 im (*.f64 im #s(literal 1 binary64)))
(*.f64 im (neg.f64 (-.f64 #s(literal 0 binary64) im)))
(*.f64 (*.f64 im im) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 im im))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 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 (*.f64 #s(literal 1 binary64) im) im)
(*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) im)
(exp.f64 (*.f64 (log.f64 #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(sqrt.f64 #s(literal 1/2 binary64))
(pow.f64 #s(literal 1/2 binary64) #s(literal 1/2 binary64))
(pow.f64 #s(literal 1/4 binary64) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) 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)))
(fabs.f64 (pow.f64 re #s(literal -1/2 binary64)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(neg.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 re))
(/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)))
(/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (sqrt.f64 #s(literal -1 binary64))) (neg.f64 (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64))))
(pow.f64 re #s(literal -1/2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 re) #s(literal -1 binary64))
(pow.f64 (pow.f64 re #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 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 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))))
(*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal -1 binary64) re)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) re) #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 re #s(literal -1/4 binary64)) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 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 (sqrt.f64 (pow.f64 re #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -1/2 binary64))))
(*.f64 (pow.f64 (sqrt.f64 re) #s(literal -1/2 binary64)) (pow.f64 (sqrt.f64 re) #s(literal -1/2 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (pow.f64 re #s(literal -1/4 binary64))) (pow.f64 re #s(literal -1/4 binary64)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)))

simplify429.0ms (4.3%)

Algorithm
1×egg-herbie
Rules
8012×*-lowering-*.f32
8012×*-lowering-*.f64
3036×+-lowering-+.f64
3036×+-lowering-+.f32
1672×associate-*r*
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
05834550
120054226
080514226
Stop Event
1×iter limit
1×node limit
Counts
300 → 300
Calls
Call 1
Inputs
(* 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) (* (pow (sqrt -1) 2) (sqrt 2))))
(* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (pow (sqrt -1) 2) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2)))))))
(* -1 (* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (pow (sqrt -1) 2) (sqrt 2))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (pow (sqrt -1) 2) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2))))))))
(* -1 (* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (pow (sqrt -1) 2) (sqrt 2))))) (+ (* 1/32 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (* (pow (sqrt -1) 2) (sqrt 2))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (pow (sqrt -1) 2) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2)))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* -1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/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))
(+ (* 1/2 (* (/ im (sqrt -1)) (sqrt (/ 1 re)))) (* (sqrt re) (sqrt -1)))
(+ (* im (+ (* -1/8 (* (/ im (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (/ 1 (sqrt -1)))))) (* (sqrt re) (sqrt -1)))
(+ (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (/ 1 (sqrt -1)))) (* im (+ (* -1/8 (* (sqrt (/ 1 (pow re 3))) (/ 1 (pow (sqrt -1) 3)))) (* 1/16 (* (/ im (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 5))))))))) (* (sqrt re) (sqrt -1)))
(sqrt im)
(* im (+ (sqrt (/ 1 im)) (* -1/2 (* (sqrt (/ 1 (pow im 3))) re))))
(* im (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)) (* -1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))))))
(* im (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* -1/16 (* (sqrt (/ 1 (pow im 7))) (pow re 3)))))))
(* -1 (* (sqrt im) (pow (sqrt -1) 2)))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (pow (sqrt -1) 2)))) (* (sqrt (/ 1 im)) (pow (sqrt -1) 2)))))
(* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (pow (sqrt -1) 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (pow (sqrt -1) 2)))) (* (sqrt (/ 1 im)) (pow (sqrt -1) 2))))))
(* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (pow (sqrt -1) 2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (pow (sqrt -1) 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (pow (sqrt -1) 2)))) (* (sqrt (/ 1 im)) (pow (sqrt -1) 2)))))))
(sqrt im)
(+ (sqrt im) (* -1/2 (* (sqrt (/ 1 im)) re)))
(+ (sqrt im) (* re (+ (* -1/2 (sqrt (/ 1 im))) (* -1/8 (* (sqrt (/ 1 (pow im 3))) re)))))
(+ (sqrt im) (* re (+ (* -1/2 (sqrt (/ 1 im))) (* re (+ (* -1/8 (sqrt (/ 1 (pow im 3)))) (* -1/16 (* (sqrt (/ 1 (pow im 5))) re)))))))
(* (sqrt re) (sqrt -1))
(* re (+ (* 1/2 (* (/ im (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (sqrt -1))))
(* re (+ (* -1/8 (* (/ (pow im 2) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (/ im (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(* re (+ (* -1/8 (* (/ (pow im 2) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (/ (pow im 3) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (/ im (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* (sqrt re) (sqrt -1)))
(* -1 (* re (+ (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (* (pow im 3) (sqrt -1)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (sqrt -1)))))))
(* 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)) (sqrt (/ 1 re))))
(/ (+ (* -1 (* (/ 1 (* im (sqrt -1))) (sqrt (pow re 5)))) (* 1/2 (* (* im (sqrt -1)) (sqrt re)))) re)
(/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (pow re 3) (+ (* -1 (* (/ 1 (* im (sqrt -1))) (sqrt (/ 1 re)))) (* -1 (* (/ 1 (* (pow im 3) (pow (sqrt -1) 3))) (sqrt (pow re 3))))))) re)
(/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (pow re 3) (+ (* -1 (* (/ 1 (* im (sqrt -1))) (sqrt (/ 1 re)))) (* (pow re 3) (+ (* -2 (* (/ 1 (* (pow im 5) (pow (sqrt -1) 5))) (sqrt re))) (* -1 (* (/ 1 (* (pow im 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (pow re 3)))))))))) re)
(* (sqrt re) (sqrt -1))
(* re (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1))))
(* re (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(* re (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/1024 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 (pow re 13))))) (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* (sqrt re) (sqrt -1)))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(* -1 (* re (+ (* -1 (/ (+ (* 1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (pow re 3)))) (* -1/1024 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 re))))) (pow re 3))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(* 1/2 (* (sqrt re) (sqrt -4)))
(+ (* -1/4 (* (/ (pow im 2) (sqrt -4)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt re) (sqrt -4))))
(+ (* 1/2 (* (sqrt re) (sqrt -4))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt -4)))) (* -1/16 (* (/ (pow im 2) (pow (sqrt -4) 3)) (sqrt (/ 1 (pow re 7))))))))
(+ (* 1/2 (* (sqrt re) (sqrt -4))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt -4)))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 7))) (/ 1 (pow (sqrt -4) 3)))) (* -1/32 (* (/ (pow im 2) (pow (sqrt -4) 5)) (sqrt (/ 1 (pow re 11))))))))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* im (+ (* -1 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1)))))
(* im (+ (* -1 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -1 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* im (+ (* -2 (* (/ 1 (* (pow im 6) (pow (sqrt -1) 5))) (sqrt (pow re 11)))) (+ (* -1 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -1 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1)))))))
(* -1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* -1 (* im (+ (* -1 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* im (+ (* -1 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -1 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1)))))))
(* -1 (* im (+ (* -2 (* (/ 1 (* (pow im 6) (pow (sqrt -1) 5))) (sqrt (pow re 11)))) (+ (* -1 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -1 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))))))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(/ (+ (* -2 (* (/ 1 (* im (sqrt -1))) (sqrt (pow re 5)))) (* (* im (sqrt -1)) (sqrt re))) re)
(/ (+ (* (* im (sqrt -1)) (sqrt re)) (* (pow re 3) (+ (* -2 (* (/ 1 (* im (sqrt -1))) (sqrt (/ 1 re)))) (* -2 (* (/ 1 (* (pow im 3) (pow (sqrt -1) 3))) (sqrt (pow re 3))))))) re)
(/ (+ (* (* im (sqrt -1)) (sqrt re)) (* (pow re 3) (+ (* -2 (* (/ 1 (* im (sqrt -1))) (sqrt (/ 1 re)))) (* (pow re 3) (+ (* -4 (* (/ 1 (* (pow im 5) (pow (sqrt -1) 5))) (sqrt re))) (* -2 (* (/ 1 (* (pow im 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (pow re 3)))))))))) re)
(* 2 (* (sqrt re) (sqrt -1)))
(* re (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1)))))
(* re (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* re (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/512 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 (pow re 13))))) (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1)))))))
(* -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/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))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (pow re 3)))) (* -1/512 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 re))))) (pow re 3))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* (sqrt re) (sqrt -4))
(+ (* -1/2 (* (/ (pow im 2) (sqrt -4)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt -4)))
(+ (* (sqrt re) (sqrt -4)) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt -4)))) (* -1/8 (* (/ (pow im 2) (pow (sqrt -4) 3)) (sqrt (/ 1 (pow re 7))))))))
(+ (* (sqrt re) (sqrt -4)) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt -4)))) (* (pow im 2) (+ (* -1/8 (* (sqrt (/ 1 (pow re 7))) (/ 1 (pow (sqrt -4) 3)))) (* -1/16 (* (/ (pow im 2) (pow (sqrt -4) 5)) (sqrt (/ 1 (pow re 11))))))))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* im (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1))))
(* im (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -2 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(* im (+ (* -4 (* (/ 1 (* (pow im 6) (pow (sqrt -1) 5))) (sqrt (pow re 11)))) (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -2 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* -1 (* im (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(* -1 (* im (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -2 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* im (+ (* -4 (* (/ 1 (* (pow im 6) (pow (sqrt -1) 5))) (sqrt (pow re 11)))) (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -2 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* (sqrt (/ 1 re)) (sqrt -1)))))))
(* -1 (/ (pow im 2) re))
(/ (- (* -4 (pow re 2)) (pow im 2)) re)
(/ (- (* -4 (pow re 2)) (pow im 2)) re)
(/ (- (* -4 (pow re 2)) (pow im 2)) re)
(* -4 re)
(* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))
(* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))
(* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))
(* -4 re)
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(* -4 re)
(+ (* -4 re) (* -1 (/ (pow im 2) re)))
(+ (* -4 re) (* -1 (/ (pow im 2) re)))
(+ (* -4 re) (* -1 (/ (pow im 2) re)))
(* -1 (/ (pow im 2) re))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(* -1 (/ (pow im 2) re))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(* (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))))
(* 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))))
(exp (* 1/4 (+ (log 2) (log im))))
(exp (* 1/4 (+ (log 2) (log im))))
(exp (* 1/4 (+ (log 2) (log im))))
(exp (* 1/4 (+ (log 2) (log im))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp (* 1/4 (+ (log -2) (* -1 (log (/ -1 im))))))
(exp (* 1/4 (+ (log -2) (* -1 (log (/ -1 im))))))
(exp (* 1/4 (+ (log -2) (* -1 (log (/ -1 im))))))
(exp (* 1/4 (+ (log -2) (* -1 (log (/ -1 im))))))
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))
(* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))
(* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))
(* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))
(* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))
(* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))
(* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))
(* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))
(* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))
(* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))
(* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))
(* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))
(* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2))))
(* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2))))
(* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2))))
(* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2))))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 1/2)))
(* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 1/2)))
(* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 1/2)))
(* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 1/2)))
(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)
(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))
Outputs
(* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))
(+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 re)))) (* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2)))))
(+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 re) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))))
(+ (* 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 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 re) #s(literal 1/2 binary64))) (*.f64 im (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re))) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (/.f64 (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 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 re) #s(literal 1/2 binary64))) (*.f64 im (+.f64 (*.f64 (*.f64 #s(literal 1/4 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 (*.f64 #s(literal -1/16 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 5 binary64))) #s(literal 1/32 binary64))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 im) #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 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) 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/16 (* (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) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/16 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 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))) (*.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) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/16 binary64)))) (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64)))) (*.f64 re (*.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))))))))
(* -1/2 (* (sqrt im) (* (pow (sqrt -1) 2) (sqrt 2))))
(*.f64 (sqrt.f64 im) (*.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)))
(* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (pow (sqrt -1) 2) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2)))))))
(*.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (neg.f64 im))
(* -1 (* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (pow (sqrt -1) 2) (sqrt 2))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (pow (sqrt -1) 2) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2))))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re (*.f64 re (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))))))))
(* -1 (* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (pow (sqrt -1) 2) (sqrt 2))))) (+ (* 1/32 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (* (pow (sqrt -1) 2) (sqrt 2))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (pow (sqrt -1) 2) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2)))))))))
(*.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/4 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re (*.f64 re (*.f64 #s(literal -1 binary64) (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 (neg.f64 re)))))))) (neg.f64 im))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 im) #s(literal 1/2 binary64)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 im) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* -1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 im) #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 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/16 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))) (* -1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))))))))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 im) #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) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/16 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/32 binary64))))))))
(* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 re) #s(literal 1/2 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 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re))) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 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 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re))) (sqrt.f64 #s(literal -1 binary64)))) (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 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 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re))) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 5 binary64)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 re) #s(literal -1/2 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 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)) (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) #s(literal 1/4 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 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)) (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) #s(literal 1/4 binary64))) (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))) (neg.f64 re))
(* -1 (* re (+ (* -1/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 (*.f64 #s(literal -1/16 binary64) (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)) (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) #s(literal 1/4 binary64))) (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) #s(literal 1/32 binary64)))))) (neg.f64 re))
(* (sqrt re) (sqrt -1))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64)))
(+ (* 1/2 (* (/ im (sqrt -1)) (sqrt (/ 1 re)))) (* (sqrt re) (sqrt -1)))
(+.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (/.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64))))
(+ (* im (+ (* -1/8 (* (/ im (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (/ 1 (sqrt -1)))))) (* (sqrt re) (sqrt -1)))
(+.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) (*.f64 im (+.f64 (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) (*.f64 (/.f64 im (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/8 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))))))
(+ (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (/ 1 (sqrt -1)))) (* im (+ (* -1/8 (* (sqrt (/ 1 (pow re 3))) (/ 1 (pow (sqrt -1) 3)))) (* 1/16 (* (/ im (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 5))))))))) (* (sqrt re) (sqrt -1)))
(+.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) (*.f64 im (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 im (+.f64 (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64))) #s(literal -1/8 binary64))) (*.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) 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 5 binary64))))))))))
(sqrt im)
(sqrt.f64 im)
(* im (+ (sqrt (/ 1 im)) (* -1/2 (* (sqrt (/ 1 (pow im 3))) re))))
(*.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re #s(literal -1/2 binary64)))))
(* im (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)) (* -1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))))))
(*.f64 im (+.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re #s(literal -1/2 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re re) #s(literal -1/8 binary64)))))
(* im (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* -1/16 (* (sqrt (/ 1 (pow im 7))) (pow re 3)))))))
(*.f64 im (+.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re #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/8 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64)))) (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/16 binary64))))))
(* -1 (* (sqrt im) (pow (sqrt -1) 2)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 im))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (pow (sqrt -1) 2)))) (* (sqrt (/ 1 im)) (pow (sqrt -1) 2)))))
(*.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re #s(literal -1/2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (neg.f64 im))
(* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (pow (sqrt -1) 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (pow (sqrt -1) 2)))) (* (sqrt (/ 1 im)) (pow (sqrt -1) 2))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re #s(literal -1/2 binary64))) (+.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) #s(literal 1/8 binary64))))))
(* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (pow (sqrt -1) 2)))) (+ (* 1/16 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (pow (sqrt -1) 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (pow (sqrt -1) 2)))) (* (sqrt (/ 1 im)) (pow (sqrt -1) 2)))))))
(*.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re #s(literal -1/2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) #s(literal 1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64)))) (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/16 binary64))))) (neg.f64 im))
(sqrt im)
(sqrt.f64 im)
(+ (sqrt im) (* -1/2 (* (sqrt (/ 1 im)) re)))
(+.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 re #s(literal -1/2 binary64))))
(+ (sqrt im) (* re (+ (* -1/2 (sqrt (/ 1 im))) (* -1/8 (* (sqrt (/ 1 (pow im 3))) re)))))
(+.f64 (sqrt.f64 im) (*.f64 re (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re #s(literal -1/8 binary64))))))
(+ (sqrt im) (* re (+ (* -1/2 (sqrt (/ 1 im))) (* re (+ (* -1/8 (sqrt (/ 1 (pow im 3)))) (* -1/16 (* (sqrt (/ 1 (pow im 5))) re)))))))
(+.f64 (sqrt.f64 im) (*.f64 re (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal -1/2 binary64)) (*.f64 re (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) #s(literal -1/8 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re #s(literal -1/16 binary64))))))))
(* (sqrt re) (sqrt -1))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64)))
(* re (+ (* 1/2 (* (/ im (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (sqrt -1))))
(*.f64 re (+.f64 (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) (*.f64 (/.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* re (+ (* -1/8 (* (/ (pow im 2) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (/ im (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(*.f64 re (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) (*.f64 (/.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* re (+ (* -1/8 (* (/ (pow im 2) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (/ (pow im 3) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (/ im (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(*.f64 re (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) (*.f64 (/.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (+.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64))))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 5 binary64)))))))
(* -1 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 re) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* re (+ (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(*.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im) #s(literal 1/2 binary64)))) (neg.f64 re))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(*.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im) #s(literal 1/2 binary64)))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (neg.f64 re))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (* (pow im 3) (sqrt -1)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (sqrt -1)))))))
(*.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im) #s(literal 1/2 binary64)))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 im (*.f64 im im))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))))))) (neg.f64 re))
(* 1/2 (* (sqrt re) (sqrt -4)))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))
(* -1 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 re) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 re) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 re) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 re) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 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)))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(* -2 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -2 binary64)))
(* -2 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -2 binary64)))
(* -2 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -2 binary64)))
(* -2 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -2 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)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im) #s(literal 1/2 binary64)))
(/ (+ (* -1 (* (/ 1 (* im (sqrt -1))) (sqrt (pow re 5)))) (* 1/2 (* (* im (sqrt -1)) (sqrt re)))) re)
(/.f64 (-.f64 (*.f64 (sqrt.f64 re) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im) #s(literal 1/2 binary64))) (/.f64 (sqrt.f64 (pow.f64 re #s(literal 5 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) im))) re)
(/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (pow re 3) (+ (* -1 (* (/ 1 (* im (sqrt -1))) (sqrt (/ 1 re)))) (* -1 (* (/ 1 (* (pow im 3) (pow (sqrt -1) 3))) (sqrt (pow re 3))))))) re)
(/.f64 (+.f64 (*.f64 (sqrt.f64 re) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im) #s(literal 1/2 binary64))) (*.f64 (*.f64 re (*.f64 re re)) (-.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) im))) (/.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 im (*.f64 im im)))))))) re)
(/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (pow re 3) (+ (* -1 (* (/ 1 (* im (sqrt -1))) (sqrt (/ 1 re)))) (* (pow re 3) (+ (* -2 (* (/ 1 (* (pow im 5) (pow (sqrt -1) 5))) (sqrt re))) (* -1 (* (/ 1 (* (pow im 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (pow re 3)))))))))) re)
(/.f64 (+.f64 (*.f64 (sqrt.f64 re) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im) #s(literal 1/2 binary64))) (*.f64 re (*.f64 (*.f64 re re) (-.f64 (*.f64 (*.f64 re (*.f64 re re)) (-.f64 (/.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 re)) (*.f64 (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 5 binary64)) (pow.f64 im #s(literal 5 binary64)))) (/.f64 (/.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 im (*.f64 im im))))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) im)))))) re)
(* (sqrt re) (sqrt -1))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64)))
(* re (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1))))
(*.f64 re (+.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* re (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(*.f64 re (+.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/128 binary64)))))
(* re (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/1024 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 (pow re 13))))) (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(*.f64 re (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/128 binary64))) (+.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 13 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 6 binary64))) #s(literal 1/1024 binary64)))))))
(* -1 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 re) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(*.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* 1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(-.f64 #s(literal 0 binary64) (*.f64 re (-.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/128 binary64) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 re))) (*.f64 re (*.f64 re re))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (pow re 3)))) (* -1/1024 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 re))))) (pow re 3))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (/.f64 (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 re)) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/128 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 #s(literal -1/1024 binary64) (pow.f64 im #s(literal 6 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))) (*.f64 re (*.f64 re re)))) (*.f64 re (*.f64 re re)))) (neg.f64 re))
(* 1/2 (* (sqrt re) (sqrt -4)))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64)))
(+ (* -1/4 (* (/ (pow im 2) (sqrt -4)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt re) (sqrt -4))))
(+.f64 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) (*.f64 (*.f64 im (/.f64 im (sqrt.f64 #s(literal -4 binary64)))) #s(literal -1/4 binary64))))
(+ (* 1/2 (* (sqrt re) (sqrt -4))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt -4)))) (* -1/16 (* (/ (pow im 2) (pow (sqrt -4) 3)) (sqrt (/ 1 (pow re 7))))))))
(+.f64 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) (sqrt.f64 #s(literal -4 binary64)))) (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) (*.f64 (/.f64 #s(literal -1/4 binary64) (sqrt.f64 #s(literal -4 binary64))) #s(literal -1/16 binary64)))))))
(+ (* 1/2 (* (sqrt re) (sqrt -4))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt -4)))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 7))) (/ 1 (pow (sqrt -4) 3)))) (* -1/32 (* (/ (pow im 2) (pow (sqrt -4) 5)) (sqrt (/ 1 (pow re 11))))))))))
(+.f64 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) (sqrt.f64 #s(literal -4 binary64)))) (*.f64 (*.f64 im im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) (*.f64 (/.f64 #s(literal -1/4 binary64) (sqrt.f64 #s(literal -4 binary64))) #s(literal -1/16 binary64))) (*.f64 (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 im im)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 11 binary64))))))))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im) #s(literal 1/2 binary64)))
(* im (+ (* -1 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1)))))
(*.f64 im (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)))))
(* im (+ (* -1 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -1 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(*.f64 im (-.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (/.f64 (sqrt.f64 (pow.f64 re #s(literal 7 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))) (pow.f64 im #s(literal 4 binary64)))) (/.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)))))
(* im (+ (* -2 (* (/ 1 (* (pow im 6) (pow (sqrt -1) 5))) (sqrt (pow re 11)))) (+ (* -1 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -1 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1)))))))
(*.f64 im (+.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (/.f64 (sqrt.f64 (pow.f64 re #s(literal 7 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))) (pow.f64 im #s(literal 4 binary64)))) (-.f64 (/.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 (pow.f64 re #s(literal 11 binary64)))) (*.f64 (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 5 binary64)) (pow.f64 im #s(literal 6 binary64)))) (/.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))))))
(* -1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im) #s(literal -1/2 binary64)))
(* -1 (* im (+ (* -1 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))))))
(* -1 (* im (+ (* -1 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -1 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1)))))))
(*.f64 (-.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (/.f64 (sqrt.f64 (pow.f64 re #s(literal 7 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))) (pow.f64 im #s(literal 4 binary64)))) (/.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)))) (neg.f64 im))
(* -1 (* im (+ (* -2 (* (/ 1 (* (pow im 6) (pow (sqrt -1) 5))) (sqrt (pow re 11)))) (+ (* -1 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -1 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))))))))
(*.f64 im (neg.f64 (+.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64))) (/.f64 (/.f64 (sqrt.f64 (pow.f64 re #s(literal 7 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))) (pow.f64 im #s(literal 4 binary64)))) (-.f64 (/.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 (pow.f64 re #s(literal 11 binary64)))) (*.f64 (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 5 binary64)) (pow.f64 im #s(literal 6 binary64)))) (/.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)))))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) im))
(/ (+ (* -2 (* (/ 1 (* im (sqrt -1))) (sqrt (pow re 5)))) (* (* im (sqrt -1)) (sqrt re))) re)
(/.f64 (+.f64 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) im)) (*.f64 #s(literal -2 binary64) (/.f64 (sqrt.f64 (pow.f64 re #s(literal 5 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) im)))) re)
(/ (+ (* (* im (sqrt -1)) (sqrt re)) (* (pow re 3) (+ (* -2 (* (/ 1 (* im (sqrt -1))) (sqrt (/ 1 re)))) (* -2 (* (/ 1 (* (pow im 3) (pow (sqrt -1) 3))) (sqrt (pow re 3))))))) re)
(/.f64 (+.f64 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) im)) (*.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -2 binary64)) (+.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) im)) (/.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (*.f64 im (*.f64 im im)))))))) re)
(/ (+ (* (* im (sqrt -1)) (sqrt re)) (* (pow re 3) (+ (* -2 (* (/ 1 (* im (sqrt -1))) (sqrt (/ 1 re)))) (* (pow re 3) (+ (* -4 (* (/ 1 (* (pow im 5) (pow (sqrt -1) 5))) (sqrt re))) (* -2 (* (/ 1 (* (pow im 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (pow re 3)))))))))) re)
(/.f64 (+.f64 (*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) im)) (*.f64 re (*.f64 (*.f64 re re) (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) im))) (*.f64 (*.f64 re (*.f64 re re)) (+.f64 (/.f64 (*.f64 #s(literal -4 binary64) (sqrt.f64 re)) (*.f64 (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 5 binary64)) (pow.f64 im #s(literal 5 binary64)))) (*.f64 #s(literal -2 binary64) (/.f64 (/.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 im (*.f64 im im)))))))))) re)
(* 2 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))
(* re (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1)))))
(*.f64 re (+.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 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))))
(* re (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(*.f64 re (+.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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/64 binary64))))))
(* re (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/512 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 (pow re 13))))) (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1)))))))
(*.f64 re (+.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 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/64 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/512 binary64) (pow.f64 im #s(literal 6 binary64))) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 13 binary64))))))))
(* -2 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -2 binary64)))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(*.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))) (*.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* 1/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 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im im)) (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 re (*.f64 re re)))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (pow re 3)))) (* -1/512 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 re))))) (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 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im im)) (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/64 binary64) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 #s(literal -1/512 binary64) (pow.f64 im #s(literal 6 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))) (*.f64 re (*.f64 re re)))) (*.f64 re (*.f64 re re)))) (neg.f64 re))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(+ (* -1/2 (* (/ (pow im 2) (sqrt -4)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt -4)))
(+.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64))) (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) (*.f64 (*.f64 im (/.f64 im (sqrt.f64 #s(literal -4 binary64)))) #s(literal -1/2 binary64))))
(+ (* (sqrt re) (sqrt -4)) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt -4)))) (* -1/8 (* (/ (pow im 2) (pow (sqrt -4) 3)) (sqrt (/ 1 (pow re 7))))))))
(+.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) (sqrt.f64 #s(literal -4 binary64)))) (*.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (*.f64 #s(literal -4 binary64) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64))))))))
(+ (* (sqrt re) (sqrt -4)) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt -4)))) (* (pow im 2) (+ (* -1/8 (* (sqrt (/ 1 (pow re 7))) (/ 1 (pow (sqrt -4) 3)))) (* -1/16 (* (/ (pow im 2) (pow (sqrt -4) 5)) (sqrt (/ 1 (pow re 11))))))))))
(+.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) (sqrt.f64 #s(literal -4 binary64)))) (*.f64 im (*.f64 im (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) (*.f64 (/.f64 #s(literal -1/4 binary64) (sqrt.f64 #s(literal -4 binary64))) #s(literal -1/8 binary64))) (*.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 im im)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 11 binary64)))))))))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) im))
(* im (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1))))
(*.f64 im (+.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (/.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)))))
(* im (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -2 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(*.f64 im (+.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) (/.f64 (/.f64 (sqrt.f64 (pow.f64 re #s(literal 7 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))) (pow.f64 im #s(literal 4 binary64)))))))
(* im (+ (* -4 (* (/ 1 (* (pow im 6) (pow (sqrt -1) 5))) (sqrt (pow re 11)))) (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -2 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(*.f64 im (+.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) (/.f64 (/.f64 (sqrt.f64 (pow.f64 re #s(literal 7 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))) (pow.f64 im #s(literal 4 binary64))))) (+.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (/.f64 (*.f64 #s(literal -4 binary64) (sqrt.f64 (pow.f64 re #s(literal 11 binary64)))) (*.f64 (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 5 binary64)) (pow.f64 im #s(literal 6 binary64)))))))
(* -1 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) im)))
(* -1 (* im (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(*.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (/.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)))) (neg.f64 im))
(* -1 (* im (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -2 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) (/.f64 (/.f64 (sqrt.f64 (pow.f64 re #s(literal 7 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))) (pow.f64 im #s(literal 4 binary64))))))))
(* -1 (* im (+ (* -4 (* (/ 1 (* (pow im 6) (pow (sqrt -1) 5))) (sqrt (pow re 11)))) (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -2 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* (sqrt (/ 1 re)) (sqrt -1)))))))
(*.f64 (+.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) (/.f64 (/.f64 (sqrt.f64 (pow.f64 re #s(literal 7 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))) (pow.f64 im #s(literal 4 binary64))))) (+.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (/.f64 (*.f64 #s(literal -4 binary64) (sqrt.f64 (pow.f64 re #s(literal 11 binary64)))) (*.f64 (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 5 binary64)) (pow.f64 im #s(literal 6 binary64)))))) (neg.f64 im))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(/ (- (* -4 (pow re 2)) (pow im 2)) re)
(/.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal -4 binary64)) (*.f64 im im)) re)
(/ (- (* -4 (pow re 2)) (pow im 2)) re)
(/.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal -4 binary64)) (*.f64 im im)) re)
(/ (- (* -4 (pow re 2)) (pow im 2)) re)
(/.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal -4 binary64)) (*.f64 im im)) re)
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))
(*.f64 re (+.f64 #s(literal -4 binary64) (-.f64 #s(literal 0 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))
(* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))
(*.f64 re (+.f64 #s(literal -4 binary64) (-.f64 #s(literal 0 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))
(* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))
(*.f64 re (+.f64 #s(literal -4 binary64) (-.f64 #s(literal 0 binary64) (*.f64 im (/.f64 im (*.f64 re 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 im (/.f64 im (*.f64 re re)))) (neg.f64 re))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(*.f64 (+.f64 #s(literal 4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (neg.f64 re))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(*.f64 (+.f64 #s(literal 4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (neg.f64 re))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(+ (* -4 re) (* -1 (/ (pow im 2) re)))
(-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))
(+ (* -4 re) (* -1 (/ (pow im 2) re)))
(-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))
(+ (* -4 re) (* -1 (/ (pow im 2) re)))
(-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 re #s(literal -4 binary64)) (*.f64 im im)) (/.f64 #s(literal -1 binary64) re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 re #s(literal -4 binary64)) (*.f64 im im)) (/.f64 #s(literal -1 binary64) re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 re #s(literal -4 binary64)) (*.f64 im im)) (/.f64 #s(literal -1 binary64) re)))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 re #s(literal -4 binary64)) (*.f64 im im)) (/.f64 #s(literal -1 binary64) re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 re #s(literal -4 binary64)) (*.f64 im im)) (/.f64 #s(literal -1 binary64) re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 re #s(literal -4 binary64)) (*.f64 im im)) (/.f64 #s(literal -1 binary64) re)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64)))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64)))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64)))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (neg.f64 (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 im) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 im) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 im) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 im) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 im) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 im) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 im) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 im) #s(literal 1/2 binary64)))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(exp (* 1/4 (+ (log 2) (log im))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))
(exp (* 1/4 (+ (log 2) (log im))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))
(exp (* 1/4 (+ (log 2) (log im))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))
(exp (* 1/4 (+ (log 2) (log 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))))))
(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))))))
(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))))))
(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))))))
(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))))))
(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))))))
(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))))))
(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))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal -2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))
(* 2 im)
(*.f64 #s(literal 2 binary64) im)
(* 2 im)
(*.f64 #s(literal 2 binary64) im)
(* 2 im)
(*.f64 #s(literal 2 binary64) im)
(* 2 im)
(*.f64 #s(literal 2 binary64) im)
(* 2 im)
(*.f64 #s(literal 2 binary64) im)
(* 2 im)
(*.f64 #s(literal 2 binary64) im)
(* 2 im)
(*.f64 #s(literal 2 binary64) im)
(* 2 im)
(*.f64 #s(literal 2 binary64) im)
(* 2 im)
(*.f64 #s(literal 2 binary64) im)
(* 2 im)
(*.f64 #s(literal 2 binary64) im)
(* 2 im)
(*.f64 #s(literal 2 binary64) im)
(* 2 im)
(*.f64 #s(literal 2 binary64) im)
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(*.f64 (*.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(*.f64 (*.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(*.f64 (*.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(*.f64 (*.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 1/2 binary64)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))))
(* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))))
(* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))))
(* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))))
(* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))))
(* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))))
(* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))))
(* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))))
(* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2))))
(*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2))))
(*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2))))
(*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2))))
(*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))
(* (sqrt (/ 1 re)) (sqrt 1/2))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))
(* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 1/2)))
(*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))))
(* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 1/2)))
(*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))))
(* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 1/2)))
(*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))))
(* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 1/2)))
(*.f64 #s(literal -1 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/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)
(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 #s(literal -1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))

eval82.0ms (0.8%)

Compiler

Compiled 15423 to 2255 computations (85.4% saved)

prune112.0ms (1.1%)

Pruning

14 alts after pruning (7 fresh and 7 done)

PrunedKeptTotal
New7834787
Fresh639
Picked235
Done044
Total79114805
Accuracy
100.0%
Counts
805 → 14
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶21.5%
(*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
▶28.4%
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) im))
28.1%
(*.f64 (*.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (pow.f64 re #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))
28.3%
(*.f64 (*.f64 (*.f64 im (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
✓56.6%
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 im re)))
▶28.4%
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
✓19.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))
▶55.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))))))
▶5.6%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -2 binary64))))
✓21.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64))))
✓56.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))))
✓55.4%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
✓78.5%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
✓56.9%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re))))
Compiler

Compiled 239 to 189 computations (20.9% saved)

simplify9.0ms (0.1%)

Algorithm
1×egg-herbie
Localize:

Found 17 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
✓cost-diff0
(*.f64 re #s(literal -2 binary64))
✓cost-diff0
(*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
✓cost-diff64
(pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) im)
✓cost-diff0
(pow.f64 re #s(literal -1/2 binary64))
✓cost-diff0
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) im))
✓cost-diff0
(sqrt.f64 re)
✓cost-diff0
(/.f64 im (sqrt.f64 re))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
✓cost-diff0
(*.f64 re #s(literal -2 binary64))
✓cost-diff0
(sqrt.f64 (*.f64 re #s(literal -2 binary64)))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #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 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))))))
Rules
78×*-lowering-*.f32
78×*-lowering-*.f64
44×fma-define
40×fma-lowering-fma.f32
40×fma-lowering-fma.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
026131
149131
284131
3105131
4114131
0114131
Stop Event
1×iter limit
1×saturated
Calls
Call 1
Inputs
(* 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 (* re -2)))
1/2
(sqrt (* re -2))
(* re -2)
re
-2
(* 1/2 (/ im (sqrt re)))
1/2
(/ im (sqrt re))
im
(sqrt re)
re
(* (pow re -1/2) (* 1/2 im))
(pow re -1/2)
re
-1/2
(* 1/2 im)
1/2
im
(* (pow (* re -2) 1/2) (* 1/2 (sqrt 2)))
(pow (* re -2) 1/2)
(* re -2)
re
-2
1/2
(* 1/2 (sqrt 2))
(sqrt 2)
2
Outputs
(* 1/2 (sqrt (+ (* im 2) (* re (+ -2 (/ re 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 im))))))
1/2
#s(literal 1/2 binary64)
(sqrt (+ (* im 2) (* re (+ -2 (/ re im)))))
(sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))
(+ (* im 2) (* re (+ -2 (/ re im))))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))
(* im 2)
(*.f64 im #s(literal 2 binary64))
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 (* re -2)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -2 binary64))))
1/2
#s(literal 1/2 binary64)
(sqrt (* re -2))
(sqrt.f64 (*.f64 re #s(literal -2 binary64)))
(* re -2)
(*.f64 re #s(literal -2 binary64))
re
-2
#s(literal -2 binary64)
(* 1/2 (/ im (sqrt re)))
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
1/2
#s(literal 1/2 binary64)
(/ im (sqrt re))
(/.f64 im (sqrt.f64 re))
im
(sqrt re)
(sqrt.f64 re)
re
(* (pow re -1/2) (* 1/2 im))
(*.f64 #s(literal 1/2 binary64) (*.f64 im (pow.f64 re #s(literal -1/2 binary64))))
(pow re -1/2)
(pow.f64 re #s(literal -1/2 binary64))
re
-1/2
#s(literal -1/2 binary64)
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
1/2
#s(literal 1/2 binary64)
im
(* (pow (* re -2) 1/2) (* 1/2 (sqrt 2)))
(*.f64 (sqrt.f64 (*.f64 re #s(literal -2 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(pow (* re -2) 1/2)
(sqrt.f64 (*.f64 re #s(literal -2 binary64)))
(* re -2)
(*.f64 re #s(literal -2 binary64))
re
-2
#s(literal -2 binary64)
1/2
#s(literal 1/2 binary64)
(* 1/2 (sqrt 2))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)

localize219.0ms (2.2%)

Localize:

Found 17 expressions of interest:

NewMetricScoreProgram
✓accuracy100.0%
(*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
✓accuracy100.0%
(*.f64 re #s(literal -2 binary64))
✓accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
✓accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
✓accuracy100.0%
(pow.f64 re #s(literal -1/2 binary64))
✓accuracy100.0%
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) im))
✓accuracy100.0%
(*.f64 #s(literal 1/2 binary64) im)
✓accuracy100.0%
(/.f64 im (sqrt.f64 re))
✓accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
✓accuracy100.0%
(sqrt.f64 re)
✓accuracy100.0%
(*.f64 re #s(literal -2 binary64))
✓accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -2 binary64))))
✓accuracy100.0%
(sqrt.f64 (*.f64 re #s(literal -2 binary64)))
✓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)))))
Results
184.0ms256×0invalid
Compiler

Compiled 139 to 27 computations (80.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 80.0ms
ival-sqrt: 33.0ms (41% of total)
ival-pow: 21.0ms (26.1% of total)
ival-mult: 19.0ms (23.6% of total)
ival-div: 4.0ms (5% of total)
ival-add: 3.0ms (3.7% of total)
const: 1.0ms (1.2% of total)
backward-pass: 0.0ms (0% of total)

series41.0ms (0.4%)

Counts
18 → 276
Calls
Call 1
Inputs
#<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 (* im 2)>
#<alt (* 1/2 (sqrt (* re -2)))>
#<alt (sqrt (* re -2))>
#<alt (* re -2)>
#<alt (* 1/2 (/ im (sqrt re)))>
#<alt (/ im (sqrt re))>
#<alt (sqrt re)>
#<alt (* (pow re -1/2) (* 1/2 im))>
#<alt (pow re -1/2)>
#<alt (* 1/2 im)>
#<alt (pow (* re -2) 1/2)>
#<alt (* (pow (* re -2) 1/2) (* 1/2 (sqrt 2)))>
#<alt (* 1/2 (sqrt 2))>
#<alt (* re (+ -2 (/ re im)))>
#<alt (sqrt 2)>
Outputs
#<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 (* 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 -2)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -2)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -2)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -2)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -2)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -2)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -2)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -2)))>
#<alt (* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (* (sqrt re) (sqrt -2))>
#<alt (* (sqrt re) (sqrt -2))>
#<alt (* (sqrt re) (sqrt -2))>
#<alt (* (sqrt re) (sqrt -2))>
#<alt (* (sqrt re) (sqrt -2))>
#<alt (* (sqrt re) (sqrt -2))>
#<alt (* (sqrt re) (sqrt -2))>
#<alt (* (sqrt re) (sqrt -2))>
#<alt (* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (* -2 re)>
#<alt (* -2 re)>
#<alt (* -2 re)>
#<alt (* -2 re)>
#<alt (* -2 re)>
#<alt (* -2 re)>
#<alt (* -2 re)>
#<alt (* -2 re)>
#<alt (* -2 re)>
#<alt (* -2 re)>
#<alt (* -2 re)>
#<alt (* -2 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 (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 (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<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 (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 (* 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 (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/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) (sqrt -2))>
#<alt (* (sqrt re) (sqrt -2))>
#<alt (* (sqrt re) (sqrt -2))>
#<alt (* (sqrt re) (sqrt -2))>
#<alt (* (sqrt re) (sqrt -2))>
#<alt (* (sqrt re) (sqrt -2))>
#<alt (* (sqrt re) (sqrt -2))>
#<alt (* (sqrt re) (sqrt -2))>
#<alt (* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (* 1/2 (* (sqrt re) (* (sqrt -2) (sqrt 2))))>
#<alt (* 1/2 (* (sqrt re) (* (sqrt -2) (sqrt 2))))>
#<alt (* 1/2 (* (sqrt re) (* (sqrt -2) (sqrt 2))))>
#<alt (* 1/2 (* (sqrt re) (* (sqrt -2) (sqrt 2))))>
#<alt (* 1/2 (* (sqrt re) (* (sqrt -2) (sqrt 2))))>
#<alt (* 1/2 (* (sqrt re) (* (sqrt -2) (sqrt 2))))>
#<alt (* 1/2 (* (sqrt re) (* (sqrt -2) (sqrt 2))))>
#<alt (* 1/2 (* (sqrt re) (* (sqrt -2) (sqrt 2))))>
#<alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))>
#<alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))>
#<alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))>
#<alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))>
#<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))>
Calls

69 calls:

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

rewrite286.0ms (2.9%)

Algorithm
1×batch-egg-rewrite
Rules
4972×*-lowering-*.f32
4972×*-lowering-*.f64
3174×/-lowering-/.f32
3174×/-lowering-/.f64
1720×frac-times
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
026100
111299
271298
0881798
Stop Event
1×iter limit
1×node limit
Counts
18 → 390
Calls
Call 1
Inputs
(* 1/2 (sqrt (+ (* im 2) (* re (+ -2 (/ re im))))))
(sqrt (+ (* im 2) (* re (+ -2 (/ re im)))))
(+ (* im 2) (* re (+ -2 (/ re im))))
(* im 2)
(* 1/2 (sqrt (* re -2)))
(sqrt (* re -2))
(* re -2)
(* 1/2 (/ im (sqrt re)))
(/ im (sqrt re))
(sqrt re)
(* (pow re -1/2) (* 1/2 im))
(pow re -1/2)
(* 1/2 im)
(pow (* re -2) 1/2)
(* (pow (* re -2) 1/2) (* 1/2 (sqrt 2)))
(* 1/2 (sqrt 2))
(* re (+ -2 (/ re im)))
(sqrt 2)
Outputs
(/.f64 (*.f64 #s(literal 1/2 binary64) (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 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64)))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))))) (sqrt.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
(/.f64 (*.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 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))))) #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64)))))))
(/.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))))) #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 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) #s(literal 1/4 binary64))) (pow.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) #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 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64)))))) (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 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (sqrt.f64 (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))))))
(/.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 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))))) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64)))))))
(/.f64 (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 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))))) (sqrt.f64 (+.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))) (*.f64 im (-.f64 (*.f64 im #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) (+.f64 #s(literal -2 binary64) (/.f64 re im))))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))))) (sqrt.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64))))))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))) (*.f64 #s(literal -4 binary64) (*.f64 im im)))) (sqrt.f64 (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64)))))
(/.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 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))))))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64))))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))))) (neg.f64 (sqrt.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))
(pow.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.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 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64)))))) #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 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64))))))))
(*.f64 (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 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64))))))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))
(*.f64 (pow.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) #s(literal 1/4 binary64)))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))
(+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal 2 binary64)))
(+.f64 (*.f64 re #s(literal -2 binary64)) (+.f64 (/.f64 re (/.f64 im re)) (*.f64 im #s(literal 2 binary64))))
(+.f64 (/.f64 re (/.f64 im re)) (+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 im #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (neg.f64 (/.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))
(+.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64))) (/.f64 re (/.f64 im re)))
(+.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (/.f64 re (/.f64 im re))) (*.f64 re #s(literal -2 binary64)))
(-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (/.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64)))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64)))))
(fma.f64 im #s(literal 2 binary64) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))
(fma.f64 #s(literal 2 binary64) im (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))
(fma.f64 re #s(literal -2 binary64) (+.f64 (/.f64 re (/.f64 im re)) (*.f64 im #s(literal 2 binary64))))
(fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))
(fma.f64 #s(literal -2 binary64) re (+.f64 (/.f64 re (/.f64 im re)) (*.f64 im #s(literal 2 binary64))))
(fma.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) re (*.f64 im #s(literal 2 binary64)))
(neg.f64 (/.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 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64))))))))
(neg.f64 (/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64)))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.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 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))))) (+.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))) (*.f64 im (-.f64 (*.f64 im #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))) (*.f64 im (-.f64 (*.f64 im #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) (+.f64 #s(literal -2 binary64) (/.f64 re 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 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64))) (+.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))) (*.f64 #s(literal -4 binary64) (*.f64 im im)))))
(/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))) (*.f64 im (-.f64 (*.f64 im #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) (+.f64 #s(literal -2 binary64) (/.f64 re im))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))) (*.f64 #s(literal -4 binary64) (*.f64 im im))) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (*.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))))) (*.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 #s(literal 64 binary64) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))) (*.f64 (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 64 binary64) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))) (-.f64 (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))) (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64))))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64)))))))
(/.f64 (*.f64 (-.f64 (*.f64 #s(literal 64 binary64) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))))) #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 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64)))))))
(/.f64 (*.f64 (-.f64 (*.f64 #s(literal 64 binary64) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 16 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))) (+.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))) (*.f64 #s(literal 4 binary64) (*.f64 im im))))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
(/.f64 (*.f64 (-.f64 (*.f64 #s(literal 16 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))) (*.f64 #s(literal -4 binary64) (*.f64 im im)))) (neg.f64 (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64)))))
(/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 re (*.f64 re re))) (pow.f64 (+.f64 (/.f64 re (/.f64 im re)) (*.f64 im #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 re re)) (-.f64 (*.f64 (+.f64 (/.f64 re (/.f64 im re)) (*.f64 im #s(literal 2 binary64))) (+.f64 (/.f64 re (/.f64 im re)) (*.f64 im #s(literal 2 binary64)))) (*.f64 (*.f64 re #s(literal -2 binary64)) (+.f64 (/.f64 re (/.f64 im re)) (*.f64 im #s(literal 2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64))) #s(literal 3 binary64)) (*.f64 (/.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 im re)) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64))) (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))) (-.f64 (/.f64 (*.f64 re (*.f64 re re)) (/.f64 im (/.f64 re im))) (*.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64))) (/.f64 re (/.f64 im re))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))) (+.f64 (*.f64 (/.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (/.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (/.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))))
(/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 re re)) (*.f64 (+.f64 (/.f64 re (/.f64 im re)) (*.f64 im #s(literal 2 binary64))) (+.f64 (/.f64 re (/.f64 im re)) (*.f64 im #s(literal 2 binary64))))) (-.f64 (*.f64 re #s(literal -2 binary64)) (+.f64 (/.f64 re (/.f64 im re)) (*.f64 im #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64))) (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))) (/.f64 (*.f64 re (*.f64 re re)) (/.f64 im (/.f64 re im)))) (-.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64))) (/.f64 re (/.f64 im re))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))) (*.f64 (/.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (/.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))) (+.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (/.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))
(/.f64 (*.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 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))))) #s(literal 1 binary64)) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64))))))
(/.f64 (*.f64 (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))) #s(literal 1 binary64)) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 #s(literal 64 binary64) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))) (*.f64 (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64))))))) (+.f64 (*.f64 #s(literal 64 binary64) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))) (-.f64 (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))) (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64))))))
(/.f64 (*.f64 (-.f64 (*.f64 #s(literal 64 binary64) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64))))))) (-.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))))))
(/.f64 (*.f64 (-.f64 (*.f64 #s(literal 64 binary64) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))) (+.f64 (*.f64 #s(literal 16 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))) (+.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))) (*.f64 #s(literal 4 binary64) (*.f64 im im))))))
(/.f64 (*.f64 (-.f64 (*.f64 #s(literal 16 binary64) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (*.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))
(*.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 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64)))))))
(*.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))) (*.f64 im (-.f64 (*.f64 im #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) (+.f64 #s(literal -2 binary64) (/.f64 re im))))))))
(*.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64))))) (*.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64))))))))
(*.f64 #s(literal 1 binary64) (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))
(*.f64 (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64))))))))
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 im im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))
(*.f64 (+.f64 (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re re))) (*.f64 #s(literal -4 binary64) (*.f64 im im))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal -2 binary64)))))
(*.f64 im #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) im)
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 re))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 re #s(literal 1/4 binary64)) (*.f64 (pow.f64 re #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (pow.f64 re #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 re #s(literal 1/4 binary64)) (*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/8 binary64)) (*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/8 binary64)) (*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64))) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 re #s(literal 1/4 binary64))) (pow.f64 re #s(literal 1/4 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64))) (pow.f64 re #s(literal 1/4 binary64))) (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64))) (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64))) (pow.f64 re #s(literal 1/4 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64))) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/8 binary64))) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/8 binary64)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 re #s(literal -2 binary64)))))
(exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 4 binary64) (*.f64 re re))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (*.f64 re #s(literal -2 binary64))) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (+.f64 (*.f64 (log.f64 (*.f64 re #s(literal -2 binary64))) #s(literal 1/4 binary64)) (*.f64 (log.f64 (*.f64 re #s(literal -2 binary64))) #s(literal 1/4 binary64))))
(sqrt.f64 (*.f64 re #s(literal -2 binary64)))
(pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 #s(literal 4 binary64) (*.f64 re re)) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (*.f64 re #s(literal -2 binary64))))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 re))
(*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 re #s(literal 1/4 binary64)) (*.f64 (pow.f64 re #s(literal 1/4 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 re #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64)) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64)) (sqrt.f64 re)))
(*.f64 (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 re #s(literal 1/4 binary64)) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/8 binary64)) (*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/8 binary64)) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (*.f64 (sqrt.f64 re) (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 re #s(literal 1/4 binary64))) (pow.f64 re #s(literal 1/4 binary64)))
(*.f64 (*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)) (pow.f64 re #s(literal 1/4 binary64))) (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)) (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64))) (pow.f64 re #s(literal 1/4 binary64)))
(*.f64 (*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/8 binary64))) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/8 binary64)))
(exp.f64 (log.f64 (*.f64 re #s(literal -2 binary64))))
(*.f64 re #s(literal -2 binary64))
(*.f64 re (exp.f64 (log.f64 #s(literal -2 binary64))))
(*.f64 #s(literal -2 binary64) re)
(*.f64 (exp.f64 (log.f64 #s(literal -2 binary64))) re)
(neg.f64 (*.f64 (/.f64 im (-.f64 #s(literal 0 binary64) (sqrt.f64 re))) #s(literal 1/2 binary64)))
(neg.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 im (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))))
(neg.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) im) (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(neg.f64 (/.f64 (*.f64 im #s(literal -1/2 binary64)) (sqrt.f64 re)))
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
(/.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 re) im)))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im)) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im))))
(/.f64 (*.f64 im #s(literal -1/2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (neg.f64 (*.f64 im #s(literal -1/2 binary64))) (sqrt.f64 re))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) #s(literal 1 binary64)) (sqrt.f64 re))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) im)) (sqrt.f64 re))
(pow.f64 (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im)) #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (/.f64 im (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) im))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)))
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 (*.f64 (pow.f64 re #s(literal -1/4 binary64)) #s(literal 1/2 binary64)) im))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
(*.f64 (*.f64 im #s(literal -1/2 binary64)) (/.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(*.f64 (pow.f64 re #s(literal -1/8 binary64)) (*.f64 (pow.f64 re #s(literal -1/8 binary64)) (*.f64 (*.f64 (pow.f64 re #s(literal -1/4 binary64)) #s(literal 1/2 binary64)) im)))
(*.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) (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 (/.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 (pow.f64 re #s(literal -1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) #s(literal 1 binary64)) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (*.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1/4 binary64)))) (pow.f64 re #s(literal -1/8 binary64))) (pow.f64 re #s(literal -1/8 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 re) im)) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 im (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 re))) (/.f64 im (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(neg.f64 (/.f64 im (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 im (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 re) im)))
(/.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) (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 re) im)))
(/.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) im)) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) im) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (*.f64 im #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(pow.f64 (/.f64 (sqrt.f64 re) im) #s(literal -1 binary64))
(*.f64 im (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) im)
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -1 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(*.f64 #s(literal 1 binary64) (/.f64 im (sqrt.f64 re)))
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) im))
(*.f64 #s(literal -1 binary64) (/.f64 im (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(*.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) im)) (/.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(*.f64 (/.f64 im (pow.f64 re #s(literal 1/4 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (/.f64 (sqrt.f64 re) im) #s(literal -1/2 binary64)) (pow.f64 (/.f64 (sqrt.f64 re) im) #s(literal -1/2 binary64)))
(*.f64 (*.f64 im (pow.f64 re #s(literal -1/4 binary64))) (pow.f64 re #s(literal -1/4 binary64)))
(exp.f64 (*.f64 (log.f64 re) #s(literal 1/2 binary64)))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(sqrt.f64 re)
(neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (sqrt.f64 re) #s(literal 1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re)) #s(literal -1 binary64))
(/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal -1/2 binary64)))
(pow.f64 re #s(literal 1/2 binary64))
(pow.f64 (pow.f64 re #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 re re) #s(literal 1/4 binary64))
(*.f64 (sqrt.f64 re) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(*.f64 (pow.f64 re #s(literal 1/4 binary64)) (pow.f64 re #s(literal 1/4 binary64)))
(neg.f64 (*.f64 (/.f64 im (-.f64 #s(literal 0 binary64) (sqrt.f64 re))) #s(literal 1/2 binary64)))
(neg.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 im (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))))
(neg.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) im) (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(neg.f64 (/.f64 (*.f64 im #s(literal -1/2 binary64)) (sqrt.f64 re)))
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
(/.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 re) im)))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im)) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im))))
(/.f64 (*.f64 im #s(literal -1/2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (neg.f64 (*.f64 im #s(literal -1/2 binary64))) (sqrt.f64 re))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) #s(literal 1 binary64)) (sqrt.f64 re))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) im)) (sqrt.f64 re))
(pow.f64 (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im)) #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))
(*.f64 #s(literal -1/2 binary64) (/.f64 im (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) im))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)))
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 (*.f64 (pow.f64 re #s(literal -1/4 binary64)) #s(literal 1/2 binary64)) im))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
(*.f64 (*.f64 im #s(literal -1/2 binary64)) (/.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(*.f64 (pow.f64 re #s(literal -1/8 binary64)) (*.f64 (pow.f64 re #s(literal -1/8 binary64)) (*.f64 (*.f64 (pow.f64 re #s(literal -1/4 binary64)) #s(literal 1/2 binary64)) im)))
(*.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) (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 (/.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 (pow.f64 re #s(literal -1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) #s(literal 1 binary64)) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (*.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1/4 binary64)))) (pow.f64 re #s(literal -1/8 binary64))) (pow.f64 re #s(literal -1/8 binary64)))
(exp.f64 (*.f64 #s(literal -1/2 binary64) (log.f64 re)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 re)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 re #s(literal -1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 re re)) #s(literal -1/4 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 re) #s(literal 1/2 binary64)) #s(literal -1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 re) #s(literal -1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (+.f64 (*.f64 (log.f64 re) #s(literal -1/4 binary64)) (*.f64 (log.f64 re) #s(literal -1/4 binary64))))
(exp.f64 (neg.f64 (*.f64 (log.f64 re) #s(literal 1/2 binary64))))
(neg.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 re))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(pow.f64 re #s(literal -1/2 binary64))
(pow.f64 (sqrt.f64 re) #s(literal -1 binary64))
(pow.f64 (pow.f64 re #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 re re) #s(literal -1/4 binary64))
(pow.f64 (exp.f64 #s(literal -1/2 binary64)) (log.f64 re))
(*.f64 #s(literal 1 binary64) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (pow.f64 re #s(literal -1/4 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(*.f64 (pow.f64 re #s(literal -1/8 binary64)) (*.f64 (pow.f64 re #s(literal -1/8 binary64)) (pow.f64 re #s(literal -1/4 binary64))))
(*.f64 (pow.f64 (pow.f64 re #s(literal 1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 re #s(literal 1/4 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 re) #s(literal -1/2 binary64)) (pow.f64 (sqrt.f64 re) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 re #s(literal -1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 re #s(literal -1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (pow.f64 re #s(literal -1/4 binary64))) (pow.f64 re #s(literal -1/4 binary64)))
(*.f64 (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (pow.f64 re #s(literal -1/8 binary64))) (pow.f64 re #s(literal -1/8 binary64)))
(*.f64 #s(literal 1/2 binary64) im)
(*.f64 im #s(literal 1/2 binary64))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 re #s(literal -2 binary64)))))
(exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 4 binary64) (*.f64 re re))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (*.f64 re #s(literal -2 binary64))) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (+.f64 (*.f64 (log.f64 (*.f64 re #s(literal -2 binary64))) #s(literal 1/4 binary64)) (*.f64 (log.f64 (*.f64 re #s(literal -2 binary64))) #s(literal 1/4 binary64))))
(sqrt.f64 (*.f64 re #s(literal -2 binary64)))
(pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 #s(literal 4 binary64) (*.f64 re re)) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (*.f64 re #s(literal -2 binary64))))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 re))
(*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 re #s(literal 1/4 binary64)) (*.f64 (pow.f64 re #s(literal 1/4 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 re #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64)) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64)) (sqrt.f64 re)))
(*.f64 (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 re #s(literal 1/4 binary64)) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/8 binary64)) (*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/8 binary64)) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (*.f64 (sqrt.f64 re) (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 re #s(literal 1/4 binary64))) (pow.f64 re #s(literal 1/4 binary64)))
(*.f64 (*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)) (pow.f64 re #s(literal 1/4 binary64))) (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)) (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64))) (pow.f64 re #s(literal 1/4 binary64)))
(*.f64 (*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/8 binary64))) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/8 binary64)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (sqrt.f64 re) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 re #s(literal 1/4 binary64)) (*.f64 (pow.f64 re #s(literal 1/4 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (pow.f64 re #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 re #s(literal 1/4 binary64)) (*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/8 binary64)) (*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/8 binary64)) (*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64)))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64))) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64))) (*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 re))
(*.f64 (pow.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64))) (*.f64 (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/2 binary64))) (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64))) (pow.f64 re #s(literal 1/4 binary64))) (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64))) (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64))) (pow.f64 re #s(literal 1/4 binary64)))
(*.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/4 binary64))) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/8 binary64))) (pow.f64 (*.f64 re #s(literal -2 binary64)) #s(literal 1/8 binary64)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal -2 binary64) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(+.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 re (/.f64 im re)))
(+.f64 (/.f64 re (/.f64 im re)) (*.f64 re #s(literal -2 binary64)))
(-.f64 (/.f64 (*.f64 #s(literal 4 binary64) (*.f64 re re)) (*.f64 re (-.f64 #s(literal -2 binary64) (/.f64 re im)))) (/.f64 (/.f64 (*.f64 re (*.f64 re re)) (/.f64 im (/.f64 re im))) (*.f64 re (-.f64 #s(literal -2 binary64) (/.f64 re im)))))
(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 #s(literal -2 binary64) re (/.f64 re (/.f64 im re)))
(fma.f64 (/.f64 re im) re (*.f64 re #s(literal -2 binary64)))
(fma.f64 (*.f64 re re) (/.f64 #s(literal 1 binary64) im) (*.f64 re #s(literal -2 binary64)))
(/.f64 re (/.f64 #s(literal 1 binary64) (+.f64 #s(literal -2 binary64) (/.f64 re im))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 re re)) (*.f64 (/.f64 re (/.f64 im re)) (-.f64 (/.f64 re (/.f64 im re)) (*.f64 re #s(literal -2 binary64))))) (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 re (*.f64 re re))) (*.f64 (/.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 im re)) (*.f64 re (*.f64 re re))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (-.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 re (-.f64 #s(literal -2 binary64) (/.f64 re im))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 4 binary64) (/.f64 (+.f64 (/.f64 re im) #s(literal 2 binary64)) (/.f64 im re))) (*.f64 re (+.f64 #s(literal -8 binary64) (/.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 im re))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (-.f64 #s(literal 4 binary64) (/.f64 (/.f64 re im) (/.f64 im re))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 4 binary64) (/.f64 (+.f64 (/.f64 re im) #s(literal 2 binary64)) (/.f64 im re))) (*.f64 (+.f64 #s(literal -8 binary64) (/.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 im re))) re)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 (-.f64 #s(literal 4 binary64) (/.f64 (/.f64 re im) (/.f64 im re))) re)))
(/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 re (*.f64 re re))) (*.f64 (/.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 im re)) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 re re)) (*.f64 (/.f64 re (/.f64 im re)) (-.f64 (/.f64 re (/.f64 im re)) (*.f64 re #s(literal -2 binary64))))))
(/.f64 (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 re (-.f64 #s(literal -2 binary64) (/.f64 re im)))) (*.f64 re (-.f64 #s(literal -2 binary64) (/.f64 re im))))
(/.f64 (*.f64 re (+.f64 #s(literal -8 binary64) (/.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 im re)))) (+.f64 #s(literal 4 binary64) (/.f64 (+.f64 (/.f64 re im) #s(literal 2 binary64)) (/.f64 im re))))
(/.f64 (*.f64 re (+.f64 #s(literal -8 binary64) (/.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 im re)))) (+.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (-.f64 #s(literal 4 binary64) (/.f64 #s(literal -2 binary64) (/.f64 im re)))))
(/.f64 (*.f64 re (-.f64 #s(literal 4 binary64) (/.f64 (/.f64 re im) (/.f64 im re)))) (-.f64 #s(literal -2 binary64) (/.f64 re im)))
(/.f64 (*.f64 (+.f64 #s(literal -8 binary64) (/.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 im re))) re) (+.f64 #s(literal 4 binary64) (/.f64 (+.f64 (/.f64 re im) #s(literal 2 binary64)) (/.f64 im re))))
(/.f64 (*.f64 (+.f64 #s(literal -8 binary64) (/.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 im re))) re) (+.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (-.f64 #s(literal 4 binary64) (/.f64 #s(literal -2 binary64) (/.f64 im re)))))
(/.f64 (*.f64 (-.f64 #s(literal 4 binary64) (/.f64 (/.f64 re im) (/.f64 im re))) re) (-.f64 #s(literal -2 binary64) (/.f64 re im)))
(/.f64 (neg.f64 (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 re (*.f64 re re))) (*.f64 (/.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 im re)) (*.f64 re (*.f64 re re))))) (neg.f64 (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 re re)) (*.f64 (/.f64 re (/.f64 im re)) (-.f64 (/.f64 re (/.f64 im re)) (*.f64 re #s(literal -2 binary64)))))))
(/.f64 (neg.f64 (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 re (-.f64 #s(literal -2 binary64) (/.f64 re im))))) (neg.f64 (*.f64 re (-.f64 #s(literal -2 binary64) (/.f64 re im)))))
(/.f64 (neg.f64 (*.f64 re (+.f64 #s(literal -8 binary64) (/.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 im re))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 4 binary64) (/.f64 (+.f64 (/.f64 re im) #s(literal 2 binary64)) (/.f64 im re)))))
(/.f64 (neg.f64 (*.f64 re (-.f64 #s(literal 4 binary64) (/.f64 (/.f64 re im) (/.f64 im re))))) (+.f64 #s(literal 2 binary64) (/.f64 re im)))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal -8 binary64) (/.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 im re))) re)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 4 binary64) (/.f64 (+.f64 (/.f64 re im) #s(literal 2 binary64)) (/.f64 im re)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 4 binary64) (/.f64 (/.f64 re im) (/.f64 im re))) re)) (+.f64 #s(literal 2 binary64) (/.f64 re im)))
(/.f64 (+.f64 (*.f64 (/.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 im re)) (*.f64 re (*.f64 re re))) (*.f64 #s(literal -8 binary64) (*.f64 re (*.f64 re re)))) (+.f64 (/.f64 (*.f64 re (*.f64 re re)) (/.f64 im (/.f64 re im))) (-.f64 (*.f64 #s(literal 4 binary64) (*.f64 re re)) (*.f64 (/.f64 re (/.f64 im re)) (*.f64 re #s(literal -2 binary64))))))
(/.f64 (-.f64 (/.f64 (*.f64 re (*.f64 re re)) (/.f64 im (/.f64 re im))) (*.f64 #s(literal 4 binary64) (*.f64 re re))) (-.f64 (/.f64 re (/.f64 im re)) (*.f64 re #s(literal -2 binary64))))
(/.f64 (*.f64 re (+.f64 #s(literal 8 binary64) (neg.f64 (/.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 im re))))) (-.f64 #s(literal 0 binary64) (+.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 im) (/.f64 im re)))) (+.f64 #s(literal 2 binary64) (/.f64 re im)))
(/.f64 (*.f64 re (+.f64 (/.f64 (/.f64 re im) (/.f64 im re)) #s(literal -4 binary64))) (+.f64 (/.f64 re im) #s(literal 2 binary64)))
(/.f64 (*.f64 (+.f64 #s(literal 8 binary64) (neg.f64 (/.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 im re)))) re) (-.f64 #s(literal 0 binary64) (+.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 im) (/.f64 im re))) re) (+.f64 #s(literal 2 binary64) (/.f64 re im)))
(/.f64 (*.f64 (+.f64 (/.f64 (/.f64 re im) (/.f64 im re)) #s(literal -4 binary64)) re) (+.f64 (/.f64 re im) #s(literal 2 binary64)))
(*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))
(*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) re)
(*.f64 (+.f64 #s(literal -8 binary64) (/.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 im re))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 4 binary64) (/.f64 (+.f64 (/.f64 re im) #s(literal 2 binary64)) (/.f64 im re)))) re))
(*.f64 (-.f64 #s(literal 4 binary64) (/.f64 (/.f64 re im) (/.f64 im re))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal -2 binary64) (/.f64 re im))) re))
(*.f64 (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 re (*.f64 re re))) (*.f64 (/.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 im re)) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 4 binary64) (*.f64 re re)) (*.f64 (/.f64 re (/.f64 im re)) (-.f64 (/.f64 re (/.f64 im re)) (*.f64 re #s(literal -2 binary64)))))))
(*.f64 (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 re (-.f64 #s(literal -2 binary64) (/.f64 re im)))) (/.f64 #s(literal 1 binary64) (*.f64 re (-.f64 #s(literal -2 binary64) (/.f64 re im)))))
(*.f64 (*.f64 re (+.f64 #s(literal -8 binary64) (/.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 im re)))) (/.f64 #s(literal 1 binary64) (+.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 im) (/.f64 im re)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal -2 binary64) (/.f64 re im))))
(*.f64 (*.f64 (+.f64 #s(literal -8 binary64) (/.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 im re))) re) (/.f64 #s(literal 1 binary64) (+.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 im) (/.f64 im re))) re) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal -2 binary64) (/.f64 re im))))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 #s(literal -2 binary64)) #s(literal 1/2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(sqrt.f64 #s(literal -2 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(pow.f64 #s(literal -2 binary64) #s(literal 1/2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 #s(literal -2 binary64) #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))
(pow.f64 (exp.f64 (log.f64 #s(literal -2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 (log.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(literal -2 binary64) #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 #s(literal 2 binary64) #s(literal 1/4 binary64)))

simplify355.0ms (3.6%)

Algorithm
1×egg-herbie
Rules
5916×*-lowering-*.f32
5916×*-lowering-*.f64
3710×+-lowering-+.f64
3710×+-lowering-+.f32
1224×distribute-rgt-in
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
03392709
111552523
244902449
083132449
Stop Event
1×iter limit
1×node limit
Counts
276 → 276
Calls
Call 1
Inputs
(* 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)))
(* 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 -2)))
(* 1/2 (* (sqrt re) (sqrt -2)))
(* 1/2 (* (sqrt re) (sqrt -2)))
(* 1/2 (* (sqrt re) (sqrt -2)))
(* 1/2 (* (sqrt re) (sqrt -2)))
(* 1/2 (* (sqrt re) (sqrt -2)))
(* 1/2 (* (sqrt re) (sqrt -2)))
(* 1/2 (* (sqrt re) (sqrt -2)))
(* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* (sqrt re) (sqrt -2))
(* (sqrt re) (sqrt -2))
(* (sqrt re) (sqrt -2))
(* (sqrt re) (sqrt -2))
(* (sqrt re) (sqrt -2))
(* (sqrt re) (sqrt -2))
(* (sqrt re) (sqrt -2))
(* (sqrt re) (sqrt -2))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* -2 re)
(* -2 re)
(* -2 re)
(* -2 re)
(* -2 re)
(* -2 re)
(* -2 re)
(* -2 re)
(* -2 re)
(* -2 re)
(* -2 re)
(* -2 re)
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(* 1/2 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 -2))
(* (sqrt re) (sqrt -2))
(* (sqrt re) (sqrt -2))
(* (sqrt re) (sqrt -2))
(* (sqrt re) (sqrt -2))
(* (sqrt re) (sqrt -2))
(* (sqrt re) (sqrt -2))
(* (sqrt re) (sqrt -2))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* 1/2 (* (sqrt re) (* (sqrt -2) (sqrt 2))))
(* 1/2 (* (sqrt re) (* (sqrt -2) (sqrt 2))))
(* 1/2 (* (sqrt re) (* (sqrt -2) (sqrt 2))))
(* 1/2 (* (sqrt re) (* (sqrt -2) (sqrt 2))))
(* 1/2 (* (sqrt re) (* (sqrt -2) (sqrt 2))))
(* 1/2 (* (sqrt re) (* (sqrt -2) (sqrt 2))))
(* 1/2 (* (sqrt re) (* (sqrt -2) (sqrt 2))))
(* 1/2 (* (sqrt re) (* (sqrt -2) (sqrt 2))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -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))
Outputs
(* 1/2 (* (sqrt (/ 1 im)) re))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 re #s(literal 1/2 binary64)))
(/ (+ (* -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 re (sqrt.f64 im)))) im)
(/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* -1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re)))))) im)
(/.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal -1/2 binary64) (*.f64 im im))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (+.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 im 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 re (sqrt.f64 im))) (*.f64 (*.f64 im im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal -1/2 binary64)) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re) (*.f64 #s(literal 1/4 binary64) im))))) im)
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 #s(literal 1/2 binary64) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (/.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal 1/2 binary64) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (/.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal 1/2 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 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (/.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (+.f64 (*.f64 (/.f64 (*.f64 re re) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/4 binary64)) (*.f64 (/.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/4 binary64)))))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)))
(* -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 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))) (-.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 (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 (/.f64 (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) (*.f64 im (*.f64 im im))))) re) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (*.f64 re re))))) (-.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 #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 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (/.f64 (*.f64 (sqrt.f64 im) (+.f64 (*.f64 (/.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -2 binary64))) #s(literal -1/4 binary64)) (*.f64 (/.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 im (*.f64 im im))))) (-.f64 #s(literal 0 binary64) im))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(+ (* -1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+.f64 (*.f64 (sqrt.f64 im) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal -1/2 binary64) (/.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 (sqrt.f64 im) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 re (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -1/2 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/4 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 (sqrt.f64 im) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 re (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -1/2 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/4 binary64)))) (*.f64 re (*.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -1/2 binary64) im)))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/8 binary64))))))
(* 1/2 (* (sqrt (/ 1 im)) re))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 re #s(literal 1/2 binary64)))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im)))))
(+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 re #s(literal 1/2 binary64))) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 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) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 im) (+.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal -1/2 binary64)) (*.f64 (/.f64 (*.f64 im #s(literal 1 binary64)) (*.f64 re re)) #s(literal 1/4 binary64))))))
(* 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) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (/.f64 (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 im #s(literal 1 binary64))) (*.f64 re re)) (/.f64 #s(literal 1/4 binary64) re))) (*.f64 (sqrt.f64 im) (+.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal -1/2 binary64)) (*.f64 (/.f64 (*.f64 im #s(literal 1 binary64)) (*.f64 re re)) #s(literal 1/4 binary64))))))
(* -1/2 (* (sqrt (/ 1 im)) re))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal -1/2 binary64) re))
(* -1 (* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im))))))
(+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal -1/2 binary64) re)) (-.f64 #s(literal 0 binary64) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im))))
(* -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 (sqrt.f64 im) (+.f64 (*.f64 (/.f64 (*.f64 im #s(literal 1 binary64)) re) #s(literal -1/4 binary64)) #s(literal 1/2 binary64))) 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 im #s(literal 1 binary64))) (/.f64 (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 im #s(literal 1 binary64))) 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 re (sqrt.f64 im)) (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 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal -1 binary64) (*.f64 im im))) (*.f64 (sqrt.f64 im) (+.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 im im)) 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)
(/.f64 (+.f64 (*.f64 re (sqrt.f64 im)) (*.f64 im (*.f64 im (-.f64 (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re) (*.f64 #s(literal 1/2 binary64) im)) (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 (/.f64 #s(literal 1 binary64) im)) (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) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (/.f64 (*.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (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))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (+.f64 (*.f64 (/.f64 (*.f64 re re) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 (/.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/2 binary64))))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 #s(literal -1 binary64)))))
(* -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 -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 -2) (sqrt -1)))))))
(*.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 #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 #s(literal 0 binary64) re)) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (*.f64 re re))))) (-.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 -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 (*.f64 (sqrt.f64 im) (+.f64 (*.f64 (/.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -2 binary64))) #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (*.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -1/2 binary64) im)) (/.f64 re (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -1/2 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 re (*.f64 #s(literal 1/4 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 #s(literal -1/2 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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re) (-.f64 #s(literal 0 binary64) (sqrt.f64 im)))
(* 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 (sqrt.f64 im) (+.f64 (/.f64 #s(literal -1 binary64) re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im #s(literal 1 binary64)) (*.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 (*.f64 (sqrt.f64 im) (+.f64 (/.f64 #s(literal -1 binary64) re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im #s(literal 1 binary64)) (*.f64 re re))))) (+.f64 (*.f64 (/.f64 (*.f64 im #s(literal 1 binary64)) (*.f64 re (*.f64 re re))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (*.f64 im im))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))
(* -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 #s(literal 0 binary64) re)) (-.f64 #s(literal 0 binary64) (sqrt.f64 im)))
(* -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 binary64) (*.f64 (/.f64 (*.f64 im #s(literal 1 binary64)) re) #s(literal -1/2 binary64)))) 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 im #s(literal 1 binary64))) (/.f64 (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 im #s(literal 1 binary64))) 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 re (+.f64 (*.f64 im #s(literal -2 binary64)) re)) im)
(/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)
(/.f64 (+.f64 (*.f64 re (+.f64 (*.f64 im #s(literal -2 binary64)) re)) (*.f64 im (*.f64 im #s(literal 2 binary64)))) im)
(/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)
(/.f64 (+.f64 (*.f64 re (+.f64 (*.f64 im #s(literal -2 binary64)) re)) (*.f64 im (*.f64 im #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 re im) (+.f64 #s(literal -2 binary64) (/.f64 re im)))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 #s(literal 2 binary64) (*.f64 (/.f64 re im) (+.f64 #s(literal -2 binary64) (/.f64 re im)))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* -1 (* im (- (* 2 (/ re im)) 2)))
(*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 re #s(literal 2 binary64)) im)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))
(*.f64 (-.f64 #s(literal -2 binary64) (/.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) im)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))
(*.f64 (-.f64 #s(literal -2 binary64) (/.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re 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 im) 2)))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(*.f64 re (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))
(* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (*.f64 (/.f64 #s(literal 2 binary64) re) (+.f64 (/.f64 im re) #s(literal -1 binary64)))))
(* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (*.f64 (/.f64 #s(literal 2 binary64) re) (+.f64 (/.f64 im re) #s(literal -1 binary64)))))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(*.f64 re (*.f64 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)))
(* 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 -2)))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(* 1/2 (* (sqrt re) (sqrt -2)))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(* 1/2 (* (sqrt re) (sqrt -2)))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(* 1/2 (* (sqrt re) (sqrt -2)))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(* 1/2 (* (sqrt re) (sqrt -2)))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(* 1/2 (* (sqrt re) (sqrt -2)))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(* 1/2 (* (sqrt re) (sqrt -2)))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(* 1/2 (* (sqrt re) (sqrt -2)))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 re)))
(* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 re)))
(* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 re)))
(* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 re)))
(* (sqrt re) (sqrt -2))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 re))
(* (sqrt re) (sqrt -2))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 re))
(* (sqrt re) (sqrt -2))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 re))
(* (sqrt re) (sqrt -2))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 re))
(* (sqrt re) (sqrt -2))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 re))
(* (sqrt re) (sqrt -2))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 re))
(* (sqrt re) (sqrt -2))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 re))
(* (sqrt re) (sqrt -2))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 re))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -2 re)
(*.f64 re #s(literal -2 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 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(sqrt.f64 re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(sqrt.f64 re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(sqrt.f64 re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(sqrt.f64 re)
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal -1/2 binary64) im))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal -1/2 binary64) im))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal -1/2 binary64) im))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal -1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 1/2 binary64) im))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(neg.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 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 -2))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 re))
(* (sqrt re) (sqrt -2))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 re))
(* (sqrt re) (sqrt -2))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 re))
(* (sqrt re) (sqrt -2))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 re))
(* (sqrt re) (sqrt -2))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 re))
(* (sqrt re) (sqrt -2))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 re))
(* (sqrt re) (sqrt -2))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 re))
(* (sqrt re) (sqrt -2))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 re))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(* 1/2 (* (sqrt re) (* (sqrt -2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(* 1/2 (* (sqrt re) (* (sqrt -2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(* 1/2 (* (sqrt re) (* (sqrt -2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(* 1/2 (* (sqrt re) (* (sqrt -2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(* 1/2 (* (sqrt re) (* (sqrt -2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(* 1/2 (* (sqrt re) (* (sqrt -2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(* 1/2 (* (sqrt re) (* (sqrt -2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(* 1/2 (* (sqrt re) (* (sqrt -2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 re)) #s(literal -1 binary64))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 re)) #s(literal -1 binary64))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 re)) #s(literal -1 binary64))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 re)) #s(literal -1 binary64))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* re (- (/ re im) 2))
(*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))
(* re (- (/ re im) 2))
(*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))
(* re (- (/ re im) 2))
(*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(*.f64 re (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(*.f64 re (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(*.f64 re (*.f64 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 re (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(*.f64 re (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re))))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(*.f64 re (*.f64 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 re (+.f64 (*.f64 im #s(literal -2 binary64)) re)) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/.f64 (*.f64 re (+.f64 (*.f64 im #s(literal -2 binary64)) re)) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/.f64 (*.f64 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 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))
(+ (* -2 re) (/ (pow re 2) im))
(*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))
(+ (* -2 re) (/ (pow re 2) im))
(*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(+ (* -2 re) (/ (pow re 2) im))
(*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))
(+ (* -2 re) (/ (pow re 2) im))
(*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))
(+ (* -2 re) (/ (pow re 2) im))
(*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))

eval106.0ms (1.1%)

Compiler

Compiled 12583 to 1508 computations (88% saved)

prune164.0ms (1.6%)

Pruning

15 alts after pruning (5 fresh and 10 done)

PrunedKeptTotal
New6794683
Fresh112
Picked145
Done167
Total68215697
Accuracy
100.0%
Counts
697 → 15
Alt Table
Click to see full alt table
StatusAccuracyProgram
28.4%
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
✓28.4%
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) im))
28.4%
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
28.3%
(*.f64 (*.f64 (*.f64 im (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
21.5%
(*.f64 (sqrt.f64 (*.f64 re #s(literal -2 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
✓28.4%
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
54.7%
(*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))
✓55.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))))))
✓5.6%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -2 binary64))))
✓21.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64))))
✓56.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))))
✓55.4%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
✓78.5%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
✓56.9%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re))))
Compiler

Compiled 568 to 288 computations (49.3% saved)

regimes219.0ms (2.2%)

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

7 calls:

158.0ms
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
13.0ms
(*.f64 im im)
10.0ms
(-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
10.0ms
im
9.0ms
re
Results
AccuracySegmentsBranch
88.2%2re
78.5%1im
90.3%2(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))
90.3%2(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
89.3%2(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
89.3%2(-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
78.5%1(*.f64 im im)
Compiler

Compiled 69 to 45 computations (34.8% saved)

regimes21.0ms (0.2%)

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

3 calls:

7.0ms
re
6.0ms
im
5.0ms
(*.f64 im im)
Results
AccuracySegmentsBranch
65.9%2im
65.1%2(*.f64 im im)
79.5%3re
Compiler

Compiled 11 to 7 computations (36.4% saved)

regimes44.0ms (0.4%)

Counts
17 → 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 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -2 binary64))))
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
(*.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) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))
(*.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 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re))))
(*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.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 #s(literal 2 binary64) (-.f64 (*.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)) re))))
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 1/2 binary64))))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 2 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 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
Calls

1 calls:

43.0ms
re
Results
AccuracySegmentsBranch
79.3%3re
Compiler

Compiled 3 to 2 computations (33.3% saved)

regimes5.0ms (0%)

Counts
11 → 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 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -2 binary64))))
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
(*.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) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) 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 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))))
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
Calls

1 calls:

4.0ms
re
Results
AccuracySegmentsBranch
79.2%3re
Compiler

Compiled 3 to 2 computations (33.3% saved)

regimes47.0ms (0.5%)

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

1 calls:

46.0ms
re
Results
AccuracySegmentsBranch
79.2%3re
Compiler

Compiled 3 to 2 computations (33.3% saved)

regimes3.0ms (0%)

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

1 calls:

3.0ms
re
Results
AccuracySegmentsBranch
79.2%3re
Compiler

Compiled 3 to 2 computations (33.3% saved)

regimes4.0ms (0%)

Counts
3 → 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 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -2 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:

2.0ms
re
2.0ms
im
Results
AccuracySegmentsBranch
60.8%2im
65.4%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
55.4%1im
55.4%1re
Compiler

Compiled 6 to 4 computations (33.3% saved)

bsearch0.0ms (0%)

Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
0.0
7.504364659851757e-143
Compiler

Compiled 22 to 16 computations (27.3% saved)

bsearch84.0ms (0.8%)

Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
39.0ms
1.7022218214775602e+83
7.371036457771996e+85
39.0ms
-0.026367336085858884
-3.7490051504447147e-7
Results
23.0ms195×0valid
19.0ms53×2valid
4.0ms18×1valid
3.0ms6×3valid
Compiler

Compiled 491 to 392 computations (20.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 33.0ms
ival-mult: 14.0ms (42.4% of total)
ival-sqrt: 11.0ms (33.3% of total)
backward-pass: 3.0ms (9.1% of total)
ival-add: 2.0ms (6.1% of total)
ival-sub: 2.0ms (6.1% of total)
const: 1.0ms (3% of total)

bsearch66.0ms (0.7%)

Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
37.0ms
1.7022218214775602e+83
7.371036457771996e+85
21.0ms
-0.026367336085858884
-3.7490051504447147e-7
Results
21.0ms62×2valid
19.0ms184×0valid
4.0ms21×1valid
2.0ms5×3valid
Compiler

Compiled 464 to 365 computations (21.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 31.0ms
ival-mult: 14.0ms (44.5% of total)
ival-sqrt: 9.0ms (28.6% of total)
backward-pass: 3.0ms (9.5% of total)
ival-add: 2.0ms (6.4% of total)
ival-sub: 2.0ms (6.4% of total)
const: 1.0ms (3.2% of total)

bsearch58.0ms (0.6%)

Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
33.0ms
1.7022218214775602e+83
7.371036457771996e+85
20.0ms
-0.026367336085858884
-3.7490051504447147e-7
Results
20.0ms205×0valid
16.0ms50×2valid
3.0ms14×1valid
1.0ms3×3valid
Compiler

Compiled 430 to 348 computations (19.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 24.0ms
ival-mult: 11.0ms (45.2% of total)
ival-sqrt: 6.0ms (24.6% of total)
backward-pass: 2.0ms (8.2% of total)
ival-sub: 2.0ms (8.2% of total)
ival-add: 2.0ms (8.2% of total)
const: 1.0ms (4.1% of total)

bsearch76.0ms (0.8%)

Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
47.0ms
1.7022218214775602e+83
7.371036457771996e+85
22.0ms
-0.026367336085858884
-3.7490051504447147e-7
Results
28.0ms49×2valid
21.0ms185×0valid
5.0ms13×3valid
5.0ms25×1valid
Compiler

Compiled 362 to 297 computations (18% saved)

Precisions
Click to see histograms. Total time spent on operations: 31.0ms
ival-mult: 15.0ms (48.7% of total)
ival-sqrt: 7.0ms (22.7% of total)
backward-pass: 3.0ms (9.7% of total)
ival-add: 2.0ms (6.5% of total)
ival-sub: 2.0ms (6.5% of total)
const: 1.0ms (3.2% of total)

bsearch78.0ms (0.8%)

Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
46.0ms
1.7022218214775602e+83
7.371036457771996e+85
26.0ms
-0.026367336085858884
-3.7490051504447147e-7
Results
33.0ms188×0valid
23.0ms56×2valid
4.0ms21×1valid
3.0ms7×3valid
Compiler

Compiled 328 to 280 computations (14.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 47.0ms
ival-mult: 27.0ms (57% of total)
ival-sqrt: 13.0ms (27.4% of total)
backward-pass: 3.0ms (6.3% of total)
ival-add: 2.0ms (4.2% of total)
ival-sub: 2.0ms (4.2% of total)
const: 1.0ms (2.1% of total)

bsearch23.0ms (0.2%)

Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
21.0ms
-0.026367336085858884
-3.7490051504447147e-7
Results
15.0ms144×0valid
Compiler

Compiled 184 to 160 computations (13% saved)

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

simplify12.0ms (0.1%)

Algorithm
1×egg-herbie
Rules
36×*-commutative_binary64
16×+-commutative_binary64
8×sub-neg_binary64
2×neg-sub0_binary64
2×neg-mul-1_binary64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
081211
1106211
2112211
3114211
4115211
Stop Event
1×saturated
Calls
Call 1
Inputs
(if (<=.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #s(literal 0 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))))
(if (<=.f64 re #s(literal -734987459186865/72057594037927936 binary64)) (*.f64 (sqrt.f64 (*.f64 re #s(literal -2 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (if (<=.f64 re #s(literal 174999999999999988541199398449770087192909677626106685082441788033616673570073608192 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) (/.f64 im (sqrt.f64 re)))))
(if (<=.f64 re #s(literal -146997491837373/144115188075855872 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 172000000000000005837945009069036984029823652633539169188017248250203504323162275840 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) (/.f64 im (sqrt.f64 re)))))
(if (<=.f64 re #s(literal -5902958103587057/147573952589676412928 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 7500000000000000109730214230061547732275322408984912944589580903773472731883611619328 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))))
(if (<=.f64 re #s(literal -7032821178101767/1152921504606846976 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 370000000000000023530441395674932963475150043987114184617247043200089362074550927360 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))))
(if (<=.f64 re #s(literal -2508757194024499/73786976294838206464 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 370000000000000023530441395674932963475150043987114184617247043200089362074550927360 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))))
(if (<=.f64 re #s(literal -5718490662849961/36893488147419103232 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 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))) #s(literal 0 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))))
(if (<=.f64 re #s(literal -734987459186865/72057594037927936 binary64)) (*.f64 (sqrt.f64 (*.f64 re #s(literal -2 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (if (<=.f64 re #s(literal 174999999999999988541199398449770087192909677626106685082441788033616673570073608192 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) (/.f64 im (sqrt.f64 re)))))
(if (<=.f64 re #s(literal -734987459186865/72057594037927936 binary64)) (*.f64 (sqrt.f64 (*.f64 re #s(literal -2 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (if (<=.f64 re #s(literal 174999999999999988541199398449770087192909677626106685082441788033616673570073608192 binary64)) (*.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 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))))
(if (<=.f64 re #s(literal -146997491837373/144115188075855872 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 172000000000000005837945009069036984029823652633539169188017248250203504323162275840 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) (/.f64 im (sqrt.f64 re)))))
(if (<=.f64 re #s(literal -146997491837373/144115188075855872 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 172000000000000005837945009069036984029823652633539169188017248250203504323162275840 binary64)) (*.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 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))))
(if (<=.f64 re #s(literal -5902958103587057/147573952589676412928 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 7500000000000000109730214230061547732275322408984912944589580903773472731883611619328 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im))))) (*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))))
(if (<=.f64 re #s(literal -7032821178101767/1152921504606846976 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 370000000000000023530441395674932963475150043987114184617247043200089362074550927360 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re)))) (*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))))
(if (<=.f64 re #s(literal -2508757194024499/73786976294838206464 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 370000000000000023530441395674932963475150043987114184617247043200089362074550927360 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))))
(if (<=.f64 re #s(literal -2508757194024499/73786976294838206464 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 370000000000000023530441395674932963475150043987114184617247043200089362074550927360 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) im))) (*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))))
(if (<=.f64 re #s(literal -5718490662849961/36893488147419103232 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 -5718490662849961/36893488147419103232 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 (18.2%)

Rules
7526×*-lowering-*.f32
7526×*-lowering-*.f64
6836×*-lowering-*.f32
6836×*-lowering-*.f64
5224×+-lowering-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01210
12110
23410
35410
48410
513110
624210
741210
866410
990410
10120310
11142810
12148910
13156910
14168310
15180810
16193210
17196510
18197310
0197310
05515460
119514904
274324858
082714858
01268
15267
240167
3493367
0859067
031124
1131112
277696
0875796
026100
111299
271298
0881798
011678158
142747694
085277694
Stop Event
1×fuel
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×saturated
Compiler

Compiled 610 to 393 computations (35.6% saved)

preprocess69.0ms (0.7%)

Remove

(abs im)

Compiler

Compiled 596 to 274 computations (54% saved)

end0.0ms (0%)

Profiling

Loading profile data...