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

Time bar (total: 9.1s)

analyze208.0ms (2.3%)

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: 103.0ms
ival-sqrt: 44.0ms (42.6% of total)
ival-mult: 42.0ms (40.7% of total)
ival-sub: 5.0ms (4.8% of total)
ival-add: 5.0ms (4.8% of total)
ival->: 4.0ms (3.9% of total)
const: 2.0ms (1.9% of total)
backward-pass: 0.0ms (0% of total)

sample1.8s (19.3%)

Results
669.0ms6298×0valid
387.0ms1173×2valid
215.0ms188×3valid
115.0ms597×1valid
Precisions
Click to see histograms. Total time spent on operations: 910.0ms
ival-mult: 337.0ms (37% of total)
ival-sqrt: 191.0ms (21% of total)
ival-add: 191.0ms (21% of total)
ival-sub: 76.0ms (8.3% of total)
backward-pass: 63.0ms (6.9% of total)
ival->: 34.0ms (3.7% of total)
const: 18.0ms (2% of total)
Bogosity

preprocess113.0ms (1.2%)

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)

explain218.0ms (2.4%)

FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1340-2(-2.661621620613819e-219 6.774223098386651e-157)(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
350-0-(-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
260-1(7.063828727595312e+126 7.173344349914493e-93)(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
86.0ms382×0valid
40.0ms82×2valid
13.0ms40×1valid
5.0ms8×3valid
Compiler

Compiled 173 to 38 computations (78% saved)

Precisions
Click to see histograms. Total time spent on operations: 47.0ms
ival-mult: 19.0ms (40.1% of total)
ival-sqrt: 13.0ms (27.4% of total)
backward-pass: 6.0ms (12.7% of total)
ival-sub: 4.0ms (8.4% of total)
ival-add: 4.0ms (8.4% of total)
const: 1.0ms (2.1% 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.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
▶40.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))))
Compiler

Compiled 29 to 21 computations (27.6% saved)

simplify60.0ms (0.7%)

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

localize222.0ms (2.4%)

Localize:

Found 8 expressions of interest:

NewMetricScoreProgram
✓accuracy100.0%
(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
✓accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
✓accuracy100.0%
(-.f64 (hypot.f64 re im) re)
✓accuracy100.0%
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))
✓accuracy100.0%
(-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
✓accuracy100.0%
(+.f64 (*.f64 re re) (*.f64 im im))
✓accuracy100.0%
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
✓accuracy64.7%
(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
Results
115.0ms65×5exit
75.0ms191×0valid
Compiler

Compiled 115 to 18 computations (84.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 76.0ms
ival-mult: 22.0ms (29.1% of total)
backward-pass: 17.0ms (22.5% of total)
compiled-spec: 13.0ms (17.2% of total)
ival-sqrt: 13.0ms (17.2% of total)
ival-sub: 6.0ms (7.9% of total)
ival-add: 4.0ms (5.3% of total)
const: 1.0ms (1.3% of total)

series25.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 (+ (* re re) (* im im))>
#<alt (- (sqrt (+ (* re re) (* im im))) re)>
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 (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))))>
#<alt im>
#<alt (+ im (* -1 re))>
#<alt (+ im (* re (- (* 1/2 (/ re im)) 1)))>
#<alt (+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))>
#<alt (* 1/2 (/ (pow im 2) re))>
#<alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)>
#<alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)>
#<alt (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)>
#<alt (* -2 re)>
#<alt (* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))>
#<alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))>
#<alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))>
#<alt (* 1/2 (/ (pow im 2) re))>
#<alt (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))>
#<alt im>
#<alt (* im (+ 1 (* -1 (/ re im))))>
#<alt (* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))>
#<alt (* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))>
#<alt (* -1 im)>
#<alt (* -1 (* im (+ 1 (/ re im))))>
#<alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))>
#<alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))>
Calls

60 calls:

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

rewrite304.0ms (3.3%)

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
0859267
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)
(+ (* re re) (* im im))
(- (sqrt (+ (* re re) (* im im))) re)
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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im))))))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))) (sqrt.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))))) (sqrt.f64 (+.f64 re (hypot.f64 re im))))
(*.f64 #s(literal 1/2 binary64) (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 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im))))))
(+.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re))
(+.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im))
(+.f64 (/.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) (neg.f64 (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))))
(+.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im))) (neg.f64 (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im)))))
(-.f64 (hypot.f64 re im) re)
(-.f64 (/.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(-.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im))) (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im))))
(-.f64 #s(literal 0 binary64) (-.f64 re (hypot.f64 re im)))
(-.f64 (+.f64 (hypot.f64 re im) #s(literal 0 binary64)) re)
(fma.f64 #s(literal -1 binary64) re (hypot.f64 re im))
(fma.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)) (-.f64 #s(literal 0 binary64) re))
(neg.f64 (/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))))
(neg.f64 (/.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) (+.f64 re (hypot.f64 re im)))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(neg.f64 (/.f64 (+.f64 (neg.f64 (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re re)) (+.f64 re (hypot.f64 re im))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re)) (*.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))) (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))))
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re)) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))) (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 re re) (+.f64 (*.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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re) (*.f64 (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re) (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re) (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re) (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re)) (*.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 (*.f64 re (*.f64 re (*.f64 re re))) re) re) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re) (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re)) (*.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 re) (*.f64 im im)) (+.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re) (*.f64 (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re) (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re) (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re) (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re)) (*.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 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re) (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re)) (*.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 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re) (*.f64 (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re) (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re) (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 re (*.f64 re (*.f64 re re))) re) re)))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re) (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re)) (*.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 (*.f64 re (*.f64 re (*.f64 re re))) re) re) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re) (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re)) (*.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 re) (*.f64 im im)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re) (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im))))) (+.f64 (*.f64 (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re) (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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)))))
(+.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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re)) (*.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))) (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))))
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re)) #s(literal 1 binary64)) (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) re) re)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))) (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) 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 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im))))))

simplify395.0ms (4.3%)

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)))))
(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))))
im
(+ im (* -1 re))
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(* 1/2 (/ (pow im 2) re))
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)
(* -2 re)
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(* 1/2 (/ (pow im 2) re))
(* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
im
(* im (+ 1 (* -1 (/ re im))))
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))
(* -1 im)
(* -1 (* im (+ 1 (/ re im))))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
Outputs
im
(+ im (* 1/2 (/ (pow re 2) im)))
(+.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)))
(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)))
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)))

eval92.0ms (1%)

Compiler

Compiled 20655 to 2201 computations (89.3% saved)

prune83.0ms (0.9%)

Pruning

10 alts after pruning (9 fresh and 1 done)

PrunedKeptTotal
New5969605
Fresh000
Picked112
Done000
Total59710607
Accuracy
99.8%
Counts
607 → 10
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶27.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)))
18.8%
(*.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)))))))
▶14.6%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 im im) re)))
57.1%
(*.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))))))
▶17.2%
(*.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))))
20.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64))))
▶57.1%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
✓78.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
▶58.6%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re))))
49.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))))))
Compiler

Compiled 302 to 223 computations (26.2% saved)

simplify189.0ms (2.1%)

Algorithm
1×egg-herbie
Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) #s(literal 1/2 binary64))
✓cost-diff0
(/.f64 #s(literal 1 binary64) re)
✓cost-diff0
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
✓cost-diff0
(*.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)))
✓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 im im)
✓cost-diff0
(/.f64 (*.f64 im im) re)
✓cost-diff0
(sqrt.f64 (/.f64 (*.f64 im im) re))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 im im) re)))
✓cost-diff0
(*.f64 im #s(literal 2 binary64))
✓cost-diff0
(sqrt.f64 (*.f64 im #s(literal 2 binary64)))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
✓cost-diff0
(-.f64 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))))
Rules
2690×fma-define
2092×fma-lowering-fma.f32
2092×fma-lowering-fma.f64
1912×fnmadd-define
1490×sum3-define
Iterations

Useful iterations: 5 (0.0ms)

IterNodesCost
033167
165162
2137162
3400162
41083159
52755156
64318156
75859156
08233156
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(* 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)))
1/2
(sqrt (* im 2))
(* im 2)
im
2
(* 1/2 (sqrt (/ (* im im) re)))
1/2
(sqrt (/ (* im im) re))
(/ (* im im) re)
(* im im)
im
re
(* 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
(* (sqrt (/ 1 re)) (* (* (sqrt 2) (* (sqrt 1/2) im)) 1/2))
(sqrt (/ 1 re))
(/ 1 re)
1
re
(* (* (sqrt 2) (* (sqrt 1/2) im)) 1/2)
(* (sqrt 2) (* (sqrt 1/2) im))
(sqrt 2)
2
(* (sqrt 1/2) im)
(sqrt 1/2)
1/2
im
Outputs
(* 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)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) im)))
1/2
#s(literal 1/2 binary64)
(sqrt (* im 2))
(sqrt.f64 (*.f64 #s(literal 2 binary64) im))
(* im 2)
(*.f64 #s(literal 2 binary64) im)
im
2
#s(literal 2 binary64)
(* 1/2 (sqrt (/ (* im im) re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 im im) re)))
1/2
#s(literal 1/2 binary64)
(sqrt (/ (* im im) re))
(sqrt.f64 (/.f64 (*.f64 im im) re))
(/ (* im im) re)
(/.f64 (*.f64 im im) re)
(* im im)
(*.f64 im im)
im
re
(* 1/2 (sqrt (* (+ (/ (* im im) (* re re)) 4) (- 0 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 (* (+ (/ (* im im) (* re re)) 4) (- 0 re)))
(sqrt.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)))
(* (+ (/ (* im im) (* re re)) 4) (- 0 re))
(-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))
(+ (/ (* im im) (* re re)) 4)
(+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64))
(/ (* im im) (* re re))
(/.f64 (*.f64 im im) (*.f64 re 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)
(* (sqrt (/ 1 re)) (* (* (sqrt 2) (* (sqrt 1/2) im)) 1/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)))))
(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 1/2) im)) 1/2)
(*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(* (sqrt 2) (* (sqrt 1/2) im))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(* (sqrt 1/2) im)
(*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
1/2
#s(literal 1/2 binary64)
im

localize160.0ms (1.8%)

Localize:

Found 19 expressions of interest:

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

Compiled 193 to 34 computations (82.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 48.0ms
ival-mult: 20.0ms (41.7% of total)
ival-sqrt: 13.0ms (27.1% of total)
ival-div: 8.0ms (16.7% of total)
ival-add: 4.0ms (8.3% of total)
ival-sub: 3.0ms (6.3% of total)
const: 1.0ms (2.1% of total)
backward-pass: 0.0ms (0% of total)

series70.0ms (0.8%)

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

99 calls:

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

rewrite281.0ms (3.1%)

Algorithm
1×batch-egg-rewrite
Rules
5336×*-lowering-*.f32
5336×*-lowering-*.f64
3214×/-lowering-/.f32
3214×/-lowering-/.f64
1320×+-lowering-+.f64
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
033125
1140114
2955111
08866111
Stop Event
1×iter limit
1×node limit
Counts
23 → 741
Calls
Call 1
Inputs
(* 1/2 (sqrt (* 2 (- im re))))
(sqrt (* 2 (- im re)))
(* 2 (- im re))
(- im re)
(* 1/2 (sqrt (* im 2)))
(sqrt (* im 2))
(* im 2)
(* 1/2 (sqrt (/ (* im im) re)))
(sqrt (/ (* im im) re))
(/ (* im im) re)
(* im 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 (/ 1 re)) (* (* (sqrt 2) (* (sqrt 1/2) im)) 1/2))
(sqrt (/ 1 re))
(/ 1 re)
(* (* (sqrt 2) (* (sqrt 1/2) im)) 1/2)
(* re re)
(sqrt 1/2)
(sqrt 2)
(* (sqrt 1/2) im)
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) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re))))
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (-.f64 im re)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 im re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 (-.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 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (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)))
(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 im re)))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re)) (-.f64 im re))) (pow.f64 (+.f64 im re) #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 im re)))))
(/.f64 (sqrt.f64 (*.f64 (+.f64 im re) (*.f64 #s(literal 2 binary64) (-.f64 im re)))) (pow.f64 (+.f64 im re) #s(literal 1/2 binary64)))
(/.f64 (*.f64 (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 (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)))
(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 (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 im re))))
(*.f64 (*.f64 (sqrt.f64 (-.f64 im re)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 #s(literal -2 binary64) re))
(+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)))
(+.f64 (*.f64 #s(literal -2 binary64) re) (*.f64 #s(literal 2 binary64) im))
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) im))
(fma.f64 #s(literal 2 binary64) im (*.f64 #s(literal -2 binary64) re))
(fma.f64 #s(literal 2 binary64) im (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)))
(fma.f64 im #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) re))
(fma.f64 im #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 im re)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 im re) (*.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re)) (-.f64 im re))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re))) (*.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 im re) (*.f64 (+.f64 im re) (*.f64 #s(literal 2 binary64) (-.f64 im re)))))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re))))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 im im) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (-.f64 #s(literal 0 binary64) re) im))))
(/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re)) (-.f64 im re)) (+.f64 im re))
(/.f64 (*.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) #s(literal 2 binary64)) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re))))
(/.f64 (*.f64 (+.f64 im re) (*.f64 #s(literal 2 binary64) (-.f64 im re))) (+.f64 im re))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))))
(/.f64 (neg.f64 (*.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re)) (-.f64 im re))) (-.f64 #s(literal 0 binary64) (+.f64 im re)))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))))
(/.f64 (neg.f64 (*.f64 (+.f64 im re) (*.f64 #s(literal 2 binary64) (-.f64 im re)))) (-.f64 #s(literal 0 binary64) (+.f64 im re)))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -2 binary64) re) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 #s(literal 2 binary64) im)) (-.f64 (*.f64 (*.f64 #s(literal -2 binary64) re) (*.f64 #s(literal -2 binary64) re)) (*.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 #s(literal -2 binary64) re)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 #s(literal 2 binary64) im)) (-.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 #s(literal 2 binary64) im) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 #s(literal 2 binary64) im)) (*.f64 (*.f64 #s(literal -2 binary64) re) (*.f64 #s(literal -2 binary64) re))) (-.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 #s(literal -2 binary64) re)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 #s(literal 2 binary64) im)) (*.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 #s(literal 2 binary64) im) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (neg.f64 (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))))
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) (+.f64 im re)))
(*.f64 #s(literal 2 binary64) (-.f64 im re))
(*.f64 (-.f64 im re) #s(literal 2 binary64))
(*.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))) #s(literal 2 binary64)))
(*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 im re)) #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))))
(*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re)) (-.f64 im re)) (/.f64 #s(literal 1 binary64) (+.f64 im re)))
(*.f64 (*.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))))
(*.f64 (*.f64 (+.f64 im re) (*.f64 #s(literal 2 binary64) (-.f64 im re))) (/.f64 #s(literal 1 binary64) (+.f64 im re)))
(+.f64 im (-.f64 #s(literal 0 binary64) re))
(+.f64 (-.f64 im re) #s(literal 0 binary64))
(+.f64 #s(literal 0 binary64) (-.f64 im re))
(+.f64 (-.f64 #s(literal 0 binary64) re) im)
(+.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 0 binary64) im))
(+.f64 (/.f64 (*.f64 im (*.f64 im im)) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))) (neg.f64 (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re))))))
(+.f64 (/.f64 (*.f64 im im) (+.f64 im re)) (neg.f64 (/.f64 (*.f64 re re) (+.f64 im re))))
(-.f64 im re)
(-.f64 (-.f64 im re) #s(literal 0 binary64))
(-.f64 #s(literal 0 binary64) (-.f64 re im))
(-.f64 (/.f64 (*.f64 im (*.f64 im im)) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))) (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))))
(-.f64 (/.f64 (*.f64 im im) (+.f64 im re)) (/.f64 (*.f64 re re) (+.f64 im re)))
(-.f64 (-.f64 im #s(literal 0 binary64)) re)
(fma.f64 #s(literal -1 binary64) re im)
(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)
(neg.f64 (/.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re))))))
(neg.f64 (/.f64 (-.f64 (*.f64 im im) (*.f64 re re)) (-.f64 #s(literal 0 binary64) (+.f64 im re))))
(neg.f64 (/.f64 (+.f64 (neg.f64 (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))))
(neg.f64 (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (*.f64 re re)) (+.f64 im re)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 im re)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 im re)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 im im) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (-.f64 #s(literal 0 binary64) re) im))) (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 im re))))
(/.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re))))
(/.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 im im) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (-.f64 #s(literal 0 binary64) re) im))))
(/.f64 (-.f64 (*.f64 im im) (*.f64 re re)) (+.f64 im re))
(/.f64 (+.f64 (neg.f64 (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))))
(/.f64 (+.f64 (neg.f64 (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re))) (neg.f64 (+.f64 (*.f64 im im) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (-.f64 #s(literal 0 binary64) re) im)))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (*.f64 re re)) (-.f64 #s(literal 0 binary64) (+.f64 im re)))
(/.f64 (-.f64 (*.f64 (*.f64 im (*.f64 im im)) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))) (*.f64 (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re))) (*.f64 re (*.f64 re re)))) (*.f64 (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re))) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))))
(/.f64 (-.f64 (*.f64 (*.f64 im im) (+.f64 im re)) (*.f64 (+.f64 im re) (*.f64 re re))) (*.f64 (+.f64 im re) (+.f64 im re)))
(/.f64 (neg.f64 (+.f64 (neg.f64 (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re)))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re))))))
(/.f64 (neg.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (*.f64 re re))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 im re))))
(/.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 (*.f64 im (*.f64 im im)) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))) (/.f64 (*.f64 im (*.f64 im im)) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re))))) (+.f64 (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))) (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re))))) (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))) (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 im im) (+.f64 im re)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 re re) (+.f64 im re)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 im im) (+.f64 im re)) (/.f64 (*.f64 im im) (+.f64 im re))) (+.f64 (*.f64 (/.f64 (*.f64 re re) (+.f64 im re)) (/.f64 (*.f64 re re) (+.f64 im re))) (*.f64 (/.f64 (*.f64 im im) (+.f64 im re)) (/.f64 (*.f64 re re) (+.f64 im re))))))
(/.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (-.f64 #s(literal 0 binary64) re) im))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 im (*.f64 im im)) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))) (/.f64 (*.f64 im (*.f64 im im)) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re))))) (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))) (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))))) (+.f64 (/.f64 (*.f64 im (*.f64 im im)) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))) (/.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 im im) (+.f64 im re)) (/.f64 (*.f64 im im) (+.f64 im re))) (*.f64 (/.f64 (*.f64 re re) (+.f64 im re)) (/.f64 (*.f64 re re) (+.f64 im re)))) (+.f64 (/.f64 (*.f64 im im) (+.f64 im re)) (/.f64 (*.f64 re re) (+.f64 im re))))
(/.f64 (*.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) #s(literal 1 binary64)) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re))))
(/.f64 (*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) #s(literal 1 binary64)) (+.f64 im re))
(pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 im re)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (-.f64 im re))
(*.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re)))))
(*.f64 (-.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 im im) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (-.f64 #s(literal 0 binary64) re) im)))))
(*.f64 (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re))) (*.f64 (-.f64 im re) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re))))))
(*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) (/.f64 #s(literal 1 binary64) (+.f64 im re)))
(*.f64 (+.f64 im re) (*.f64 (-.f64 im re) (/.f64 #s(literal 1 binary64) (+.f64 im re))))
(*.f64 (+.f64 (neg.f64 (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 im im) (*.f64 re (+.f64 im re))))))
(*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (*.f64 re re)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 im re))))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 im) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.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 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 im))
(*.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 #s(literal 2 binary64) im) #s(literal 1/4 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (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)))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) im)) #s(literal 1/2 binary64)))
(sqrt.f64 (*.f64 #s(literal 2 binary64) im))
(pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 #s(literal 2 binary64) im)) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 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 (*.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 #s(literal 2 binary64) im)
(*.f64 im #s(literal 2 binary64))
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im)))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) im)) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) im)) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) im)) (-.f64 #s(literal 0 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 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
(*.f64 im (*.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal 1/2 binary64)))
(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(*.f64 im (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))))
(*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re))))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) im))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64))) (sqrt.f64 re)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))))
(*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))))
(*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 re #s(literal -1/2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (*.f64 im (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 re #s(literal -1/2 binary64))))
(*.f64 (sqrt.f64 im) (*.f64 (pow.f64 (/.f64 im re) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 im (/.f64 re im)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (/.f64 im (/.f64 re im)) #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) 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 (*.f64 im (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64))) (sqrt.f64 re))))
(*.f64 (*.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) im)
(*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) (*.f64 im (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64))))
(*.f64 (*.f64 (/.f64 im (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (pow.f64 re #s(literal -1/2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (pow.f64 (/.f64 im re) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 im (/.f64 re im)) #s(literal 1/4 binary64))) (pow.f64 (/.f64 im (/.f64 re im)) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) im) (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64)))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) im))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64)))) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 im (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 im (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re))) #s(literal 1 binary64))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal -1/4 binary64))) (pow.f64 re #s(literal -1/4 binary64)))
(*.f64 (*.f64 (*.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) im)
(*.f64 (*.f64 (*.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (*.f64 (*.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 im (/.f64 re im))) #s(literal 1/2 binary64)))
(sqrt.f64 (/.f64 im (/.f64 re im)))
(neg.f64 (/.f64 im (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) im) (sqrt.f64 re)))
(/.f64 im (sqrt.f64 re))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 re) im)))
(/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 re (*.f64 im im)))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 im im) #s(literal -1 binary64))) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im)) (neg.f64 (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(/.f64 (*.f64 im #s(literal -1 binary64)) (-.f64 #s(literal 0 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)))
(pow.f64 (/.f64 im (/.f64 re im)) #s(literal 1/2 binary64))
(pow.f64 (/.f64 re (*.f64 im im)) #s(literal -1/2 binary64))
(pow.f64 (/.f64 (sqrt.f64 re) im) #s(literal -1 binary64))
(pow.f64 (pow.f64 (/.f64 im (/.f64 re im)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 re (*.f64 im im))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 im (/.f64 re im)))) #s(literal 1/2 binary64))
(*.f64 im (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 im (sqrt.f64 re)))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) im)
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (pow.f64 re #s(literal -1/2 binary64))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (pow.f64 re #s(literal -1/2 binary64))))
(*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 re #s(literal -1/2 binary64))))
(*.f64 (sqrt.f64 im) (pow.f64 (/.f64 im re) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 im re) #s(literal 1/2 binary64)) (sqrt.f64 im))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im) (sqrt.f64 (/.f64 #s(literal -1 binary64) re)))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(*.f64 (pow.f64 (/.f64 im (/.f64 re im)) #s(literal 1/4 binary64)) (pow.f64 (/.f64 im (/.f64 re im)) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) im))
(*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (*.f64 (/.f64 im (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 re #s(literal -1/2 binary64))))
(*.f64 (pow.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 1/2 binary64)) (sqrt.f64 re))
(*.f64 (pow.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re))) #s(literal 1/2 binary64)) re)
(*.f64 (sqrt.f64 (/.f64 (/.f64 im (/.f64 re im)) re)) (sqrt.f64 re))
(*.f64 (sqrt.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re)))) re)
(*.f64 (*.f64 (sqrt.f64 im) (pow.f64 re #s(literal -1/4 binary64))) (*.f64 (sqrt.f64 im) (pow.f64 re #s(literal -1/4 binary64))))
(*.f64 (*.f64 (pow.f64 re #s(literal -1/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (*.f64 im (pow.f64 re #s(literal -1/4 binary64))) (pow.f64 re #s(literal -1/4 binary64)))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) im) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) im)
(*.f64 (*.f64 (*.f64 (/.f64 im (sqrt.f64 re)) (sqrt.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 im (/.f64 re im)) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 0 binary64)))
(+.f64 (/.f64 im (/.f64 re im)) (*.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re))) #s(literal 0 binary64)))
(+.f64 (*.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)) (*.f64 #s(literal 0 binary64) (/.f64 (/.f64 im (/.f64 re im)) re)))
(+.f64 (*.f64 #s(literal 0 binary64) (/.f64 (/.f64 im (/.f64 re im)) re)) (*.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))
(+.f64 (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 0 binary64)) (/.f64 im (/.f64 re im)))
(+.f64 (*.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re))) #s(literal 0 binary64)) (/.f64 im (/.f64 re im)))
(+.f64 (*.f64 (*.f64 re re) (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re)))) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re)))))
(+.f64 (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 re re) (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re)))))
(exp.f64 (*.f64 (log.f64 (/.f64 re (*.f64 im im))) #s(literal -1 binary64)))
(exp.f64 (+.f64 (*.f64 (log.f64 im) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (log.f64 re))))
(exp.f64 (+.f64 (-.f64 #s(literal 0 binary64) (log.f64 re)) (*.f64 (log.f64 im) #s(literal 2 binary64))))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))))
(neg.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))))
(neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) #s(literal 1 binary64)))
(/.f64 im (/.f64 re im))
(/.f64 (*.f64 im im) re)
(/.f64 (/.f64 im (/.f64 re im)) #s(literal 1 binary64))
(/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 #s(literal 1 binary64) re))
(/.f64 #s(literal 1 binary64) (/.f64 re (*.f64 im im)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (*.f64 im im) #s(literal -1 binary64))))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 re (*.f64 im im))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (-.f64 #s(literal 0 binary64) re))
(/.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) #s(literal -1 binary64))
(/.f64 (*.f64 (*.f64 im im) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) re))
(/.f64 (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(/.f64 (neg.f64 (*.f64 (*.f64 im im) #s(literal -1 binary64))) re)
(/.f64 (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (*.f64 re (*.f64 re re))) (*.f64 re re))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) re))
(/.f64 (*.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 (*.f64 re re) (*.f64 re (*.f64 re re))))) (*.f64 re (*.f64 re (*.f64 re re))))
(/.f64 (*.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 re re))
(/.f64 (*.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))
(pow.f64 (/.f64 re (*.f64 im im)) #s(literal -1 binary64))
(*.f64 im (/.f64 im re))
(*.f64 im (*.f64 (/.f64 #s(literal 1 binary64) re) im))
(*.f64 (*.f64 im im) (/.f64 #s(literal 1 binary64) re))
(*.f64 (/.f64 im (/.f64 re im)) #s(literal 1 binary64))
(*.f64 (/.f64 im (/.f64 re im)) (*.f64 (/.f64 #s(literal 1 binary64) re) re))
(*.f64 (/.f64 im (sqrt.f64 re)) (/.f64 im (sqrt.f64 re)))
(*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) re)
(*.f64 #s(literal 1 binary64) (/.f64 im (/.f64 re im)))
(*.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 im im))
(*.f64 (/.f64 #s(literal 1 binary64) re) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) #s(literal -1 binary64)))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 im im)))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (/.f64 #s(literal -1 binary64) re))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (*.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (*.f64 (/.f64 #s(literal -1 binary64) (*.f64 re re)) re))
(*.f64 (/.f64 im re) im)
(*.f64 (/.f64 im re) (/.f64 im #s(literal 1 binary64)))
(*.f64 (/.f64 im re) (*.f64 (/.f64 im re) re))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) (/.f64 (*.f64 im im) (/.f64 #s(literal 1 binary64) re)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) (*.f64 (*.f64 im im) re))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) (*.f64 re (*.f64 im im)))
(*.f64 (/.f64 im (*.f64 re re)) (*.f64 im re))
(*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 im (/.f64 #s(literal -1 binary64) re)))
(*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 im (/.f64 re im)) re)) (-.f64 #s(literal 0 binary64) re))
(*.f64 (*.f64 (*.f64 im im) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) re))
(*.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re))) (*.f64 re re))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 re (*.f64 im re))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))) (/.f64 (*.f64 im im) (/.f64 #s(literal 1 binary64) (*.f64 re re))))
(*.f64 (/.f64 (*.f64 im im) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 re re))))
(*.f64 (/.f64 im #s(literal -1 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) im) re))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) im) #s(literal -1 binary64)) (/.f64 im re))
(*.f64 (/.f64 im (-.f64 #s(literal 0 binary64) (*.f64 re re))) (/.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 #s(literal 1 binary64) re)))
(*.f64 (/.f64 im (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (/.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 #s(literal 1 binary64) (*.f64 re re))))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (/.f64 im (/.f64 #s(literal 1 binary64) (*.f64 re re))))
(*.f64 (/.f64 (*.f64 im im) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) re))
(*.f64 (*.f64 (*.f64 im im) (pow.f64 re #s(literal -1/2 binary64))) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (*.f64 (*.f64 im im) (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re))
(*.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 im im) (*.f64 re (*.f64 re re)))) (*.f64 re re))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) im) im)
(exp.f64 (*.f64 (log.f64 im) #s(literal 2 binary64)))
(fabs.f64 (*.f64 im im))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 im im)))
(sqrt.f64 (*.f64 im (*.f64 im (*.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 (*.f64 im (*.f64 im (*.f64 im im))) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 (log.f64 im)) #s(literal 2 binary64))
(*.f64 im im)
(*.f64 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 (sqrt.f64 im) (*.f64 (sqrt.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 (neg.f64 (-.f64 #s(literal 0 binary64) im)) im)
(*.f64 (*.f64 im (sqrt.f64 im)) (sqrt.f64 im))
(+.f64 #s(literal 0 binary64) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)))
(+.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)) #s(literal 0 binary64))
(+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -1 binary64) (*.f64 re #s(literal 4 binary64))))
(+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re))
(+.f64 (*.f64 #s(literal -1 binary64) (*.f64 re #s(literal 4 binary64))) (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))))
(+.f64 (*.f64 #s(literal -4 binary64) re) (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))))
(+.f64 (+.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im)))) (*.f64 #s(literal -1 binary64) (*.f64 re #s(literal 4 binary64))))
(+.f64 (+.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im)))) (*.f64 #s(literal -4 binary64) re))
(-.f64 #s(literal 0 binary64) (+.f64 (/.f64 im (/.f64 re im)) (*.f64 #s(literal 4 binary64) re)))
(-.f64 #s(literal 0 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (/.f64 im (/.f64 re im)) (*.f64 #s(literal 4 binary64) re))))
(fma.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (-.f64 #s(literal 0 binary64) re) (*.f64 #s(literal -4 binary64) re))
(fma.f64 #s(literal 4 binary64) (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))))
(fma.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64)) #s(literal 0 binary64) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)))
(fma.f64 #s(literal 0 binary64) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64)) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)))
(fma.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (/.f64 im (/.f64 re im)) re) (*.f64 #s(literal -1 binary64) (*.f64 re #s(literal 4 binary64))))
(fma.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 4 binary64) (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))))
(neg.f64 (+.f64 (/.f64 im (/.f64 re im)) (*.f64 #s(literal 4 binary64) re)))
(neg.f64 (+.f64 #s(literal 0 binary64) (+.f64 (/.f64 im (/.f64 re im)) (*.f64 #s(literal 4 binary64) re))))
(/.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64)) (/.f64 #s(literal -1 binary64) re))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))) (*.f64 re re)) (*.f64 (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))) re) (*.f64 (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)) (*.f64 re re)) (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)) re) (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 re (*.f64 im im))) (*.f64 (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (+.f64 (/.f64 im (/.f64 re im)) (*.f64 #s(literal -4 binary64) re))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 re (/.f64 im (/.f64 re im)))) (*.f64 (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))) re)) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 im (/.f64 re im)) (*.f64 #s(literal -4 binary64) re)) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 re re) (*.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))))
(/.f64 #s(literal 1 binary64) (/.f64 re (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)) re)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))) (/.f64 (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)) (/.f64 #s(literal -1 binary64) re))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)) (/.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)) (/.f64 #s(literal -1 binary64) re))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 re re) (neg.f64 (*.f64 (*.f64 re (*.f64 re re)) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 re (*.f64 re (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)))))
(/.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64))))
(/.f64 (*.f64 (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))) (*.f64 re re)))
(/.f64 (*.f64 (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))) re))
(/.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)) (*.f64 re re)))
(/.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)) re))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64))) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 re (*.f64 im im))) (*.f64 (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))) (*.f64 re re))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64))) (*.f64 re (+.f64 (/.f64 im (/.f64 re im)) (*.f64 #s(literal -4 binary64) re))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64))) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 re (/.f64 im (/.f64 re im)))) (*.f64 (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))) re)))
(/.f64 (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)))) (+.f64 (/.f64 im (/.f64 re im)) (*.f64 #s(literal -4 binary64) re)))
(/.f64 (*.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re))
(/.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)) re) re)
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64))) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64))) (+.f64 #s(literal 16 binary64) (/.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)) (/.f64 re (/.f64 im (/.f64 re im))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64))) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))
(/.f64 (/.f64 (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)) (/.f64 #s(literal -1 binary64) re)) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))))
(/.f64 (/.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)) (/.f64 #s(literal -1 binary64) re)) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))
(/.f64 (neg.f64 (*.f64 (*.f64 re (*.f64 re re)) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64)))) (*.f64 re re))
(/.f64 (*.f64 re (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re))) re)
(/.f64 (neg.f64 (*.f64 (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (neg.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))) (*.f64 re re))))
(/.f64 (neg.f64 (*.f64 (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (neg.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))) re)))
(/.f64 (neg.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (neg.f64 (*.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)) (*.f64 re re))))
(/.f64 (neg.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (neg.f64 (*.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) 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 (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)))) (neg.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 re (*.f64 im im))) (*.f64 (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))) (*.f64 re re)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)))) (neg.f64 (*.f64 re (+.f64 (/.f64 im (/.f64 re im)) (*.f64 #s(literal -4 binary64) re)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)))) (neg.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 re (/.f64 im (/.f64 re im)))) (*.f64 (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))) re))))
(/.f64 (neg.f64 (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64))))) (neg.f64 (+.f64 (/.f64 im (/.f64 re im)) (*.f64 #s(literal -4 binary64) re))))
(/.f64 (neg.f64 (*.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) 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 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)) re)) (-.f64 #s(literal 0 binary64) re))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)))) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 im (/.f64 re im)) re)) #s(literal 4 binary64)))
(/.f64 (neg.f64 (/.f64 (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)) (/.f64 #s(literal -1 binary64) re))) (-.f64 #s(literal 0 binary64) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))))))
(/.f64 (neg.f64 (/.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)) (/.f64 #s(literal -1 binary64) re))) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 im (/.f64 re im)) re)) #s(literal 4 binary64)))
(/.f64 (neg.f64 (neg.f64 (*.f64 (*.f64 re (*.f64 re re)) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64))))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))
(/.f64 (neg.f64 (*.f64 re (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)))) (-.f64 #s(literal 0 binary64) re))
(/.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re))) (*.f64 #s(literal 0 binary64) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re))))))
(/.f64 (+.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -1 binary64) (*.f64 re #s(literal 4 binary64))) #s(literal 3 binary64))) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 re (*.f64 im im))) (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 re #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 re #s(literal 4 binary64)))) (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -1 binary64) (*.f64 re #s(literal 4 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -1 binary64) (*.f64 re #s(literal 4 binary64))) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 re #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 re #s(literal 4 binary64)))) (-.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 re (*.f64 im im))) (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 re #s(literal 4 binary64))) (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im)))))))
(/.f64 (+.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal -4 binary64) re) #s(literal 3 binary64))) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 re (*.f64 im im))) (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) re) (*.f64 #s(literal -4 binary64) re)) (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal -4 binary64) re) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal -4 binary64) re) (*.f64 #s(literal -4 binary64) re)) (-.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 re (*.f64 im im))) (*.f64 (*.f64 #s(literal -4 binary64) re) (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)))) (-.f64 #s(literal 0 binary64) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re))))
(/.f64 (-.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 re (*.f64 im im))) (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 re #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 re #s(literal 4 binary64))))) (-.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -1 binary64) (*.f64 re #s(literal 4 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -1 binary64) (*.f64 re #s(literal 4 binary64))) (*.f64 #s(literal -1 binary64) (*.f64 re #s(literal 4 binary64)))) (/.f64 (/.f64 im (/.f64 re im)) (/.f64 re (*.f64 im im)))) (-.f64 (*.f64 #s(literal -1 binary64) (*.f64 re #s(literal 4 binary64))) (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im)))))
(/.f64 (-.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 re (*.f64 im im))) (*.f64 (*.f64 #s(literal -4 binary64) re) (*.f64 #s(literal -4 binary64) re))) (-.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal -4 binary64) re) (*.f64 #s(literal -4 binary64) re)) (/.f64 (/.f64 im (/.f64 re im)) (/.f64 re (*.f64 im im)))) (-.f64 (*.f64 #s(literal -4 binary64) re) (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im)))))
(/.f64 (*.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64)) (*.f64 re (*.f64 re re))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))
(/.f64 (*.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64)) (*.f64 re re)) (-.f64 #s(literal 0 binary64) re))
(/.f64 (*.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64)) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) re))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal -64 binary64) (neg.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re)))))) (-.f64 #s(literal 0 binary64) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (neg.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re))))) #s(literal 16 binary64))) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 im (/.f64 re im)) re)) #s(literal 4 binary64)))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 16 binary64) (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))))) (-.f64 #s(literal 4 binary64) (/.f64 (/.f64 im (/.f64 re im)) re)))
(*.f64 re (neg.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64))))
(*.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) re))
(*.f64 #s(literal -1 binary64) (+.f64 (/.f64 im (/.f64 re im)) (*.f64 #s(literal 4 binary64) re)))
(*.f64 #s(literal -1 binary64) (+.f64 #s(literal 0 binary64) (+.f64 (/.f64 im (/.f64 re im)) (*.f64 #s(literal 4 binary64) re))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (/.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64)) re))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 (/.f64 #s(literal 1 binary64) re) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64))))
(*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64)) #s(literal 1 binary64)))
(*.f64 (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))))) (-.f64 #s(literal 0 binary64) re)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64))))
(*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))) (-.f64 #s(literal 0 binary64) re)))
(*.f64 (*.f64 (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))) (*.f64 re re))))
(*.f64 (*.f64 (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))) re)))
(*.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)) (*.f64 re re))))
(*.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)) re)))
(*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 re (*.f64 im im))) (*.f64 (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))) (*.f64 re re)))))
(*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 re (+.f64 (/.f64 im (/.f64 re im)) (*.f64 #s(literal -4 binary64) re)))))
(*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 re (/.f64 im (/.f64 re im)))) (*.f64 (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))) re))))
(*.f64 (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 im (/.f64 re im)) (*.f64 #s(literal -4 binary64) re))))
(*.f64 (*.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (*.f64 re re)))
(*.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)) re) (/.f64 #s(literal 1 binary64) re))
(*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))))))
(*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))))
(*.f64 (/.f64 (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)) (/.f64 #s(literal -1 binary64) re)) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))))))
(*.f64 (/.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)) (/.f64 #s(literal -1 binary64) re)) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))))
(*.f64 (neg.f64 (*.f64 (*.f64 re (*.f64 re re)) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64)))) (/.f64 #s(literal 1 binary64) (*.f64 re re)))
(*.f64 (*.f64 re (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re))) (/.f64 #s(literal 1 binary64) re))
(*.f64 (neg.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64))) re)
(*.f64 (/.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64)) re) (-.f64 #s(literal 0 binary64) (*.f64 re re)))
(*.f64 (*.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64)) #s(literal -1 binary64)) re)
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) re)
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re)) (sqrt.f64 re))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re))))
(*.f64 (sqrt.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) 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 (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64)))) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64))) (sqrt.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)) #s(literal 1/4 binary64))) (pow.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re))) #s(literal 1/2 binary64)))
(sqrt.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)))
(/.f64 (sqrt.f64 (*.f64 (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))) (*.f64 re re))))
(/.f64 (sqrt.f64 (*.f64 (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (sqrt.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))) re)))
(/.f64 (sqrt.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 (*.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)) (*.f64 re re))))
(/.f64 (sqrt.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (sqrt.f64 (*.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) 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 (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)))) (sqrt.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 re (*.f64 im im))) (*.f64 (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))) (*.f64 re re)))))
(/.f64 (sqrt.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)))) (sqrt.f64 (*.f64 re (+.f64 (/.f64 im (/.f64 re im)) (*.f64 #s(literal -4 binary64) re)))))
(/.f64 (sqrt.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)))) (sqrt.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 re (/.f64 im (/.f64 re im)))) (*.f64 (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))) re))))
(/.f64 (sqrt.f64 (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64))))) (sqrt.f64 (+.f64 (/.f64 im (/.f64 re im)) (*.f64 #s(literal -4 binary64) re))))
(/.f64 (sqrt.f64 (*.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) re)
(/.f64 (sqrt.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)) re)) (sqrt.f64 re))
(/.f64 (sqrt.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))))))
(/.f64 (sqrt.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)))) (sqrt.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))))
(/.f64 (sqrt.f64 (/.f64 (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)) (/.f64 #s(literal -1 binary64) re))) (sqrt.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))))))
(/.f64 (sqrt.f64 (/.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)) (/.f64 #s(literal -1 binary64) re))) (sqrt.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))))
(/.f64 (sqrt.f64 (neg.f64 (*.f64 (*.f64 re (*.f64 re re)) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64))))) re)
(/.f64 (sqrt.f64 (*.f64 re (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)))) (sqrt.f64 re))
(/.f64 (*.f64 (sqrt.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) re)
(/.f64 (*.f64 (sqrt.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re)) (sqrt.f64 re))
(/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)))) (sqrt.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))))))
(/.f64 (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)))) (sqrt.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))))
(pow.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) 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 (/.f64 re im)) re) #s(literal 4 binary64))))
(*.f64 (pow.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (/.f64 re im))) (*.f64 #s(literal -4 binary64) re)) #s(literal 1/4 binary64)))
(+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64))
(+.f64 #s(literal 4 binary64) (/.f64 (/.f64 im (/.f64 re im)) re))
(+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))) (neg.f64 (/.f64 #s(literal 16 binary64) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))))
(-.f64 #s(literal 4 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 im (/.f64 re im)) re)))
(-.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))) (/.f64 #s(literal 16 binary64) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))))
(-.f64 (/.f64 #s(literal 16 binary64) (-.f64 #s(literal 4 binary64) (/.f64 (/.f64 im (/.f64 re im)) re))) (/.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (-.f64 #s(literal 4 binary64) (/.f64 (/.f64 im (/.f64 re im)) 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 im (/.f64 re im)) (/.f64 #s(literal 1 binary64) re) #s(literal 4 binary64))
(fma.f64 #s(literal 1 binary64) (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (/.f64 #s(literal -1 binary64) (*.f64 re re)) #s(literal 4 binary64))
(fma.f64 (/.f64 im re) (/.f64 im 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 im (*.f64 re re)) im #s(literal 4 binary64))
(neg.f64 (/.f64 (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))))))
(neg.f64 (/.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 im (/.f64 re im)) re)) #s(literal 4 binary64))))
(neg.f64 (/.f64 (+.f64 #s(literal -64 binary64) (neg.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))))) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))))))
(neg.f64 (/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re))))) #s(literal 16 binary64)) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 16 binary64) (/.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)) (/.f64 re (/.f64 im (/.f64 re im))))) (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 4 binary64) (/.f64 (/.f64 im (/.f64 re im)) re)) (-.f64 #s(literal 16 binary64) (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64)))))
(/.f64 (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))))
(/.f64 (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)) (+.f64 #s(literal 16 binary64) (/.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)) (/.f64 re (/.f64 im (/.f64 re im))))))
(/.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))
(/.f64 (+.f64 #s(literal -64 binary64) (neg.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))))) (-.f64 #s(literal 0 binary64) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))))))
(/.f64 (+.f64 #s(literal -64 binary64) (neg.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))))) (neg.f64 (+.f64 #s(literal 16 binary64) (/.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)) (/.f64 re (/.f64 im (/.f64 re im)))))))
(/.f64 (+.f64 (neg.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re))))) #s(literal 16 binary64)) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 im (/.f64 re im)) re)) #s(literal 4 binary64)))
(/.f64 (-.f64 #s(literal 16 binary64) (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re))))) (-.f64 #s(literal 4 binary64) (/.f64 (/.f64 im (/.f64 re im)) re)))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))) (*.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)) #s(literal 16 binary64))) (*.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))))
(/.f64 (neg.f64 (+.f64 #s(literal -64 binary64) (neg.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))))))
(/.f64 (neg.f64 (+.f64 (neg.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re))))) #s(literal 16 binary64))) (neg.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 im (/.f64 re im)) re)) #s(literal 4 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 16 binary64) (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))))) (neg.f64 (-.f64 #s(literal 4 binary64) (/.f64 (/.f64 im (/.f64 re im)) re))))
(/.f64 (-.f64 (pow.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 16 binary64) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))) (/.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))) (+.f64 (*.f64 (/.f64 #s(literal 16 binary64) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))) (/.f64 #s(literal 16 binary64) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))) (*.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))) (/.f64 #s(literal 16 binary64) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))) (/.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))) (*.f64 (/.f64 #s(literal 16 binary64) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))) (/.f64 #s(literal 16 binary64) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))))) (+.f64 (/.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))) (/.f64 #s(literal 16 binary64) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))))
(/.f64 (*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)) #s(literal 1 binary64)) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))
(/.f64 (*.f64 (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)) #s(literal 1 binary64)) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal 4 binary64)))
(*.f64 (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))))))
(*.f64 (+.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))) #s(literal 64 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 16 binary64) (/.f64 (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)) (/.f64 re (/.f64 im (/.f64 re im)))))))
(*.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) #s(literal -16 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64))))
(*.f64 (+.f64 #s(literal -64 binary64) (neg.f64 (/.f64 (/.f64 (/.f64 im (/.f64 re im)) re) (/.f64 (/.f64 re (/.f64 im (/.f64 re im))) (/.f64 (/.f64 im (/.f64 re im)) re))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re)))) (+.f64 #s(literal 16 binary64) (*.f64 (/.f64 (/.f64 im (/.f64 re im)) re) #s(literal -4 binary64)))))))
(*.f64 (+.f64 (neg.f64 (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re))))) #s(literal 16 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 im (/.f64 re im)) re)) #s(literal 4 binary64))))
(*.f64 (-.f64 #s(literal 16 binary64) (/.f64 (*.f64 im im) (*.f64 re (/.f64 re (/.f64 (/.f64 im (/.f64 re im)) re))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 4 binary64) (/.f64 (/.f64 im (/.f64 re im)) re))))
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im)))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) im)) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) im)) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) im)) (-.f64 #s(literal 0 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 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
(*.f64 im (*.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal 1/2 binary64)))
(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(*.f64 im (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))))
(*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re))))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) im))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 im (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64))) (sqrt.f64 re)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))))
(*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))))
(*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 re #s(literal -1/2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (*.f64 im (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 re #s(literal -1/2 binary64))))
(*.f64 (sqrt.f64 im) (*.f64 (pow.f64 (/.f64 im re) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 im (/.f64 re im)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (/.f64 im (/.f64 re im)) #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) 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 (*.f64 im (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64))) (sqrt.f64 re))))
(*.f64 (*.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) im)
(*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) (*.f64 im (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64))))
(*.f64 (*.f64 (/.f64 im (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (pow.f64 re #s(literal -1/2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (pow.f64 (/.f64 im re) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 im (/.f64 re im)) #s(literal 1/4 binary64))) (pow.f64 (/.f64 im (/.f64 re im)) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) im) (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64)))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) im))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64)))) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 im (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 im (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re))) #s(literal 1 binary64))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal -1/4 binary64))) (pow.f64 re #s(literal -1/4 binary64)))
(*.f64 (*.f64 (*.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) im)
(*.f64 (*.f64 (*.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (*.f64 (*.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 (*.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (*.f64 (sqrt.f64 (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 re)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 re) #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (sqrt.f64 re)) #s(literal -1 binary64)))
(fabs.f64 (pow.f64 re #s(literal -1/2 binary64)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(neg.f64 (/.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 re))
(/.f64 #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 (neg.f64 (sqrt.f64 #s(literal -1 binary64))) (neg.f64 (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)))
(pow.f64 re #s(literal -1/2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 re) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 re #s(literal -1/4 binary64)) #s(literal 2 binary64))
(*.f64 #s(literal 1 binary64) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) re) (sqrt.f64 re))
(*.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 #s(literal -1 binary64) (/.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)))
(*.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 (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 #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 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))) #s(literal 1/2 binary64)) re)
(*.f64 (sqrt.f64 (pow.f64 re #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -1/2 binary64))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) re)
(*.f64 (pow.f64 (sqrt.f64 re) #s(literal -1/2 binary64)) (pow.f64 (sqrt.f64 re) #s(literal -1/2 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (pow.f64 re #s(literal -1/4 binary64))) (pow.f64 re #s(literal -1/4 binary64)))
(+.f64 #s(literal 0 binary64) (*.f64 re (/.f64 #s(literal 1 binary64) (*.f64 re re))))
(+.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) #s(literal 0 binary64)))
(+.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))) #s(literal 0 binary64)))
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) #s(literal 0 binary64)) (/.f64 #s(literal 1 binary64) re))
(+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))) #s(literal 0 binary64)) (/.f64 #s(literal 1 binary64) re))
(+.f64 (*.f64 re (/.f64 #s(literal 1 binary64) (*.f64 re re))) #s(literal 0 binary64))
(+.f64 (*.f64 (*.f64 re re) (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))
(+.f64 (*.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 re re) (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))
(exp.f64 (-.f64 #s(literal 0 binary64) (log.f64 re)))
(exp.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 re)) #s(literal 1/2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) (log.f64 re)) #s(literal 1/2 binary64))))
(-.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)))
(neg.f64 (/.f64 #s(literal -1 binary64) re))
(neg.f64 (*.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1 binary64)))
(/.f64 re (*.f64 re re))
(/.f64 #s(literal 1 binary64) re)
(/.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 1 binary64))
(/.f64 (pow.f64 re #s(literal -1/2 binary64)) (sqrt.f64 re))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) re))
(/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) (/.f64 #s(literal 1 binary64) re))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) (-.f64 #s(literal 0 binary64) re)) #s(literal -1 binary64))
(/.f64 (*.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (*.f64 (pow.f64 re #s(literal -1/2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 (*.f64 re re) (*.f64 re (*.f64 re re))))) (*.f64 re (*.f64 re (*.f64 re re))))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 re re))
(/.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))
(pow.f64 re #s(literal -1 binary64))
(pow.f64 (*.f64 re re) #s(literal -1/2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 1 binary64))
(pow.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 re) #s(literal -2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) re))
(*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 1 binary64))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) re))
(*.f64 #s(literal -1 binary64) (*.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (pow.f64 re #s(literal -1/2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))) (*.f64 re re))
(*.f64 (*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re))
(*.f64 (*.f64 (pow.f64 re #s(literal -1/2 binary64)) (pow.f64 re #s(literal -1/4 binary64))) (pow.f64 re #s(literal -1/4 binary64)))
(*.f64 (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))) re) re)
(*.f64 #s(literal 1/2 binary64) im)
(*.f64 im #s(literal 1/2 binary64))
(*.f64 im (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(*.f64 im (*.f64 (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64)) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) im))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (*.f64 im (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64))) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 im (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 im (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 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) #s(literal 1 binary64))
(*.f64 (*.f64 im (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 im (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 im) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 im (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 im))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))))
(*.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64))) (*.f64 im (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64))))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 im (pow.f64 #s(literal 1/2 binary64) #s(literal 3/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) (sqrt.f64 #s(literal 2 binary64))) im) (sqrt.f64 #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) im)
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 im (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))))
(+.f64 (*.f64 re re) #s(literal 0 binary64))
(+.f64 (*.f64 re re) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 0 binary64)))
(+.f64 #s(literal 0 binary64) (*.f64 re re))
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 0 binary64)) (*.f64 re re))
(+.f64 (fma.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 0 binary64) re) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 0 binary64)))) (fma.f64 re #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 0 binary64))))
(exp.f64 (*.f64 (log.f64 re) #s(literal 2 binary64)))
(-.f64 (*.f64 re re) #s(literal 0 binary64))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (*.f64 re re)))
(fma.f64 re re #s(literal 0 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 0 binary64) re) #s(literal 0 binary64))
(neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)))
(/.f64 re (/.f64 #s(literal 1 binary64) re))
(/.f64 (*.f64 re re) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 re re)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 (*.f64 re re) (*.f64 re (*.f64 re re))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re (*.f64 re re))))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) #s(literal -1 binary64))
(/.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 #s(literal -1 binary64) re))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(/.f64 (*.f64 re (*.f64 (*.f64 re re) (*.f64 re (*.f64 re re)))) (*.f64 re (*.f64 re (*.f64 re re))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 re (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re (*.f64 re re)))))
(/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re re))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 re (*.f64 re (*.f64 re re))))) (*.f64 re (*.f64 re (*.f64 re re))))
(/.f64 (-.f64 (*.f64 re (*.f64 (*.f64 re re) (*.f64 re (*.f64 re re)))) #s(literal 0 binary64)) (*.f64 re (*.f64 re (*.f64 re re))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 0 binary64) (*.f64 re re))) re)
(pow.f64 re #s(literal 2 binary64))
(pow.f64 (*.f64 re re) #s(literal 1 binary64))
(pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64))
(*.f64 re re)
(*.f64 (*.f64 re re) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 re re))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 re re)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 (/.f64 #s(literal 1 binary64) re) (-.f64 #s(literal 0 binary64) re)))
(*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 0 binary64) re))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (*.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) (-.f64 #s(literal 0 binary64) re)))
(*.f64 (*.f64 re (*.f64 (*.f64 re re) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re (*.f64 re re)))))
(*.f64 (*.f64 re (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) (*.f64 re re)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re (*.f64 re re)))) (/.f64 #s(literal -1 binary64) (*.f64 re re)))
(*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) (*.f64 re re)))
(*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (/.f64 #s(literal 1 binary64) re))
(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 (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 #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 im (sqrt.f64 #s(literal 1/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)) im))
(*.f64 (*.f64 im (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 1/2 binary64) #s(literal 1/4 binary64)))

simplify347.0ms (3.8%)

Algorithm
1×egg-herbie
Rules
8126×*-lowering-*.f32
8126×*-lowering-*.f64
3184×+-lowering-+.f64
3184×+-lowering-+.f32
1738×associate-*r*
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
05644931
119934682
277994664
080064664
Stop Event
1×iter limit
1×node limit
Counts
396 → 396
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) (* (sqrt -2) (sqrt -1))))
(* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(* -1 (* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(* -1 (* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/32 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (* (sqrt -2) (sqrt -1))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* -1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))) (* -1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))))))))
(* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* re (+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(* re (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(* re (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 3) (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* -1 (* re (+ (* 1/4 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* re (+ (* -1/16 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* re (+ (* -1/16 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 7))))) (+ (* 1/4 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))))
(* (sqrt re) (* (sqrt -1) (sqrt 2)))
(+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 re)))) (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(+ (* im (+ (* -1/8 (* (/ (* im (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (/ (sqrt 2) (sqrt -1)))))) (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(+ (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (/ (sqrt 2) (sqrt -1)))) (* im (+ (* -1/8 (* (sqrt (/ 1 (pow re 3))) (/ (sqrt 2) (pow (sqrt -1) 3)))) (* 1/16 (* (/ (* im (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 5))))))))) (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* (sqrt im) (sqrt 2))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))
(* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/16 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (* (sqrt -2) (sqrt -1))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(* (sqrt im) (sqrt 2))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* -1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))) (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))))))) (* (sqrt im) (sqrt 2)))
(* (sqrt re) (* (sqrt -1) (sqrt 2)))
(* re (+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))
(* re (+ (* -1/8 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(* re (+ (* -1/8 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (/ (* (pow im 3) (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* -1 (* re (+ (* 1/2 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))))
(* -2 re)
(+ (* -2 re) (* 2 im))
(+ (* -2 re) (* 2 im))
(+ (* -2 re) (* 2 im))
(* 2 im)
(* im (+ 2 (* -2 (/ re im))))
(* im (+ 2 (* -2 (/ re im))))
(* im (+ 2 (* -2 (/ re im))))
(* 2 im)
(* -1 (* im (- (* 2 (/ re im)) 2)))
(* -1 (* im (- (* 2 (/ re im)) 2)))
(* -1 (* im (- (* 2 (/ re im)) 2)))
(* 2 im)
(+ (* -2 re) (* 2 im))
(+ (* -2 re) (* 2 im))
(+ (* -2 re) (* 2 im))
(* -2 re)
(* re (- (* 2 (/ im re)) 2))
(* re (- (* 2 (/ im re)) 2))
(* re (- (* 2 (/ im re)) 2))
(* -2 re)
(* -1 (* re (+ 2 (* -2 (/ im re)))))
(* -1 (* re (+ 2 (* -2 (/ im re)))))
(* -1 (* re (+ 2 (* -2 (/ im re)))))
(* -1 re)
(- im re)
(- im re)
(- im re)
im
(* im (+ 1 (* -1 (/ re im))))
(* im (+ 1 (* -1 (/ re im))))
(* im (+ 1 (* -1 (/ re im))))
im
(* -1 (* im (- (/ re im) 1)))
(* -1 (* im (- (/ re im) 1)))
(* -1 (* im (- (/ re im) 1)))
im
(+ im (* -1 re))
(+ im (* -1 re))
(+ im (* -1 re))
(* -1 re)
(* re (- (/ im re) 1))
(* re (- (/ im re) 1))
(* re (- (/ im re) 1))
(* -1 re)
(* -1 (* re (+ 1 (* -1 (/ im re)))))
(* -1 (* re (+ 1 (* -1 (/ im re)))))
(* -1 (* re (+ 1 (* -1 (/ im re)))))
(* 1/2 (* (sqrt 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 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* -1/2 (* im (sqrt (/ 1 re))))
(* -1/2 (* im (sqrt (/ 1 re))))
(* -1/2 (* im (sqrt (/ 1 re))))
(* -1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* -1 (* im (sqrt (/ 1 re))))
(* -1 (* im (sqrt (/ 1 re))))
(* -1 (* im (sqrt (/ 1 re))))
(* -1 (* im (sqrt (/ 1 re))))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(* -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)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* 1/2 (* (* 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))))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(/ 1 re)
(/ 1 re)
(/ 1 re)
(/ 1 re)
(/ 1 re)
(/ 1 re)
(/ 1 re)
(/ 1 re)
(/ 1 re)
(/ 1 re)
(/ 1 re)
(/ 1 re)
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(* im (sqrt 1/2))
(* im (sqrt 1/2))
(* im (sqrt 1/2))
(* im (sqrt 1/2))
(* im (sqrt 1/2))
(* im (sqrt 1/2))
(* im (sqrt 1/2))
(* im (sqrt 1/2))
(* im (sqrt 1/2))
(* im (sqrt 1/2))
(* im (sqrt 1/2))
(* im (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 (*.f64 im #s(literal 1/4 binary64)) (/.f64 (*.f64 (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 (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 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) #s(literal -1/16 binary64))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (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/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 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 im (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (/.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 (sqrt.f64 #s(literal 2 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))))))))))
(* 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) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1/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 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64))))) (neg.f64 im))
(* -1 (* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(*.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) #s(literal -1/16 binary64))))) (neg.f64 im))
(* -1 (* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/32 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (* (sqrt -2) (sqrt -1))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))))
(*.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64))))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) #s(literal -1/16 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64)))) (*.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) #s(literal 1/32 binary64))))) (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 re (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (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 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) #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 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) #s(literal 1/4 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 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) (sqrt.f64 #s(literal -1 binary64))) (*.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 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 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) #s(literal 1/4 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 im (*.f64 im im))) (/.f64 (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 (+.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)))) (-.f64 #s(literal 0 binary64) re))
(* -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 #s(literal 0 binary64) (*.f64 re (+.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)))))))))
(* -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 (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 #s(literal 1/32 binary64) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 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))))))) (-.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 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal -1 binary64)))))
(+ (* 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 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (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 #s(literal 2 binary64)) (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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/8 binary64))) (*.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 #s(literal 2 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 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im))
(* 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/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (+.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (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/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (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)))) (*.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 #s(literal -1/16 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 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))
(*.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) re)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) #s(literal 1/2 binary64)))) (neg.f64 im))
(* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(*.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64))) (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) re)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) #s(literal -1/8 binary64))))) (neg.f64 im))
(* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/16 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (* (sqrt -2) (sqrt -1))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) re)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) #s(literal 1/2 binary64)))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) #s(literal -1/8 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64)))) (*.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) #s(literal 1/16 binary64))))) (neg.f64 im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im)) (*.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 #s(literal 2 binary64)) (sqrt.f64 im)) (*.f64 re (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/8 binary64))))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))) (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im)) (*.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) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/8 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/16 binary64))))))))
(* (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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)))))
(* re (+ (* -1/8 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(*.f64 re (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)) (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)) (/.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/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 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/8 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 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (*.f64 im im))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 5 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) #s(literal 1/16 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 #s(literal 0 binary64) (*.f64 re (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) 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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) #s(literal -1/8 binary64))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) #s(literal -1/8 binary64))) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 im (*.f64 im im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) #s(literal 1/16 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 #s(literal 2 binary64) im))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) im))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) im))
(* 2 im)
(*.f64 #s(literal 2 binary64) im)
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 re im))))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 re im))))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 re im))))
(* 2 im)
(*.f64 #s(literal 2 binary64) im)
(* -1 (* im (- (* 2 (/ re im)) 2)))
(*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 re #s(literal 2 binary64)) im)) (neg.f64 im))
(* -1 (* im (- (* 2 (/ re im)) 2)))
(*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 re #s(literal 2 binary64)) im)) (neg.f64 im))
(* -1 (* im (- (* 2 (/ re im)) 2)))
(*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 re #s(literal 2 binary64)) im)) (neg.f64 im))
(* 2 im)
(*.f64 #s(literal 2 binary64) im)
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) im))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) im))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) im))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* re (- (* 2 (/ im re)) 2))
(*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) im) re)))
(* re (- (* 2 (/ im re)) 2))
(*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) im) re)))
(* re (- (* 2 (/ im re)) 2))
(*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) im) re)))
(* -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 im (*.f64 (+.f64 #s(literal -1 binary64) (/.f64 re im)) #s(literal -1 binary64)))
(* -1 (* im (- (/ re im) 1)))
(*.f64 im (*.f64 (+.f64 #s(literal -1 binary64) (/.f64 re im)) #s(literal -1 binary64)))
(* -1 (* im (- (/ re im) 1)))
(*.f64 im (*.f64 (+.f64 #s(literal -1 binary64) (/.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 #s(literal -1 binary64) (/.f64 im re)))
(* re (- (/ im re) 1))
(*.f64 re (+.f64 #s(literal -1 binary64) (/.f64 im re)))
(* re (- (/ im re) 1))
(*.f64 re (+.f64 #s(literal -1 binary64) (/.f64 im re)))
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* -1 (* re (+ 1 (* -1 (/ im re)))))
(*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 1 binary64) (/.f64 im re)))
(* -1 (* re (+ 1 (* -1 (/ im re)))))
(*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 1 binary64) (/.f64 im re)))
(* -1 (* re (+ 1 (* -1 (/ im re)))))
(*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 1 binary64) (/.f64 im re)))
(* 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 im) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1/2 binary64)))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1/2 binary64)))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1/2 binary64)))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1/2 binary64)))
(* (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 (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 #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 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im #s(literal 1/2 binary64)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im #s(literal 1/2 binary64)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im #s(literal 1/2 binary64)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im #s(literal 1/2 binary64)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im #s(literal 1/2 binary64)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im #s(literal 1/2 binary64)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im #s(literal 1/2 binary64)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im #s(literal 1/2 binary64)))
(* -1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im #s(literal -1/2 binary64)))
(* -1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im #s(literal -1/2 binary64)))
(* -1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im #s(literal -1/2 binary64)))
(* -1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im #s(literal -1/2 binary64)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im #s(literal 1/2 binary64)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im #s(literal 1/2 binary64)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im #s(literal 1/2 binary64)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im #s(literal 1/2 binary64)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im #s(literal 1/2 binary64)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im #s(literal 1/2 binary64)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im #s(literal 1/2 binary64)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im #s(literal 1/2 binary64)))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im #s(literal -1/2 binary64)))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im #s(literal -1/2 binary64)))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im #s(literal -1/2 binary64)))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im #s(literal -1/2 binary64)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* -1 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (neg.f64 im))
(* -1 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (neg.f64 im))
(* -1 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (neg.f64 im))
(* -1 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (neg.f64 im))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (neg.f64 im))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (neg.f64 im))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (neg.f64 im))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (neg.f64 im))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(* -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 re (*.f64 re #s(literal -4 binary64))) (*.f64 im im)) re)
(/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)
(/.f64 (-.f64 (*.f64 re (*.f64 re #s(literal -4 binary64))) (*.f64 im im)) re)
(/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)
(/.f64 (-.f64 (*.f64 re (*.f64 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 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) re)))
(* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))
(*.f64 re (+.f64 #s(literal -4 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) re)))
(* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))
(*.f64 re (+.f64 #s(literal -4 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) re)))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64)))
(* (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 (*.f64 im im) (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/8 binary64)))))
(+ (* (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 (*.f64 im im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1/128 binary64)))) (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/8 binary64))))))
(+ (* (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 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/8 binary64))) (*.f64 (*.f64 im im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1/128 binary64))) (*.f64 #s(literal 1/1024 binary64) (*.f64 (*.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im) #s(literal 1/2 binary64)))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))
(*.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 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)) (sqrt.f64 (*.f64 re (*.f64 re re))))))
(* 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)) (sqrt.f64 (*.f64 re (*.f64 re re))))) (/.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)) (sqrt.f64 (*.f64 re (*.f64 re re))))) (/.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 (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 im #s(literal 6 binary64))) (sqrt.f64 (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)))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))
(*.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 #s(literal -1 binary64)) (*.f64 im im)) (sqrt.f64 (*.f64 re (*.f64 re re))))) (neg.f64 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 (+.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 #s(literal -1 binary64)) (*.f64 im im)) (sqrt.f64 (*.f64 re (*.f64 re re))))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (pow.f64 im #s(literal 4 binary64)))) (neg.f64 im))
(* -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 (-.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 #s(literal -1 binary64)) (*.f64 im im)) (sqrt.f64 (*.f64 re (*.f64 re re))))) (/.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 (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 im #s(literal 6 binary64))) (sqrt.f64 (pow.f64 re #s(literal 11 binary64))))) (neg.f64 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/2 (* (* im (sqrt -1)) (sqrt re))) (* (/ (sqrt -1) im) (sqrt (pow re 5)))) re)
(/.f64 (+.f64 (*.f64 (sqrt.f64 re) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im) #s(literal 1/2 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 (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 (sqrt.f64 #s(literal -1 binary64)) im)) (*.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.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 (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 (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 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))) (pow.f64 im #s(literal 5 binary64))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re 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 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 #s(literal -1 binary64))) (*.f64 im im)) (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) (sqrt.f64 #s(literal -1 binary64))) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (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 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 #s(literal -1 binary64))) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/128 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/1024 binary64) (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) (*.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 #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 #s(literal -1/8 binary64) (*.f64 im im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))))
(* -1 (* re (+ (* -1 (/ (+ (* 1/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 #s(literal 1/128 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 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)) (*.f64 (sqrt.f64 re) #s(literal 1/8 binary64)))) (*.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 #s(literal 0 binary64) re) (-.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (/.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)) (*.f64 (sqrt.f64 re) #s(literal 1/8 binary64))) (/.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/128 binary64) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 im #s(literal 4 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)))))
(* 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 (*.f64 im im) (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/4 binary64)))))
(+ (* 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 im im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1/64 binary64)))) (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/4 binary64))))))
(+ (* 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 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/4 binary64))) (*.f64 im (*.f64 im (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1/64 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 11 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)) #s(literal 1/512 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 (* (/ (sqrt -1) (pow im 2)) (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 (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))) (*.f64 im im)) (sqrt.f64 (*.f64 re (*.f64 re re))))))
(* 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 (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))) (*.f64 im im)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (/.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 (pow.f64 re #s(literal 7 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 (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))) (*.f64 im im)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (+.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 im #s(literal 6 binary64))) (sqrt.f64 (pow.f64 re #s(literal 11 binary64))))) (*.f64 (/.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 (pow.f64 re #s(literal 7 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 (* (/ (sqrt -1) (pow im 2)) (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 (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))) (*.f64 im im)) (sqrt.f64 (*.f64 re (*.f64 re re))))) (neg.f64 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 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))) (*.f64 im im)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (/.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))))) (neg.f64 im))
(* -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 #s(literal 0 binary64) (*.f64 im (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))) (*.f64 im im)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (+.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (/.f64 (*.f64 #s(literal 4 binary64) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 im #s(literal 6 binary64))) (sqrt.f64 (pow.f64 re #s(literal 11 binary64))))) (*.f64 (/.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 (pow.f64 re #s(literal 7 binary64))))))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) im))
(/ (+ (* 2 (* (/ (sqrt -1) im) (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 (sqrt.f64 (pow.f64 re #s(literal 5 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) im) #s(literal 2 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 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) im)) (*.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im (*.f64 im im))) #s(literal -2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) im) #s(literal 2 binary64)))))) 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 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) im)) (*.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) im) #s(literal 2 binary64))) (*.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 (/.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -1 binary64))) (*.f64 im (*.f64 im im))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) re))) (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 5 binary64))) (*.f64 (sqrt.f64 re) #s(literal 4 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 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal -1 binary64))) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (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 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal -1 binary64))) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (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 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal -1 binary64))) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (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) (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 (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 #s(literal 0 binary64) (*.f64 re (+.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))))))))
(* -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 #s(literal 0 binary64) (*.f64 re (-.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 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)) (*.f64 (sqrt.f64 re) #s(literal 1/4 binary64)))) (*.f64 re (*.f64 re 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 #s(literal 0 binary64) (*.f64 re (-.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 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)) (*.f64 (sqrt.f64 re) #s(literal 1/4 binary64))) (/.f64 (+.f64 (*.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal -1/64 binary64))) (*.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))))))
4
#s(literal 4 binary64)
(+ 4 (/ (pow im 2) (pow re 2)))
(+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64))
(+ 4 (/ (pow im 2) (pow re 2)))
(+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64))
(+ 4 (/ (pow im 2) (pow re 2)))
(+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64))
(/ (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 re (*.f64 re #s(literal 4 binary64)))) (*.f64 re re))
(/ (+ (* 4 (pow re 2)) (pow im 2)) (pow re 2))
(/.f64 (+.f64 (*.f64 im im) (*.f64 re (*.f64 re #s(literal 4 binary64)))) (*.f64 re re))
(/ (+ (* 4 (pow re 2)) (pow im 2)) (pow re 2))
(/.f64 (+.f64 (*.f64 im im) (*.f64 re (*.f64 re #s(literal 4 binary64)))) (*.f64 re re))
4
#s(literal 4 binary64)
(+ 4 (/ (pow im 2) (pow re 2)))
(+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64))
(+ 4 (/ (pow im 2) (pow re 2)))
(+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64))
(+ 4 (/ (pow im 2) (pow re 2)))
(+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64))
4
#s(literal 4 binary64)
(+ 4 (/ (pow im 2) (pow re 2)))
(+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64))
(+ 4 (/ (pow im 2) (pow re 2)))
(+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64))
(+ 4 (/ (pow im 2) (pow re 2)))
(+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) #s(literal 4 binary64))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(sqrt (/ 1 re))
(sqrt.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)))
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im #s(literal 1/2 binary64)))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im #s(literal 1/2 binary64)))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im #s(literal 1/2 binary64)))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im #s(literal 1/2 binary64)))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im #s(literal 1/2 binary64)))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im #s(literal 1/2 binary64)))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im #s(literal 1/2 binary64)))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im #s(literal 1/2 binary64)))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im #s(literal 1/2 binary64)))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im #s(literal 1/2 binary64)))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im #s(literal 1/2 binary64)))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im #s(literal 1/2 binary64)))
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(* im (sqrt 1/2))
(*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))
(* im (sqrt 1/2))
(*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))
(* im (sqrt 1/2))
(*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))
(* im (sqrt 1/2))
(*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))
(* im (sqrt 1/2))
(*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))
(* im (sqrt 1/2))
(*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))
(* im (sqrt 1/2))
(*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))
(* im (sqrt 1/2))
(*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))
(* im (sqrt 1/2))
(*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))
(* im (sqrt 1/2))
(*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))
(* im (sqrt 1/2))
(*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))
(* im (sqrt 1/2))
(*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))

eval119.0ms (1.3%)

Compiler

Compiled 23504 to 3397 computations (85.5% saved)

prune145.0ms (1.6%)

Pruning

14 alts after pruning (10 fresh and 4 done)

PrunedKeptTotal
New116171168
Fresh134
Picked235
Done011
Total1164141178
Accuracy
100.0%
Counts
1178 → 14
Alt Table
Click to see full alt table
StatusAccuracyProgram
27.3%
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
▶27.0%
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
27.2%
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 #s(literal 1/2 binary64) im)))
27.3%
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
24.3%
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (pow.f64 (/.f64 im re) #s(literal 1/2 binary64)))
✓14.6%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 im im) re)))
18.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))
▶57.1%
(*.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))))))
▶43.5%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) im) re)))))
▶20.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64))))
✓57.1%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
✓78.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
✓58.6%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re))))
▶49.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))))))
Compiler

Compiled 290 to 211 computations (27.2% saved)

simplify173.0ms (1.9%)

Algorithm
1×egg-herbie
Localize:

Found 18 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))))))
✓cost-diff128
(+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))
✓cost-diff128
(*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))))
✓cost-diff256
(*.f64 im (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))))
✓cost-diff0
(+.f64 #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) im) re))
✓cost-diff0
(sqrt.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) im) re))))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) im) re)))))
✓cost-diff256
(*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) im) re)))
✓cost-diff0
(sqrt.f64 re)
✓cost-diff0
(/.f64 (sqrt.f64 re) im)
✓cost-diff0
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
✓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
(*.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
2578×*-lowering-*.f32
2578×*-lowering-*.f64
1872×fma-define
1572×fnmadd-define
1504×fma-lowering-fma.f32
Iterations

Useful iterations: 5 (0.0ms)

IterNodesCost
036229
191223
2238220
3638213
42155211
55417201
08490201
Stop Event
1×iter limit
1×node limit
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 -4)))
1/2
(sqrt (* re -4))
(* re -4)
re
-4
(/ 1/2 (/ (sqrt re) im))
1/2
(/ (sqrt re) im)
(sqrt re)
re
im
(* 1/2 (sqrt (* re (+ -2 (/ (* 2 im) re)))))
1/2
(sqrt (* re (+ -2 (/ (* 2 im) re))))
(* re (+ -2 (/ (* 2 im) re)))
re
(+ -2 (/ (* 2 im) re))
-2
(/ (* 2 im) re)
(* 2 im)
2
im
(* 1/2 (sqrt (* 2 (* im (+ (/ (* 1/2 (* re re)) (* im im)) (- 1 (/ re im)))))))
1/2
(sqrt (* 2 (* im (+ (/ (* 1/2 (* re re)) (* im im)) (- 1 (/ re im))))))
(* 2 (* im (+ (/ (* 1/2 (* re re)) (* im im)) (- 1 (/ re im)))))
2
(* im (+ (/ (* 1/2 (* re re)) (* im im)) (- 1 (/ re im))))
im
(+ (/ (* 1/2 (* re re)) (* im im)) (- 1 (/ re im)))
(/ (* 1/2 (* re re)) (* im im))
(* 1/2 (* re re))
(* re re)
re
(* im im)
(- 1 (/ re im))
1
(/ re im)
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 -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) im))
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
1/2
#s(literal 1/2 binary64)
(/ (sqrt re) im)
(/.f64 (sqrt.f64 re) im)
(sqrt re)
(sqrt.f64 re)
re
im
(* 1/2 (sqrt (* re (+ -2 (/ (* 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 (* re (+ -2 (/ (* 2 im) re))))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re)))
(* re (+ -2 (/ (* 2 im) re)))
(*.f64 #s(literal 2 binary64) (-.f64 im re))
re
(+ -2 (/ (* 2 im) re))
(+.f64 #s(literal -2 binary64) (/.f64 (*.f64 im #s(literal 2 binary64)) re))
-2
#s(literal -2 binary64)
(/ (* 2 im) re)
(/.f64 (*.f64 im #s(literal 2 binary64)) re)
(* 2 im)
(*.f64 im #s(literal 2 binary64))
2
#s(literal 2 binary64)
im
(* 1/2 (sqrt (* 2 (* im (+ (/ (* 1/2 (* re re)) (* im im)) (- 1 (/ 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 (* 2 (* im (+ (/ (* 1/2 (* re re)) (* im im)) (- 1 (/ re im))))))
(sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))
(* 2 (* im (+ (/ (* 1/2 (* re re)) (* im im)) (- 1 (/ re im)))))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))
2
#s(literal 2 binary64)
(* im (+ (/ (* 1/2 (* re re)) (* im im)) (- 1 (/ re im))))
(+.f64 im (*.f64 re (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 re im)) #s(literal -1 binary64))))
im
(+ (/ (* 1/2 (* re re)) (* im im)) (- 1 (/ re im)))
(+.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 re im)) #s(literal -1 binary64)) (/.f64 im re)))
(/ (* 1/2 (* re re)) (* im im))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))
(* 1/2 (* re re))
(*.f64 #s(literal 1/2 binary64) (*.f64 re re))
(* re re)
(*.f64 re re)
re
(* im im)
(*.f64 im im)
(- 1 (/ re im))
(-.f64 #s(literal 1 binary64) (/.f64 re im))
1
#s(literal 1 binary64)
(/ re im)
(/.f64 re im)

localize179.0ms (2%)

Localize:

Found 18 expressions of interest:

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

Compiled 271 to 37 computations (86.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 50.0ms
ival-mult: 22.0ms (44.4% of total)
ival-div: 10.0ms (20.2% of total)
ival-sqrt: 9.0ms (18.2% of total)
ival-add: 6.0ms (12.1% of total)
ival-sub: 1.0ms (2% of total)
const: 1.0ms (2% of total)
backward-pass: 0.0ms (0% of total)

series68.0ms (0.7%)

Counts
22 → 444
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 -4)))>
#<alt (sqrt (* re -4))>
#<alt (* re -4)>
#<alt (/ 1/2 (/ (sqrt re) im))>
#<alt (/ (sqrt re) im)>
#<alt (sqrt re)>
#<alt (* re (+ -2 (/ (* 2 im) re)))>
#<alt (* 1/2 (sqrt (* re (+ -2 (/ (* 2 im) re)))))>
#<alt (sqrt (* re (+ -2 (/ (* 2 im) re))))>
#<alt (+ -2 (/ (* 2 im) re))>
#<alt (* im (+ (/ (* 1/2 (* re re)) (* im im)) (- 1 (/ re im))))>
#<alt (* 2 (* im (+ (/ (* 1/2 (* re re)) (* im im)) (- 1 (/ re im)))))>
#<alt (+ (/ (* 1/2 (* re re)) (* im im)) (- 1 (/ re im)))>
#<alt (* 1/2 (sqrt (* 2 (* im (+ (/ (* 1/2 (* re re)) (* im im)) (- 1 (/ re im)))))))>
#<alt (* re (+ -2 (/ re im)))>
#<alt (* 2 im)>
#<alt (sqrt (* 2 (* im (+ (/ (* 1/2 (* re re)) (* im im)) (- 1 (/ re im))))))>
#<alt (* 1/2 (* re re))>
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 -4)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -4)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -4)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -4)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -4)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -4)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -4)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -4)))>
#<alt (* -1 (* (sqrt re) (sqrt -1)))>
#<alt (* -1 (* (sqrt re) (sqrt -1)))>
#<alt (* -1 (* (sqrt re) (sqrt -1)))>
#<alt (* -1 (* (sqrt re) (sqrt -1)))>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (* -2 (* (sqrt re) (sqrt -1)))>
#<alt (* -2 (* (sqrt re) (sqrt -1)))>
#<alt (* -2 (* (sqrt re) (sqrt -1)))>
#<alt (* -2 (* (sqrt re) (sqrt -1)))>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (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 im) (sqrt re))>
#<alt (* (/ 1 im) (sqrt re))>
#<alt (* (/ 1 im) (sqrt re))>
#<alt (* (/ 1 im) (sqrt re))>
#<alt (* (/ 1 im) (sqrt re))>
#<alt (* (/ 1 im) (sqrt re))>
#<alt (* (/ 1 im) (sqrt re))>
#<alt (* (/ 1 im) (sqrt re))>
#<alt (* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re)))>
#<alt (* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re)))>
#<alt (* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re)))>
#<alt (* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re)))>
#<alt (* (/ 1 im) (sqrt re))>
#<alt (* (/ 1 im) (sqrt re))>
#<alt (* (/ 1 im) (sqrt re))>
#<alt (* (/ 1 im) (sqrt re))>
#<alt (* (/ 1 im) (sqrt re))>
#<alt (* (/ 1 im) (sqrt re))>
#<alt (* (/ 1 im) (sqrt re))>
#<alt (* (/ 1 im) (sqrt re))>
#<alt (* (/ 1 im) (sqrt re))>
#<alt (* (/ 1 im) (sqrt re))>
#<alt (* (/ 1 im) (sqrt re))>
#<alt (* (/ 1 im) (sqrt 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 (* 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 (* -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 (* 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 -2) (pow (sqrt -1) 2))))>
#<alt (* -1 (* re (+ (* -1/2 (* (/ (* im (pow (sqrt -1) 2)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (pow (sqrt -1) 2)))))))>
#<alt (* -1 (* re (+ (* -1/2 (* (/ (* im (pow (sqrt -1) 2)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))) (+ (* -1/4 (* (/ (* (pow im 2) (pow (sqrt -1) 2)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (pow (sqrt -1) 2))))))))>
#<alt (* -1 (* re (+ (* -1/2 (* (/ (* im (pow (sqrt -1) 2)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))) (+ (* -1/4 (* (/ (* (pow im 2) (pow (sqrt -1) 2)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/4 (* (/ (* (pow im 3) (pow (sqrt -1) 2)) (pow (sqrt -2) 5)) (sqrt (/ 1 (pow re 7))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (pow (sqrt -1) 2)))))))))>
#<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 (* (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 -2) (pow (sqrt -1) 2))))>
#<alt (* -1 (* re (+ (* -1 (* (/ (* im (pow (sqrt -1) 2)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -2) (pow (sqrt -1) 2))))))>
#<alt (* -1 (* re (+ (* -1 (* (/ (* im (pow (sqrt -1) 2)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))) (+ (* -1/2 (* (/ (* (pow im 2) (pow (sqrt -1) 2)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -2) (pow (sqrt -1) 2)))))))>
#<alt (* -1 (* re (+ (* -1 (* (/ (* im (pow (sqrt -1) 2)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))) (+ (* -1/2 (* (/ (* (pow im 2) (pow (sqrt -1) 2)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/2 (* (/ (* (pow im 3) (pow (sqrt -1) 2)) (pow (sqrt -2) 5)) (sqrt (/ 1 (pow re 7))))) (* (sqrt (/ 1 re)) (* (sqrt -2) (pow (sqrt -1) 2))))))))>
#<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 -2>
#<alt (- (* 2 (/ im re)) 2)>
#<alt (- (* 2 (/ im re)) 2)>
#<alt (- (* 2 (/ im re)) 2)>
#<alt (* 2 (/ im re))>
#<alt (* im (- (* 2 (/ 1 re)) (* 2 (/ 1 im))))>
#<alt (* im (- (* 2 (/ 1 re)) (* 2 (/ 1 im))))>
#<alt (* im (- (* 2 (/ 1 re)) (* 2 (/ 1 im))))>
#<alt (* 2 (/ im re))>
#<alt (* -1 (* im (- (* 2 (/ 1 im)) (* 2 (/ 1 re)))))>
#<alt (* -1 (* im (- (* 2 (/ 1 im)) (* 2 (/ 1 re)))))>
#<alt (* -1 (* im (- (* 2 (/ 1 im)) (* 2 (/ 1 re)))))>
#<alt (* 2 (/ im re))>
#<alt (/ (+ (* -2 re) (* 2 im)) re)>
#<alt (/ (+ (* -2 re) (* 2 im)) re)>
#<alt (/ (+ (* -2 re) (* 2 im)) re)>
#<alt -2>
#<alt (- (* 2 (/ im re)) 2)>
#<alt (- (* 2 (/ im re)) 2)>
#<alt (- (* 2 (/ im re)) 2)>
#<alt -2>
#<alt (- (* 2 (/ im re)) 2)>
#<alt (- (* 2 (/ im re)) 2)>
#<alt (- (* 2 (/ im re)) 2)>
#<alt (* 1/2 (/ (pow re 2) im))>
#<alt (/ (+ (* -1 (* im re)) (* 1/2 (pow re 2))) im)>
#<alt (/ (+ (* 1/2 (pow re 2)) (* im (+ im (* -1 re)))) im)>
#<alt (/ (+ (* 1/2 (pow re 2)) (* im (+ im (* -1 re)))) im)>
#<alt im>
#<alt (* im (+ 1 (* -1 (/ re im))))>
#<alt (* im (+ 1 (+ (* -1 (/ re im)) (* 1/2 (/ (pow re 2) (pow im 2))))))>
#<alt (* im (+ 1 (+ (* -1 (/ re im)) (* 1/2 (/ (pow re 2) (pow im 2))))))>
#<alt im>
#<alt (* -1 (* im (- (/ re im) 1)))>
#<alt (* -1 (* im (- (* -1 (/ (+ (* -1 re) (* 1/2 (/ (pow re 2) im))) im)) 1)))>
#<alt (* -1 (* im (- (* -1 (/ (+ (* -1 re) (* 1/2 (/ (pow re 2) im))) im)) 1)))>
#<alt im>
#<alt (+ im (* -1 re))>
#<alt (+ im (* re (- (* 1/2 (/ re im)) 1)))>
#<alt (+ im (* re (- (* 1/2 (/ re im)) 1)))>
#<alt (* 1/2 (/ (pow re 2) im))>
#<alt (* (pow re 2) (- (* 1/2 (/ 1 im)) (/ 1 re)))>
#<alt (* (pow re 2) (- (+ (* 1/2 (/ 1 im)) (/ im (pow re 2))) (/ 1 re)))>
#<alt (* (pow re 2) (- (+ (* 1/2 (/ 1 im)) (/ im (pow re 2))) (/ 1 re)))>
#<alt (* 1/2 (/ (pow re 2) im))>
#<alt (* (pow re 2) (- (* 1/2 (/ 1 im)) (/ 1 re)))>
#<alt (* (pow re 2) (+ (* -1 (/ (+ 1 (* -1 (/ im re))) re)) (* 1/2 (/ 1 im))))>
#<alt (* (pow re 2) (+ (* -1 (/ (+ 1 (* -1 (/ im re))) re)) (* 1/2 (/ 1 im))))>
#<alt (/ (pow re 2) im)>
#<alt (/ (+ (* -2 (* im re)) (pow re 2)) im)>
#<alt (/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)>
#<alt (/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)>
#<alt (* 2 im)>
#<alt (* im (+ 2 (* -2 (/ re im))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))>
#<alt (* 2 im)>
#<alt (* -1 (* im (- (* 2 (/ re im)) 2)))>
#<alt (* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))>
#<alt (* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))>
#<alt (* 2 im)>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (+ (* 2 im) (* re (- (/ re im) 2)))>
#<alt (+ (* 2 im) (* re (- (/ re im) 2)))>
#<alt (/ (pow re 2) im)>
#<alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))>
#<alt (* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re))))>
#<alt (* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re))))>
#<alt (/ (pow re 2) im)>
#<alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))>
#<alt (* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im)))>
#<alt (* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im)))>
#<alt 1>
#<alt (+ 1 (* -1 (/ re im)))>
#<alt (+ 1 (* re (- (* 1/2 (/ re (pow im 2))) (/ 1 im))))>
#<alt (+ 1 (* re (- (* 1/2 (/ re (pow im 2))) (/ 1 im))))>
#<alt (* 1/2 (/ (pow re 2) (pow im 2)))>
#<alt (* (pow re 2) (- (* 1/2 (/ 1 (pow im 2))) (/ 1 (* im re))))>
#<alt (* (pow re 2) (- (+ (* 1/2 (/ 1 (pow im 2))) (/ 1 (pow re 2))) (/ 1 (* im re))))>
#<alt (* (pow re 2) (- (+ (* 1/2 (/ 1 (pow im 2))) (/ 1 (pow re 2))) (/ 1 (* im re))))>
#<alt (* 1/2 (/ (pow re 2) (pow im 2)))>
#<alt (* (pow re 2) (- (* 1/2 (/ 1 (pow im 2))) (/ 1 (* im re))))>
#<alt (* (pow re 2) (+ (* -1 (/ (- (/ 1 im) (/ 1 re)) re)) (* 1/2 (/ 1 (pow im 2)))))>
#<alt (* (pow re 2) (+ (* -1 (/ (- (/ 1 im) (/ 1 re)) re)) (* 1/2 (/ 1 (pow im 2)))))>
#<alt (* 1/2 (/ (pow re 2) (pow im 2)))>
#<alt (/ (+ (* -1 (* im re)) (* 1/2 (pow re 2))) (pow im 2))>
#<alt (/ (+ (* 1/2 (pow re 2)) (* im (- im re))) (pow im 2))>
#<alt (/ (+ (* 1/2 (pow re 2)) (* im (- im re))) (pow im 2))>
#<alt 1>
#<alt (+ 1 (* -1 (/ re im)))>
#<alt (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im))>
#<alt (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im))>
#<alt 1>
#<alt (+ 1 (* -1 (/ re im)))>
#<alt (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) (* -1 re)) im)))>
#<alt (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) (* -1 re)) im)))>
#<alt (* 1/2 (* (sqrt (/ 1 im)) (* re (* (sqrt 1/2) (sqrt 2)))))>
#<alt (/ (+ (* -1/4 (* (sqrt (pow im 3)) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (sqrt im) (* re (* (sqrt 1/2) (sqrt 2)))))) im)>
#<alt (/ (+ (* 1/2 (* (sqrt im) (* re (* (sqrt 1/2) (sqrt 2))))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 im)) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2)))))))) im)>
#<alt (/ (+ (* 1/2 (* (sqrt im) (* re (* (sqrt 1/2) (sqrt 2))))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 im)) (/ (sqrt 2) (sqrt 1/2)))) (* im (+ (* -1/16 (* (sqrt (/ 1 im)) (/ (sqrt 2) (* re (pow (sqrt 1/2) 3))))) (* 1/4 (* (sqrt (/ 1 im)) (/ (sqrt 2) (* re (sqrt 1/2)))))))))) im)>
#<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 -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/8 (* (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 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -2) (sqrt -1)))))) (pow im 3))) (+ (* 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/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))>
#<alt (* 1/2 (* (sqrt (/ 1 im)) (* re (* (sqrt 1/2) (sqrt 2)))))>
#<alt (* re (+ (* -1/4 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2))))))>
#<alt (* re (+ (* -1/4 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2))))) (+ (* 1/4 (* (sqrt im) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* (pow re 2) (sqrt 1/2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2)))))))>
#<alt (* re (+ (* -1/4 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2))))) (+ (* 1/8 (* (sqrt (pow im 3)) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* (pow re 3) (pow (sqrt 1/2) 3))))) (+ (* 1/4 (* (sqrt im) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* (pow re 2) (sqrt 1/2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2))))))))>
#<alt (* -1/2 (* (sqrt (/ 1 im)) (* re (* (sqrt 1/2) (sqrt 2)))))>
#<alt (* -1 (* re (+ (* -1/4 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2)))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* re (sqrt 1/2))))) (* 1/4 (* (sqrt im) (/ (sqrt 2) (sqrt 1/2))))) re)) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2)))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (* (sqrt (pow im 3)) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* re (pow (sqrt 1/2) 3))))) (* 1/4 (* (sqrt im) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (sqrt 1/2))))) re)) (* 1/4 (* (sqrt im) (/ (sqrt 2) (sqrt 1/2))))) re)) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 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))>
#<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 (* (sqrt (/ 1 im)) (* re (* (sqrt 1/2) (sqrt 2))))>
#<alt (/ (+ (* -1/2 (* (sqrt (pow im 3)) (/ (sqrt 2) (sqrt 1/2)))) (* (sqrt im) (* re (* (sqrt 1/2) (sqrt 2))))) im)>
#<alt (/ (+ (* (sqrt im) (* re (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 im)) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2)))))))) im)>
#<alt (/ (+ (* (sqrt im) (* re (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 im)) (/ (sqrt 2) (sqrt 1/2)))) (* im (+ (* -1/8 (* (sqrt (/ 1 im)) (/ (sqrt 2) (* re (pow (sqrt 1/2) 3))))) (* 1/2 (* (sqrt (/ 1 im)) (/ (sqrt 2) (* re (sqrt 1/2)))))))))) im)>
#<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 -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/4 (* (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 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -2) (sqrt -1)))))) (pow im 3))) (+ (* 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/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))>
#<alt (* (sqrt (/ 1 im)) (* re (* (sqrt 1/2) (sqrt 2))))>
#<alt (* re (+ (* -1/2 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2))))) (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2)))))>
#<alt (* re (+ (* -1/2 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2))))) (+ (* 1/2 (* (sqrt im) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* (pow re 2) (sqrt 1/2))))) (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2))))))>
#<alt (* re (+ (* -1/2 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2))))) (+ (* 1/4 (* (sqrt (pow im 3)) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* (pow re 3) (pow (sqrt 1/2) 3))))) (+ (* 1/2 (* (sqrt im) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* (pow re 2) (sqrt 1/2))))) (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2)))))))>
#<alt (* -1 (* (sqrt (/ 1 im)) (* re (* (sqrt 1/2) (sqrt 2)))))>
#<alt (* -1 (* re (+ (* -1/2 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2))))) (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* re (sqrt 1/2))))) (* 1/2 (* (sqrt im) (/ (sqrt 2) (sqrt 1/2))))) re)) (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (sqrt (pow im 3)) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* re (pow (sqrt 1/2) 3))))) (* 1/2 (* (sqrt im) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (sqrt 1/2))))) re)) (* 1/2 (* (sqrt im) (/ (sqrt 2) (sqrt 1/2))))) re)) (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2))))))>
#<alt (* 1/2 (pow re 2))>
#<alt (* 1/2 (pow re 2))>
#<alt (* 1/2 (pow re 2))>
#<alt (* 1/2 (pow re 2))>
#<alt (* 1/2 (pow re 2))>
#<alt (* 1/2 (pow re 2))>
#<alt (* 1/2 (pow re 2))>
#<alt (* 1/2 (pow re 2))>
#<alt (* 1/2 (pow re 2))>
#<alt (* 1/2 (pow re 2))>
#<alt (* 1/2 (pow re 2))>
#<alt (* 1/2 (pow re 2))>
Calls

111 calls:

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

rewrite328.0ms (3.6%)

Algorithm
1×batch-egg-rewrite
Rules
3274×/-lowering-/.f32
3274×/-lowering-/.f64
3246×*-lowering-*.f32
3246×*-lowering-*.f64
2060×fma-lowering-fma.f32
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
036197
1199183
21851183
08958183
Stop Event
1×iter limit
1×node limit
Counts
22 → 393
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 -4)))
(sqrt (* re -4))
(* re -4)
(/ 1/2 (/ (sqrt re) im))
(/ (sqrt re) im)
(sqrt re)
(* re (+ -2 (/ (* 2 im) re)))
(* 1/2 (sqrt (* re (+ -2 (/ (* 2 im) re)))))
(sqrt (* re (+ -2 (/ (* 2 im) re))))
(+ -2 (/ (* 2 im) re))
(* im (+ (/ (* 1/2 (* re re)) (* im im)) (- 1 (/ re im))))
(* 2 (* im (+ (/ (* 1/2 (* re re)) (* im im)) (- 1 (/ re im)))))
(+ (/ (* 1/2 (* re re)) (* im im)) (- 1 (/ re im)))
(* 1/2 (sqrt (* 2 (* im (+ (/ (* 1/2 (* re re)) (* im im)) (- 1 (/ re im)))))))
(* re (+ -2 (/ re im)))
(* 2 im)
(sqrt (* 2 (* im (+ (/ (* 1/2 (* re re)) (* im im)) (- 1 (/ re im))))))
(* 1/2 (* re re))
Outputs
(*.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))
(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 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 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 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))) (sqrt.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 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 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))) (sqrt.f64 (+.f64 (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))) (sqrt.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal 2 binary64))))))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (*.f64 (*.f64 im im) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 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 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))) (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 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 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 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal 2 binary64))))))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))) (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 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))) (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 (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 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64))) (/.f64 re (/.f64 im re)))
(-.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (/.f64 (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.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 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.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 im) #s(literal 4 binary64)) (-.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)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 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 re (*.f64 (+.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 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.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 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 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 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))) (+.f64 (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))
(/.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.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 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 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 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))) (neg.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))) (neg.f64 (+.f64 (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))) (neg.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
(/.f64 (-.f64 (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (*.f64 (*.f64 im im) #s(literal 4 binary64))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal 2 binary64))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))) (neg.f64 (neg.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))) (*.f64 (*.f64 im im) #s(literal 4 binary64)))) (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 (*.f64 re #s(literal -2 binary64)) (*.f64 re #s(literal -2 binary64))) (-.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 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (*.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 im re)) (/.f64 re (/.f64 im re))) (*.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64))) (/.f64 re (/.f64 im re))))))
(pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 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 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 re (*.f64 (+.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 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))) (*.f64 im #s(literal 2 binary64)))))))
(*.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re (*.f64 (+.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 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
(*.f64 im #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) im)
(*.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 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 re #s(literal -4 binary64))) #s(literal 1/2 binary64)))
(sqrt.f64 (*.f64 re #s(literal -4 binary64)))
(pow.f64 (*.f64 re #s(literal -4 binary64)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 re #s(literal -4 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 re #s(literal -4 binary64)) (*.f64 re #s(literal -4 binary64))) #s(literal 1/4 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 re #s(literal -4 binary64))
(*.f64 #s(literal -4 binary64) re)
(exp.f64 (*.f64 (log.f64 (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64))) #s(literal -1 binary64)))
(neg.f64 (/.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 re) im)))
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64)))))
(/.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 re) im)))
(/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
(/.f64 (neg.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))) (neg.f64 (/.f64 #s(literal 1 binary64) im)))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) im)) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im)))
(*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 re) im)))
(*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal 1/2 binary64)) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 re))) (-.f64 #s(literal 0 binary64) im))
(*.f64 (/.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 1/4 binary64))) (/.f64 im (pow.f64 re #s(literal 1/4 binary64))))
(exp.f64 (*.f64 (log.f64 (/.f64 im (sqrt.f64 re))) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) im)) (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 re) im)))
(neg.f64 (-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 re) im)))
(/.f64 (sqrt.f64 re) im)
(/.f64 #s(literal 1 binary64) (/.f64 im (sqrt.f64 re)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 im (sqrt.f64 re)))))
(/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re)) (-.f64 #s(literal 0 binary64) im))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 im (sqrt.f64 re))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re))) (neg.f64 (-.f64 #s(literal 0 binary64) im)))
(/.f64 (*.f64 (sqrt.f64 re) #s(literal 1 binary64)) im)
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 re) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) im))
(pow.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1 binary64))
(pow.f64 (/.f64 im (sqrt.f64 re)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (sqrt.f64 re) (/.f64 #s(literal 1 binary64) im))
(*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))
(*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) im)))
(*.f64 (/.f64 #s(literal 1 binary64) im) (sqrt.f64 re))
(*.f64 (/.f64 #s(literal 1 binary64) im) (pow.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal -1 binary64)))
(*.f64 (pow.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) im))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 re))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) im)))
(exp.f64 (*.f64 (log.f64 re) #s(literal 1/2 binary64)))
(sqrt.f64 re)
(pow.f64 re #s(literal 1/2 binary64))
(pow.f64 (*.f64 re re) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 re #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 re)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 re #s(literal 1/4 binary64)) (pow.f64 re #s(literal 1/4 binary64)))
(+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 re #s(literal -2 binary64)))
(-.f64 (/.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 re #s(literal -2 binary64))) (-.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64)))) (/.f64 (*.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64))) (-.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64)))))
(fma.f64 #s(literal 2 binary64) (*.f64 (/.f64 im re) re) (*.f64 re #s(literal -2 binary64)))
(fma.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64) (*.f64 re #s(literal -2 binary64)))
(fma.f64 re #s(literal -2 binary64) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64)))
(fma.f64 re (/.f64 (*.f64 im #s(literal 2 binary64)) re) (*.f64 re #s(literal -2 binary64)))
(fma.f64 #s(literal -2 binary64) re (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64)))
(fma.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) re (*.f64 re #s(literal -2 binary64)))
(fma.f64 (*.f64 re #s(literal 2 binary64)) (/.f64 im re) (*.f64 re #s(literal -2 binary64)))
(fma.f64 (*.f64 re (*.f64 im #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) re) (*.f64 re #s(literal -2 binary64)))
(/.f64 (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) #s(literal 1 binary64))) (+.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 re #s(literal -2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 re #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64)))) (-.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (*.f64 re (+.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 re (*.f64 re re))))) (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64)) (/.f64 re (*.f64 im #s(literal 2 binary64))))))
(/.f64 (*.f64 re (-.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re)))) (+.f64 #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 im re))))
(/.f64 (*.f64 (+.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 re (*.f64 re re)))) re) (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64)) (/.f64 re (*.f64 im #s(literal 2 binary64))))))
(/.f64 (*.f64 (-.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re))) re) (+.f64 #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 im re))))
(/.f64 (neg.f64 (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) #s(literal 1 binary64)))) (neg.f64 (+.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 re #s(literal -2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 re #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64))))) (neg.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (*.f64 re (+.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 re (*.f64 re re)))))) (neg.f64 (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64)) (/.f64 re (*.f64 im #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (*.f64 re (-.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re))))) (neg.f64 (+.f64 #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 im re)))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 re (*.f64 re re)))) re)) (neg.f64 (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64)) (/.f64 re (*.f64 im #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re))) re)) (neg.f64 (+.f64 #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 im re)))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) #s(literal 1 binary64)) (*.f64 #s(literal -8 binary64) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64))) (-.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 re #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 re #s(literal -2 binary64))))))
(*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 im #s(literal 2 binary64)) re)))
(*.f64 (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 im #s(literal 2 binary64)) re)) re)
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64)))))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 im #s(literal 2 binary64)) re))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 im #s(literal 2 binary64)) re))))
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt.f64 (+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) #s(literal 1 binary64)))) (sqrt.f64 (+.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 re #s(literal -2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64))) (*.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64)))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 re #s(literal -2 binary64))) (*.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64))))) (sqrt.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64)))))
(/.f64 (sqrt.f64 (*.f64 re (+.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 re (*.f64 re re)))))) (sqrt.f64 (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64)) (/.f64 re (*.f64 im #s(literal 2 binary64)))))))
(/.f64 (sqrt.f64 (*.f64 re (-.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re))))) (sqrt.f64 (+.f64 #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 im re)))))
(/.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 re (*.f64 re re)))) re)) (sqrt.f64 (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64)) (/.f64 re (*.f64 im #s(literal 2 binary64)))))))
(/.f64 (sqrt.f64 (*.f64 (-.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re))) re)) (sqrt.f64 (+.f64 #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 im re)))))
(pow.f64 (+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64))) (+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64)))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64))))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 re) (sqrt.f64 (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 im #s(literal 2 binary64)) re))))
(*.f64 (sqrt.f64 (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 im #s(literal 2 binary64)) re))) (sqrt.f64 re))
(*.f64 (pow.f64 (+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64))) #s(literal 1/4 binary64)))
(+.f64 #s(literal -2 binary64) (/.f64 (*.f64 im #s(literal 2 binary64)) re))
(+.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64))
(-.f64 (/.f64 #s(literal 4 binary64) (+.f64 #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 im re)))) (/.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re)) (+.f64 #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 im re)))))
(-.f64 (/.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re)) (-.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64))) (/.f64 #s(literal 4 binary64) (-.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64))))
(fma.f64 im (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) re)) #s(literal -2 binary64))
(fma.f64 im (/.f64 #s(literal 2 binary64) re) #s(literal -2 binary64))
(fma.f64 #s(literal 2 binary64) (/.f64 im re) #s(literal -2 binary64))
(fma.f64 (*.f64 im #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) re) #s(literal -2 binary64))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64))
(fma.f64 (*.f64 im #s(literal -2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)) #s(literal -2 binary64))
(fma.f64 (/.f64 im re) #s(literal 2 binary64) #s(literal -2 binary64))
(fma.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 im #s(literal 2 binary64)) #s(literal -2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64)) (/.f64 re (*.f64 im #s(literal 2 binary64))))) (+.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 re (*.f64 re re))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 im re))) (-.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re)))))
(/.f64 (+.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 re (*.f64 re re)))) (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64)) (/.f64 re (*.f64 im #s(literal 2 binary64))))))
(/.f64 (+.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 re (*.f64 re re)))) (+.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re)) (-.f64 #s(literal 4 binary64) (*.f64 #s(literal -4 binary64) (/.f64 im re)))))
(/.f64 (-.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re))) (+.f64 #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 im re))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64)) (/.f64 re (*.f64 im #s(literal 2 binary64))))) (+.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 re (*.f64 re re)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 im re))) (-.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re))))))
(/.f64 (neg.f64 (+.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 re (*.f64 re re))))) (neg.f64 (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64)) (/.f64 re (*.f64 im #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (+.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 re (*.f64 re re))))) (neg.f64 (+.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re)) (-.f64 #s(literal 4 binary64) (*.f64 #s(literal -4 binary64) (/.f64 im re))))))
(/.f64 (neg.f64 (-.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re)))) (neg.f64 (+.f64 #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 im re)))))
(/.f64 (-.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re)) #s(literal 4 binary64)) (-.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64)))
(/.f64 (neg.f64 (neg.f64 (+.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 re (*.f64 re re)))))) (neg.f64 (neg.f64 (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64)) (/.f64 re (*.f64 im #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re))))) (neg.f64 (neg.f64 (+.f64 #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 im re))))))
(/.f64 (neg.f64 (-.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re)) #s(literal 4 binary64))) (neg.f64 (-.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64))))
(pow.f64 (/.f64 (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64)) (/.f64 re (*.f64 im #s(literal 2 binary64))))) (+.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 re (*.f64 re re))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 im re))) (-.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re)))) #s(literal -1 binary64))
(*.f64 (+.f64 #s(literal -8 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64)) (/.f64 re (*.f64 im #s(literal 2 binary64)))))))
(*.f64 (-.f64 #s(literal 4 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 re re))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal -2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 im re)))))
(+.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im))
(+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))))
(-.f64 (/.f64 (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))))) (/.f64 (*.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))) (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))))))
(fma.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (/.f64 re im) (/.f64 im re)) im) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))))
(fma.f64 im (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))))
(fma.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im))
(fma.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (/.f64 #s(literal 1 binary64) im) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))))
(fma.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) im (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))))
(fma.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) im (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im))
(fma.f64 (/.f64 #s(literal 1/2 binary64) im) (*.f64 (/.f64 re (/.f64 im re)) im) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))))
(fma.f64 (*.f64 im #s(literal 1/2 binary64)) (/.f64 (/.f64 re im) (/.f64 im re)) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))))
(fma.f64 (*.f64 im (*.f64 re (*.f64 #s(literal 1/2 binary64) re))) (/.f64 #s(literal 1 binary64) (*.f64 im im)) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))))
(fma.f64 (*.f64 im (/.f64 #s(literal 1/2 binary64) im)) (/.f64 re (/.f64 im re)) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))))
(/.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))) (*.f64 im (*.f64 im im)))) (+.f64 (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) (-.f64 (*.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))) (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) (*.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))))) (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))))
(/.f64 (*.f64 im (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re)))) (*.f64 im (*.f64 im im))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))))) (+.f64 (*.f64 (*.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 (/.f64 re im) (/.f64 im re))) #s(literal 1/4 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im))))))
(/.f64 (*.f64 im (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)) (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))))) (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))))
(/.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re)))) (*.f64 im (*.f64 im im))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))))) im) (+.f64 (*.f64 (*.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 (/.f64 re im) (/.f64 im re))) #s(literal 1/4 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im))))))
(/.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)) (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))) im) (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))))
(/.f64 (neg.f64 (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))) (*.f64 im (*.f64 im im))))) (neg.f64 (+.f64 (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) (-.f64 (*.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))) (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) (*.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))))) (neg.f64 (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))))))
(/.f64 (neg.f64 (*.f64 im (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re)))) (*.f64 im (*.f64 im im))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))))))) (neg.f64 (+.f64 (*.f64 (*.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 (/.f64 re im) (/.f64 im re))) #s(literal 1/4 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)))))))
(/.f64 (neg.f64 (*.f64 im (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)) (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))))) (neg.f64 (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))))
(/.f64 (neg.f64 (*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re)))) (*.f64 im (*.f64 im im))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))))) im)) (neg.f64 (+.f64 (*.f64 (*.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 (/.f64 re im) (/.f64 im re))) #s(literal 1/4 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)))))))
(/.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)) (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))) im)) (neg.f64 (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))) (*.f64 im (*.f64 im im))) (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re))))) (+.f64 (*.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))) (-.f64 (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) (*.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)))))
(*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)) im)
(+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) (*.f64 #s(literal 2 binary64) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))))
(+.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im))) (*.f64 (*.f64 im #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 re im))))
(+.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 re im))) (*.f64 (*.f64 im #s(literal 2 binary64)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im))))
(+.f64 (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im) #s(literal 2 binary64)) (*.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) #s(literal 2 binary64)))
(+.f64 (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (*.f64 im #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))
(+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (*.f64 im #s(literal 2 binary64))))
(fma.f64 #s(literal 2 binary64) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im) (*.f64 #s(literal 2 binary64) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))))
(fma.f64 (*.f64 im #s(literal 2 binary64)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (*.f64 (*.f64 im #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 re im))))
(fma.f64 (*.f64 im #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 (*.f64 im #s(literal 2 binary64)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im))))
(fma.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (*.f64 im #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))
(fma.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (*.f64 im #s(literal 2 binary64))))
(fma.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im) #s(literal 2 binary64) (*.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) #s(literal 2 binary64)))
(/.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re)))) (*.f64 im (*.f64 im im))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))))) (+.f64 (*.f64 (*.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 (/.f64 re im) (/.f64 im re))) #s(literal 1/4 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im))))))
(/.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)) (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))))) (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))))
(/.f64 (neg.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re)))) (*.f64 im (*.f64 im im))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))))))) (neg.f64 (+.f64 (*.f64 (*.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 (/.f64 re im) (/.f64 im re))) #s(literal 1/4 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)))))))
(/.f64 (neg.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)) (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))))) (neg.f64 (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im))) (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))) (*.f64 #s(literal 2 binary64) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))))) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) (*.f64 #s(literal 2 binary64) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 re im))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im))) (*.f64 (*.f64 im #s(literal 2 binary64)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)))) (-.f64 (*.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 re im))) (*.f64 (*.f64 im #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))) (*.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im))) (*.f64 (*.f64 im #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 re im))) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 re im))) (*.f64 (*.f64 im #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))) (-.f64 (*.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im))) (*.f64 (*.f64 im #s(literal 2 binary64)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)))) (*.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 re im))) (*.f64 (*.f64 im #s(literal 2 binary64)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im) #s(literal 2 binary64)) (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im) #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) #s(literal 2 binary64)) (*.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) #s(literal 2 binary64))) (*.f64 (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im) #s(literal 2 binary64)) (*.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (*.f64 im #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (*.f64 im #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (*.f64 im #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (*.f64 (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (*.f64 im #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (*.f64 im #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (*.f64 im #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (*.f64 im #s(literal 2 binary64)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (*.f64 im #s(literal 2 binary64)))))))
(*.f64 im (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im))))
(*.f64 im (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)) #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) (+.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)))
(*.f64 (*.f64 im #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)) (*.f64 im #s(literal 2 binary64)))
(*.f64 (+.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) #s(literal 2 binary64))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im))) im)
(+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(+.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 re im)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im))))
(+.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)))
(+.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (/.f64 re im)))
(-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im))
(-.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (/.f64 re im))
(-.f64 (/.f64 (*.f64 (*.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 (/.f64 re im) (/.f64 im re))) #s(literal 1/4 binary64)) (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))) (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))) (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))))
(-.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (*.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)))) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64))) (+.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (*.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (/.f64 re im))))) (/.f64 (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64))) (+.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (*.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (/.f64 re im))))))
(-.f64 (/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))) (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)))) (/.f64 (*.f64 (*.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 (/.f64 re im) (/.f64 im re))) #s(literal 1/4 binary64)) (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)))))
(-.f64 (/.f64 (*.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64))) (+.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (/.f64 re im))) (/.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (+.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (/.f64 re im))))
(fma.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 re im) (/.f64 im re)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(fma.f64 (*.f64 re re) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (*.f64 im im))) (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(fma.f64 (*.f64 re re) (/.f64 #s(literal 1/2 binary64) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(fma.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (/.f64 #s(literal 1 binary64) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(fma.f64 (*.f64 (*.f64 re re) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 im im))) (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(fma.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 re (/.f64 im re)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(fma.f64 (/.f64 (/.f64 re im) (/.f64 im re)) #s(literal 1/2 binary64) (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(fma.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64))))) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)))
(fma.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(fma.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 re im) (/.f64 im re))) (/.f64 #s(literal 1 binary64) (+.f64 (/.f64 re im) #s(literal 1 binary64))) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)))
(fma.f64 (/.f64 re (/.f64 im re)) (/.f64 #s(literal 1/2 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(fma.f64 (*.f64 #s(literal 1/2 binary64) re) (*.f64 re (/.f64 #s(literal 1 binary64) (*.f64 im im))) (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(fma.f64 (*.f64 #s(literal 1/2 binary64) re) (/.f64 re (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(fma.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im) (/.f64 #s(literal 1 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(fma.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) re) im) (/.f64 re im) (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 (/.f64 re im) (/.f64 im re))) #s(literal 1/4 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im))))) (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re)))) (*.f64 im (*.f64 im im))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)) (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))))))
(/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re)))) (*.f64 im (*.f64 im im))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))))) (+.f64 (*.f64 (*.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 (/.f64 re im) (/.f64 im re))) #s(literal 1/4 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im))))))
(/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re)))) (*.f64 im (*.f64 im im))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))))) (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))) (/.f64 (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 re im)))) (/.f64 (*.f64 im im) (*.f64 re (*.f64 #s(literal 1/2 binary64) re))))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)) (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))) (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 (/.f64 re im) (/.f64 im re))) #s(literal 1/4 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im))))) (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re)))) (*.f64 im (*.f64 im im))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)) (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))))))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64))))) (*.f64 (*.f64 im im) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))))) (*.f64 (*.f64 im im) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (+.f64 (/.f64 re im) #s(literal 1 binary64))) (*.f64 (*.f64 im im) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 re im) (/.f64 im re))))) (*.f64 (*.f64 im im) (+.f64 (/.f64 re im) #s(literal 1 binary64))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64))))) (*.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 #s(literal 1/2 binary64) re))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))))) (*.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 #s(literal 1/2 binary64) re))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64))))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (+.f64 (/.f64 re im) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 #s(literal 1/2 binary64) re))) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 re im) (/.f64 im re))))) (*.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 #s(literal 1/2 binary64) re))) (+.f64 (/.f64 re im) #s(literal 1 binary64))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal -1/2 binary64)) (+.f64 (/.f64 re im) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 re im) (/.f64 im re))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (+.f64 (/.f64 re im) #s(literal 1 binary64))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64))))) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))))) (*.f64 im (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64))))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im) (+.f64 (/.f64 re im) #s(literal 1 binary64))) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 re im) (/.f64 im re))))) (*.f64 im (+.f64 (/.f64 re im) #s(literal 1 binary64))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))) (*.f64 im im)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64)))) (*.f64 re (*.f64 #s(literal 1/2 binary64) re)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64)))) (*.f64 im im)))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))) (/.f64 (*.f64 im im) (*.f64 re (*.f64 #s(literal 1/2 binary64) re)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64)))) #s(literal 1 binary64))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64)))) (/.f64 (*.f64 im im) (*.f64 re (*.f64 #s(literal 1/2 binary64) re)))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) (*.f64 im im))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64)))) (*.f64 (*.f64 re re) #s(literal -1/2 binary64)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))) im) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64)))) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64)))) im))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 re im) (/.f64 im re))) (*.f64 im im)) (*.f64 (+.f64 (/.f64 re im) #s(literal 1 binary64)) (*.f64 re (*.f64 #s(literal 1/2 binary64) re)))) (*.f64 (+.f64 (/.f64 re im) #s(literal 1 binary64)) (*.f64 im im)))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 re im) (/.f64 im re))) (/.f64 (*.f64 im im) (*.f64 re (*.f64 #s(literal 1/2 binary64) re)))) (*.f64 (+.f64 (/.f64 re im) #s(literal 1 binary64)) #s(literal 1 binary64))) (*.f64 (+.f64 (/.f64 re im) #s(literal 1 binary64)) (/.f64 (*.f64 im im) (*.f64 re (*.f64 #s(literal 1/2 binary64) re)))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 re im) (/.f64 im re))) (-.f64 #s(literal 0 binary64) (*.f64 im im))) (*.f64 (+.f64 (/.f64 re im) #s(literal 1 binary64)) (*.f64 (*.f64 re re) #s(literal -1/2 binary64)))) (*.f64 (+.f64 (/.f64 re im) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 re im) (/.f64 im re))) im) (*.f64 (+.f64 (/.f64 re im) #s(literal 1 binary64)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im))) (*.f64 (+.f64 (/.f64 re im) #s(literal 1 binary64)) im))
(/.f64 (neg.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re)))) (*.f64 im (*.f64 im im))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))))) (neg.f64 (+.f64 (*.f64 (*.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 (/.f64 re im) (/.f64 im re))) #s(literal 1/4 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)))))))
(/.f64 (neg.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re)))) (*.f64 im (*.f64 im im))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))))) (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))) (/.f64 (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 re im)))) (/.f64 (*.f64 im im) (*.f64 re (*.f64 #s(literal 1/2 binary64) re)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)) (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))))) (neg.f64 (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))))
(/.f64 (-.f64 (*.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (*.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)))) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64))) (+.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (*.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (/.f64 re im)))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))) (*.f64 (*.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 (/.f64 re im) (/.f64 im re))) #s(literal 1/4 binary64))) (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im))))
(/.f64 (-.f64 (*.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64))) (/.f64 (/.f64 re im) (/.f64 im re))) (+.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (/.f64 re im)))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64))))) (*.f64 (*.f64 im im) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))))))) (neg.f64 (*.f64 (*.f64 im im) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (+.f64 (/.f64 re im) #s(literal 1 binary64))) (*.f64 (*.f64 im im) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 re im) (/.f64 im re)))))) (neg.f64 (*.f64 (*.f64 im im) (+.f64 (/.f64 re im) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (+.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64))))) (*.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 #s(literal 1/2 binary64) re))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))))))) (neg.f64 (*.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 #s(literal 1/2 binary64) re))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (+.f64 (*.f64 #s(literal 1 binary64) (+.f64 (/.f64 re im) #s(literal 1 binary64))) (*.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 #s(literal 1/2 binary64) re))) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 re im) (/.f64 im re)))))) (neg.f64 (*.f64 (/.f64 (*.f64 im im) (*.f64 re (*.f64 #s(literal 1/2 binary64) re))) (+.f64 (/.f64 re im) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal -1/2 binary64)) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))))))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal -1/2 binary64)) (+.f64 (/.f64 re im) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 re im) (/.f64 im re)))))) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (+.f64 (/.f64 re im) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (+.f64 (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64))))) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))))))) (neg.f64 (*.f64 im (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64)))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im) (+.f64 (/.f64 re im) #s(literal 1 binary64))) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 re im) (/.f64 im re)))))) (neg.f64 (*.f64 im (+.f64 (/.f64 re im) #s(literal 1 binary64)))))
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))) (*.f64 im im)) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64)))) (*.f64 re (*.f64 #s(literal 1/2 binary64) re))))) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64)))) (*.f64 im im))))
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))) (/.f64 (*.f64 im im) (*.f64 re (*.f64 #s(literal 1/2 binary64) re)))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64)))) #s(literal 1 binary64)))) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64)))) (/.f64 (*.f64 im im) (*.f64 re (*.f64 #s(literal 1/2 binary64) re))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) (*.f64 im im))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64)))) (*.f64 (*.f64 re re) #s(literal -1/2 binary64))))) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64)))) (-.f64 #s(literal 0 binary64) (*.f64 im im)))))
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))) im) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64)))) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)))) (neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) (+.f64 (/.f64 re im) #s(literal 1 binary64)))) im)))
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 re im) (/.f64 im re))) (*.f64 im im)) (*.f64 (+.f64 (/.f64 re im) #s(literal 1 binary64)) (*.f64 re (*.f64 #s(literal 1/2 binary64) re))))) (neg.f64 (*.f64 (+.f64 (/.f64 re im) #s(literal 1 binary64)) (*.f64 im im))))
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 re im) (/.f64 im re))) (/.f64 (*.f64 im im) (*.f64 re (*.f64 #s(literal 1/2 binary64) re)))) (*.f64 (+.f64 (/.f64 re im) #s(literal 1 binary64)) #s(literal 1 binary64)))) (neg.f64 (*.f64 (+.f64 (/.f64 re im) #s(literal 1 binary64)) (/.f64 (*.f64 im im) (*.f64 re (*.f64 #s(literal 1/2 binary64) re))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 re im) (/.f64 im re))) (-.f64 #s(literal 0 binary64) (*.f64 im im))) (*.f64 (+.f64 (/.f64 re im) #s(literal 1 binary64)) (*.f64 (*.f64 re re) #s(literal -1/2 binary64))))) (neg.f64 (*.f64 (+.f64 (/.f64 re im) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 im im)))))
(/.f64 (neg.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 re im) (/.f64 im re))) im) (*.f64 (+.f64 (/.f64 re im) #s(literal 1 binary64)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)))) (neg.f64 (*.f64 (+.f64 (/.f64 re im) #s(literal 1 binary64)) im)))
(/.f64 (neg.f64 (neg.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re)))) (*.f64 im (*.f64 im im))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 (/.f64 re im) (/.f64 im re))) #s(literal 1/4 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im))))))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)) (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))))) (neg.f64 (neg.f64 (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (*.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)))) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))))) (neg.f64 (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64))) (+.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (*.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (/.f64 re im))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))) (*.f64 (*.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 (/.f64 re im) (/.f64 im re))) #s(literal 1/4 binary64)))) (neg.f64 (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)))))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64))) (/.f64 (/.f64 re im) (/.f64 im re)))) (neg.f64 (+.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (/.f64 re im))))
(/.f64 (+.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 re im)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 re im)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im))) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 re im)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)))) (*.f64 #s(literal 1 binary64) (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 re im)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)))))))
(/.f64 (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (*.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)))) (/.f64 (*.f64 re (*.f64 re re)) (neg.f64 (*.f64 im (*.f64 im im))))) (+.f64 (*.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64))) (-.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (*.f64 (+.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) #s(literal 1 binary64)) (-.f64 #s(literal 0 binary64) (/.f64 re im))))))
(pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 (/.f64 re im) (/.f64 im re))) #s(literal 1/4 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im))))) (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re)))) (*.f64 im (*.f64 im im))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)) (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))))) #s(literal -1 binary64))
(*.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re)))) (*.f64 im (*.f64 im im))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 (/.f64 re im) (/.f64 im re))) #s(literal 1/4 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)))))))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)) (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))) (/.f64 #s(literal 1 binary64) (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)))))
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (+.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (+.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im))))
(+.f64 (/.f64 re (/.f64 im re)) (*.f64 re #s(literal -2 binary64)))
(+.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 re (/.f64 im re)))
(-.f64 (/.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 re #s(literal -2 binary64))) (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 re (/.f64 im re)))) (/.f64 (*.f64 (/.f64 re (/.f64 im re)) (/.f64 re (/.f64 im re))) (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 re (/.f64 im re)))))
(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 (+.f64 (*.f64 #s(literal -8 binary64) (*.f64 re (*.f64 re re))) (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 re #s(literal -2 binary64))) (-.f64 (*.f64 (/.f64 re (/.f64 im re)) (/.f64 re (/.f64 im re))) (*.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 re (/.f64 im re))))))
(/.f64 (-.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 re #s(literal -2 binary64))) (*.f64 (/.f64 re (/.f64 im re)) (/.f64 re (/.f64 im re)))) (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 re (/.f64 im re))))
(/.f64 (*.f64 re (+.f64 #s(literal -8 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))))) (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 re im) #s(literal -2 binary64)) (/.f64 im re))))
(/.f64 (*.f64 re (-.f64 #s(literal 4 binary64) (/.f64 (/.f64 re im) (/.f64 im re)))) (-.f64 #s(literal -2 binary64) (/.f64 re im)))
(/.f64 (*.f64 (+.f64 #s(literal -8 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))) re) (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 re im) #s(literal -2 binary64)) (/.f64 im re))))
(/.f64 (*.f64 (-.f64 #s(literal 4 binary64) (/.f64 (/.f64 re 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 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re))))) (neg.f64 (+.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 re #s(literal -2 binary64))) (-.f64 (*.f64 (/.f64 re (/.f64 im re)) (/.f64 re (/.f64 im re))) (*.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 re (/.f64 im re)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 re #s(literal -2 binary64))) (*.f64 (/.f64 re (/.f64 im re)) (/.f64 re (/.f64 im re))))) (neg.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 re (/.f64 im re)))))
(/.f64 (neg.f64 (*.f64 re (+.f64 #s(literal -8 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))))) (neg.f64 (+.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))))) (neg.f64 (-.f64 #s(literal -2 binary64) (/.f64 re im))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal -8 binary64) (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im)))) re)) (neg.f64 (+.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)) (neg.f64 (-.f64 #s(literal -2 binary64) (/.f64 re im))))
(/.f64 (+.f64 (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re))) (*.f64 #s(literal -8 binary64) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 (/.f64 re (/.f64 im re)) (/.f64 re (/.f64 im re))) (-.f64 (*.f64 (*.f64 re #s(literal -2 binary64)) (*.f64 re #s(literal -2 binary64))) (*.f64 (/.f64 re (/.f64 im re)) (*.f64 re #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 im #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) im)
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)))) #s(literal 1/2 binary64)))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (/.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re)))) (*.f64 im (*.f64 im im))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))))))) (sqrt.f64 (+.f64 (*.f64 (*.f64 (/.f64 (/.f64 re im) (/.f64 im re)) (/.f64 (/.f64 re im) (/.f64 im re))) #s(literal 1/4 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)))))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)) (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))))) (sqrt.f64 (-.f64 (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) (*.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im)))))
(pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im))))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im))) (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im))) #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im))) (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im))) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 im) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 im) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 im) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)))))
(*.f64 (sqrt.f64 im) (sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)) #s(literal 2 binary64))))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im))) #s(literal 1/2 binary64)) (sqrt.f64 im))
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)))) (sqrt.f64 im))
(*.f64 #s(literal 1/2 binary64) (*.f64 re re))
(*.f64 re (*.f64 #s(literal 1/2 binary64) re))
(*.f64 (*.f64 re re) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) re) re)

simplify344.0ms (3.8%)

Algorithm
1×egg-herbie
Rules
6084×*-lowering-*.f32
6084×*-lowering-*.f64
5250×+-lowering-+.f64
5250×+-lowering-+.f32
1834×/-lowering-/.f32
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
08626503
131155963
081495963
Stop Event
1×iter limit
1×node limit
Counts
444 → 444
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 -4)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(* -1 (* (sqrt re) (sqrt -1)))
(* -1 (* (sqrt re) (sqrt -1)))
(* -1 (* (sqrt re) (sqrt -1)))
(* -1 (* (sqrt re) (sqrt -1)))
(* (sqrt re) (sqrt -4))
(* (sqrt re) (sqrt -4))
(* (sqrt re) (sqrt -4))
(* (sqrt re) (sqrt -4))
(* (sqrt re) (sqrt -4))
(* (sqrt re) (sqrt -4))
(* (sqrt re) (sqrt -4))
(* (sqrt re) (sqrt -4))
(* -2 (* (sqrt re) (sqrt -1)))
(* -2 (* (sqrt re) (sqrt -1)))
(* -2 (* (sqrt re) (sqrt -1)))
(* -2 (* (sqrt re) (sqrt -1)))
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re)))
(* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re)))
(* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re)))
(* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re)))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(* (/ 1 im) (sqrt re))
(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)))
(* 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)))))
(* -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)))
(* 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 -2) (pow (sqrt -1) 2))))
(* -1 (* re (+ (* -1/2 (* (/ (* im (pow (sqrt -1) 2)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (pow (sqrt -1) 2)))))))
(* -1 (* re (+ (* -1/2 (* (/ (* im (pow (sqrt -1) 2)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))) (+ (* -1/4 (* (/ (* (pow im 2) (pow (sqrt -1) 2)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (pow (sqrt -1) 2))))))))
(* -1 (* re (+ (* -1/2 (* (/ (* im (pow (sqrt -1) 2)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))) (+ (* -1/4 (* (/ (* (pow im 2) (pow (sqrt -1) 2)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/4 (* (/ (* (pow im 3) (pow (sqrt -1) 2)) (pow (sqrt -2) 5)) (sqrt (/ 1 (pow re 7))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (pow (sqrt -1) 2)))))))))
(* 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)))))))))
(* (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 -2) (pow (sqrt -1) 2))))
(* -1 (* re (+ (* -1 (* (/ (* im (pow (sqrt -1) 2)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -2) (pow (sqrt -1) 2))))))
(* -1 (* re (+ (* -1 (* (/ (* im (pow (sqrt -1) 2)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))) (+ (* -1/2 (* (/ (* (pow im 2) (pow (sqrt -1) 2)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -2) (pow (sqrt -1) 2)))))))
(* -1 (* re (+ (* -1 (* (/ (* im (pow (sqrt -1) 2)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))) (+ (* -1/2 (* (/ (* (pow im 2) (pow (sqrt -1) 2)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/2 (* (/ (* (pow im 3) (pow (sqrt -1) 2)) (pow (sqrt -2) 5)) (sqrt (/ 1 (pow re 7))))) (* (sqrt (/ 1 re)) (* (sqrt -2) (pow (sqrt -1) 2))))))))
(* (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))))))))
-2
(- (* 2 (/ im re)) 2)
(- (* 2 (/ im re)) 2)
(- (* 2 (/ im re)) 2)
(* 2 (/ im re))
(* im (- (* 2 (/ 1 re)) (* 2 (/ 1 im))))
(* im (- (* 2 (/ 1 re)) (* 2 (/ 1 im))))
(* im (- (* 2 (/ 1 re)) (* 2 (/ 1 im))))
(* 2 (/ im re))
(* -1 (* im (- (* 2 (/ 1 im)) (* 2 (/ 1 re)))))
(* -1 (* im (- (* 2 (/ 1 im)) (* 2 (/ 1 re)))))
(* -1 (* im (- (* 2 (/ 1 im)) (* 2 (/ 1 re)))))
(* 2 (/ im re))
(/ (+ (* -2 re) (* 2 im)) re)
(/ (+ (* -2 re) (* 2 im)) re)
(/ (+ (* -2 re) (* 2 im)) re)
-2
(- (* 2 (/ im re)) 2)
(- (* 2 (/ im re)) 2)
(- (* 2 (/ im re)) 2)
-2
(- (* 2 (/ im re)) 2)
(- (* 2 (/ im re)) 2)
(- (* 2 (/ im re)) 2)
(* 1/2 (/ (pow re 2) im))
(/ (+ (* -1 (* im re)) (* 1/2 (pow re 2))) im)
(/ (+ (* 1/2 (pow re 2)) (* im (+ im (* -1 re)))) im)
(/ (+ (* 1/2 (pow re 2)) (* im (+ im (* -1 re)))) im)
im
(* im (+ 1 (* -1 (/ re im))))
(* im (+ 1 (+ (* -1 (/ re im)) (* 1/2 (/ (pow re 2) (pow im 2))))))
(* im (+ 1 (+ (* -1 (/ re im)) (* 1/2 (/ (pow re 2) (pow im 2))))))
im
(* -1 (* im (- (/ re im) 1)))
(* -1 (* im (- (* -1 (/ (+ (* -1 re) (* 1/2 (/ (pow re 2) im))) im)) 1)))
(* -1 (* im (- (* -1 (/ (+ (* -1 re) (* 1/2 (/ (pow re 2) im))) im)) 1)))
im
(+ im (* -1 re))
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(* 1/2 (/ (pow re 2) im))
(* (pow re 2) (- (* 1/2 (/ 1 im)) (/ 1 re)))
(* (pow re 2) (- (+ (* 1/2 (/ 1 im)) (/ im (pow re 2))) (/ 1 re)))
(* (pow re 2) (- (+ (* 1/2 (/ 1 im)) (/ im (pow re 2))) (/ 1 re)))
(* 1/2 (/ (pow re 2) im))
(* (pow re 2) (- (* 1/2 (/ 1 im)) (/ 1 re)))
(* (pow re 2) (+ (* -1 (/ (+ 1 (* -1 (/ im re))) re)) (* 1/2 (/ 1 im))))
(* (pow re 2) (+ (* -1 (/ (+ 1 (* -1 (/ im re))) re)) (* 1/2 (/ 1 im))))
(/ (pow re 2) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)
(/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)
(* 2 im)
(* im (+ 2 (* -2 (/ re im))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(* 2 im)
(* -1 (* im (- (* 2 (/ re im)) 2)))
(* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))
(* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))
(* 2 im)
(+ (* -2 re) (* 2 im))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(/ (pow re 2) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re))))
(* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re))))
(/ (pow re 2) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im)))
(* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im)))
1
(+ 1 (* -1 (/ re im)))
(+ 1 (* re (- (* 1/2 (/ re (pow im 2))) (/ 1 im))))
(+ 1 (* re (- (* 1/2 (/ re (pow im 2))) (/ 1 im))))
(* 1/2 (/ (pow re 2) (pow im 2)))
(* (pow re 2) (- (* 1/2 (/ 1 (pow im 2))) (/ 1 (* im re))))
(* (pow re 2) (- (+ (* 1/2 (/ 1 (pow im 2))) (/ 1 (pow re 2))) (/ 1 (* im re))))
(* (pow re 2) (- (+ (* 1/2 (/ 1 (pow im 2))) (/ 1 (pow re 2))) (/ 1 (* im re))))
(* 1/2 (/ (pow re 2) (pow im 2)))
(* (pow re 2) (- (* 1/2 (/ 1 (pow im 2))) (/ 1 (* im re))))
(* (pow re 2) (+ (* -1 (/ (- (/ 1 im) (/ 1 re)) re)) (* 1/2 (/ 1 (pow im 2)))))
(* (pow re 2) (+ (* -1 (/ (- (/ 1 im) (/ 1 re)) re)) (* 1/2 (/ 1 (pow im 2)))))
(* 1/2 (/ (pow re 2) (pow im 2)))
(/ (+ (* -1 (* im re)) (* 1/2 (pow re 2))) (pow im 2))
(/ (+ (* 1/2 (pow re 2)) (* im (- im re))) (pow im 2))
(/ (+ (* 1/2 (pow re 2)) (* im (- im re))) (pow im 2))
1
(+ 1 (* -1 (/ re im)))
(- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im))
(- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im))
1
(+ 1 (* -1 (/ re im)))
(+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) (* -1 re)) im)))
(+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) (* -1 re)) im)))
(* 1/2 (* (sqrt (/ 1 im)) (* re (* (sqrt 1/2) (sqrt 2)))))
(/ (+ (* -1/4 (* (sqrt (pow im 3)) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (sqrt im) (* re (* (sqrt 1/2) (sqrt 2)))))) im)
(/ (+ (* 1/2 (* (sqrt im) (* re (* (sqrt 1/2) (sqrt 2))))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 im)) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2)))))))) im)
(/ (+ (* 1/2 (* (sqrt im) (* re (* (sqrt 1/2) (sqrt 2))))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 im)) (/ (sqrt 2) (sqrt 1/2)))) (* im (+ (* -1/16 (* (sqrt (/ 1 im)) (/ (sqrt 2) (* re (pow (sqrt 1/2) 3))))) (* 1/4 (* (sqrt (/ 1 im)) (/ (sqrt 2) (* re (sqrt 1/2)))))))))) im)
(* 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 -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/8 (* (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 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -2) (sqrt -1)))))) (pow im 3))) (+ (* 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/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (sqrt (/ 1 im)) (* re (* (sqrt 1/2) (sqrt 2)))))
(* re (+ (* -1/4 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2))))))
(* re (+ (* -1/4 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2))))) (+ (* 1/4 (* (sqrt im) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* (pow re 2) (sqrt 1/2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2)))))))
(* re (+ (* -1/4 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2))))) (+ (* 1/8 (* (sqrt (pow im 3)) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* (pow re 3) (pow (sqrt 1/2) 3))))) (+ (* 1/4 (* (sqrt im) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* (pow re 2) (sqrt 1/2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2))))))))
(* -1/2 (* (sqrt (/ 1 im)) (* re (* (sqrt 1/2) (sqrt 2)))))
(* -1 (* re (+ (* -1/4 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* re (sqrt 1/2))))) (* 1/4 (* (sqrt im) (/ (sqrt 2) (sqrt 1/2))))) re)) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (* (sqrt (pow im 3)) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* re (pow (sqrt 1/2) 3))))) (* 1/4 (* (sqrt im) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (sqrt 1/2))))) re)) (* 1/4 (* (sqrt im) (/ (sqrt 2) (sqrt 1/2))))) re)) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 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))
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* (sqrt (/ 1 im)) (* re (* (sqrt 1/2) (sqrt 2))))
(/ (+ (* -1/2 (* (sqrt (pow im 3)) (/ (sqrt 2) (sqrt 1/2)))) (* (sqrt im) (* re (* (sqrt 1/2) (sqrt 2))))) im)
(/ (+ (* (sqrt im) (* re (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 im)) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2)))))))) im)
(/ (+ (* (sqrt im) (* re (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 im)) (/ (sqrt 2) (sqrt 1/2)))) (* im (+ (* -1/8 (* (sqrt (/ 1 im)) (/ (sqrt 2) (* re (pow (sqrt 1/2) 3))))) (* 1/2 (* (sqrt (/ 1 im)) (/ (sqrt 2) (* re (sqrt 1/2)))))))))) im)
(* (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 -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/4 (* (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 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -2) (sqrt -1)))))) (pow im 3))) (+ (* 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/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(* (sqrt (/ 1 im)) (* re (* (sqrt 1/2) (sqrt 2))))
(* re (+ (* -1/2 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2))))) (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2)))))
(* re (+ (* -1/2 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2))))) (+ (* 1/2 (* (sqrt im) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* (pow re 2) (sqrt 1/2))))) (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2))))))
(* re (+ (* -1/2 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2))))) (+ (* 1/4 (* (sqrt (pow im 3)) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* (pow re 3) (pow (sqrt 1/2) 3))))) (+ (* 1/2 (* (sqrt im) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* (pow re 2) (sqrt 1/2))))) (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2)))))))
(* -1 (* (sqrt (/ 1 im)) (* re (* (sqrt 1/2) (sqrt 2)))))
(* -1 (* re (+ (* -1/2 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2))))) (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* re (sqrt 1/2))))) (* 1/2 (* (sqrt im) (/ (sqrt 2) (sqrt 1/2))))) re)) (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (sqrt (pow im 3)) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* re (pow (sqrt 1/2) 3))))) (* 1/2 (* (sqrt im) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (sqrt 1/2))))) re)) (* 1/2 (* (sqrt im) (/ (sqrt 2) (sqrt 1/2))))) re)) (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2))))))
(* 1/2 (pow re 2))
(* 1/2 (pow re 2))
(* 1/2 (pow re 2))
(* 1/2 (pow re 2))
(* 1/2 (pow re 2))
(* 1/2 (pow re 2))
(* 1/2 (pow re 2))
(* 1/2 (pow re 2))
(* 1/2 (pow re 2))
(* 1/2 (pow re 2))
(* 1/2 (pow re 2))
(* 1/2 (pow re 2))
Outputs
(* 1/2 (* (sqrt (/ 1 im)) re))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re))
(/ (+ (* -1/2 (sqrt (pow im 3))) (* 1/2 (* (sqrt im) re))) im)
(/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 im (*.f64 im im)))) (*.f64 #s(literal 1/2 binary64) (*.f64 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 #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 #s(literal 1/2 binary64) (sqrt.f64 im)) re)))) im)
(/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* -1/2 (sqrt (/ 1 im))) (* im (+ (* -1/4 (* (sqrt (/ 1 im)) (/ 1 re))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 re)))))))) im)
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re (sqrt.f64 im))) (*.f64 (*.f64 im im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal -1/2 binary64)) (*.f64 im (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re) #s(literal 1/4 binary64)))))) im)
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.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/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (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 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (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 (*.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)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 re re) #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 -2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64))))) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/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 #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))))) (sqrt.f64 #s(literal -2 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -2 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(*.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64))))) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 im)) (/.f64 (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 im)) (*.f64 (*.f64 re 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))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 re (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1/2 binary64) im)))) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 re (*.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1/2 binary64) im))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1/2 binary64) im)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))))))))
(* 1/2 (* (sqrt (/ 1 im)) re))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im)))))
(*.f64 re (+.f64 (/.f64 (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)) re) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* 1/2 (sqrt (/ 1 im))))))
(*.f64 re (+.f64 (/.f64 (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)) re) (+.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 im)) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) (*.f64 re re)))))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (+ (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3)))) (* 1/2 (sqrt (/ 1 im)))))))
(*.f64 re (+.f64 (/.f64 (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)) re) (+.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (*.f64 (sqrt.f64 im) (/.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) im) (*.f64 re re))) (/.f64 (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) (*.f64 re (*.f64 re re))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(* -1/2 (* (sqrt (/ 1 im)) re))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re) #s(literal -1/2 binary64))
(* -1 (* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im))))))
(*.f64 (+.f64 (/.f64 (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)) re) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (- (* 2 im) im) re))) (* 1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 im)) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) re) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im))) re)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (sqrt im) (- (* 2 im) im))) (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re)))) re)) (* 1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (*.f64 (sqrt.f64 im) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) (/.f64 (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) re))) re)) re)) (-.f64 #s(literal 0 binary64) re))
(* (sqrt (/ 1 im)) re)
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re)
(/ (+ (* -1 (sqrt (pow im 3))) (* (sqrt im) re)) im)
(/.f64 (-.f64 (*.f64 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 re (sqrt.f64 im)) (*.f64 (*.f64 im im) (-.f64 (/.f64 (sqrt.f64 im) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))) im)
(/ (+ (* (sqrt im) re) (* (pow im 2) (+ (* -1 (sqrt (/ 1 im))) (* im (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 re))) (* (sqrt (/ 1 im)) (/ 1 re))))))) im)
(/.f64 (+.f64 (*.f64 re (sqrt.f64 im)) (*.f64 (*.f64 im im) (-.f64 (*.f64 im (/.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))) im)
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(*.f64 im (-.f64 (*.f64 (sqrt.f64 (/.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 (*.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 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re))) (sqrt.f64 #s(literal 2 binary64)))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (+.f64 (-.f64 (*.f64 (sqrt.f64 (/.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 #s(literal -1/2 binary64) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 re re) #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 re re))) (sqrt.f64 #s(literal 2 binary64)))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -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 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(*.f64 (-.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -2 binary64)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* -1 (/ (+ (* -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 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (/.f64 (*.f64 re re) #s(literal -2 binary64))))) (*.f64 im (*.f64 im im)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(-.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (*.f64 re (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1/2 binary64) im))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (-.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1/2 binary64) im))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1/2 binary64) im)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(* (sqrt (/ 1 im)) re)
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re)
(* re (+ (sqrt (/ 1 im)) (* -1 (* (sqrt im) (/ 1 re)))))
(*.f64 re (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) re)))
(* re (+ (sqrt (/ 1 im)) (+ (* -1 (* (sqrt im) (/ 1 re))) (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))))))
(*.f64 re (+.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) re)) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) (*.f64 re re))))
(* re (+ (sqrt (/ 1 im)) (+ (* -1 (* (sqrt im) (/ 1 re))) (+ (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3))))))))
(*.f64 re (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 im) (/.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) im) (*.f64 re re))) (/.f64 (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) (*.f64 re (*.f64 re re))))) (/.f64 (sqrt.f64 im) re))))
(* -1 (* (sqrt (/ 1 im)) re))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (* (sqrt im) (/ 1 re))))))
(*.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) re)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (sqrt im) (* -1/2 (* (sqrt im) (/ (- (* 2 im) im) re)))) re)))))
(*.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (+.f64 (sqrt.f64 im) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) re)) re)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (sqrt im) (* -1 (/ (+ (* 1/2 (* (sqrt im) (- (* 2 im) im))) (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re)))) re))) re)))))
(*.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (-.f64 (sqrt.f64 im) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 im) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) (/.f64 (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) re))) re)) re)) (-.f64 #s(literal 0 binary64) re))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/.f64 (*.f64 re (+.f64 re (*.f64 #s(literal -2 binary64) im))) im)
(/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)
(/.f64 (+.f64 (*.f64 re re) (*.f64 im (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64))))) im)
(/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)
(/.f64 (+.f64 (*.f64 re re) (*.f64 im (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64))))) im)
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) (/.f64 (*.f64 re re) (*.f64 im im))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) (/.f64 (*.f64 re re) (*.f64 im im))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* -1 (* im (- (* 2 (/ re im)) 2)))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (/.f64 (*.f64 re #s(literal 2 binary64)) im) #s(literal -2 binary64))))
(* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))
(*.f64 (+.f64 (/.f64 (+.f64 (/.f64 (*.f64 re re) im) (*.f64 re #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) im)) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))
(*.f64 (+.f64 (/.f64 (+.f64 (/.f64 (*.f64 re re) im) (*.f64 re #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) im)) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))
(* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 im (*.f64 re re))) (/.f64 #s(literal -2 binary64) re))))
(* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 im (*.f64 re re))) (/.f64 #s(literal -2 binary64) re))))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))
(* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im)))
(*.f64 (*.f64 re re) (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) im) re)) re)))
(* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im)))
(*.f64 (*.f64 re re) (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) im) 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 -4)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(* -1 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(* -1 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(* -1 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(* -1 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(* -2 (* (sqrt re) (sqrt -1)))
(*.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -1 binary64)))
(* -2 (* (sqrt re) (sqrt -1)))
(*.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -1 binary64)))
(* -2 (* (sqrt re) (sqrt -1)))
(*.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -1 binary64)))
(* -2 (* (sqrt re) (sqrt -1)))
(*.f64 (*.f64 #s(literal -2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -1 binary64)))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re)))
(/.f64 (sqrt.f64 re) im)
(* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re)))
(/.f64 (sqrt.f64 re) im)
(* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re)))
(/.f64 (sqrt.f64 re) im)
(* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re)))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(* (/ 1 im) (sqrt re))
(/.f64 (sqrt.f64 re) im)
(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)
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* re (- (* 2 (/ im re)) 2))
(*.f64 re (+.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64)))
(* re (- (* 2 (/ im re)) 2))
(*.f64 re (+.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64)))
(* re (- (* 2 (/ im re)) 2))
(*.f64 re (+.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64)))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -1 (* re (+ 2 (* -2 (/ im re)))))
(*.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #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))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* -1 (* im (- (* 2 (/ re im)) 2)))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (/.f64 (*.f64 re #s(literal 2 binary64)) im) #s(literal -2 binary64))))
(* -1 (* im (- (* 2 (/ re im)) 2)))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (/.f64 (*.f64 re #s(literal 2 binary64)) im) #s(literal -2 binary64))))
(* -1 (* im (- (* 2 (/ re im)) 2)))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (/.f64 (*.f64 re #s(literal 2 binary64)) im) #s(literal -2 binary64))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/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 #s(literal -2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (/.f64 im (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))))))
(* 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 #s(literal -2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (/.f64 im (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))))) (*.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 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 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (/.f64 im (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))))) (*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im (*.f64 im im))) (pow.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64))))))))
(* -1/2 (* (sqrt re) (* (sqrt -2) (pow (sqrt -1) 2))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal -1 binary64)))
(* -1 (* re (+ (* -1/2 (* (/ (* im (pow (sqrt -1) 2)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (pow (sqrt -1) 2)))))))
(*.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) im)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal -1 binary64))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1/2 (* (/ (* im (pow (sqrt -1) 2)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))) (+ (* -1/4 (* (/ (* (pow im 2) (pow (sqrt -1) 2)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (pow (sqrt -1) 2))))))))
(*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal -1 binary64)))) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal -2 binary64)))))) (*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) im)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1/2 (* (/ (* im (pow (sqrt -1) 2)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))) (+ (* -1/4 (* (/ (* (pow im 2) (pow (sqrt -1) 2)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/4 (* (/ (* (pow im 3) (pow (sqrt -1) 2)) (pow (sqrt -2) 5)) (sqrt (/ 1 (pow re 7))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (pow (sqrt -1) 2)))))))))
(*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal -2 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64))))) (pow.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 5 binary64))))) (+.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) im)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal -1 binary64)))))) (-.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 #s(literal -2 binary64)) (sqrt.f64 re)) (*.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 (/.f64 (*.f64 #s(literal -1/4 binary64) im) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (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 (*.f64 #s(literal -1/4 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 #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) (*.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/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)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 re re) #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 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 re re) #s(literal 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 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))))))
(* -1/2 (* (sqrt im) (* (pow (sqrt -1) 2) (sqrt 2))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 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 #s(literal 0 binary64) (*.f64 im (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 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 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 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/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re re) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (-.f64 #s(literal 0 binary64) im))
(* -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 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 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 (*.f64 #s(literal 1/4 binary64) (*.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/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re re) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))))) (-.f64 #s(literal 0 binary64) im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(-.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* -1/2 (* (sqrt (/ 1 (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 #s(literal -2 binary64)) (sqrt.f64 re))
(* re (+ (* (sqrt (/ 1 re)) (sqrt -2)) (* (/ im (sqrt -2)) (sqrt (/ 1 (pow re 3))))))
(*.f64 re (+.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (/.f64 im (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))))
(* 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 #s(literal -2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (/.f64 im (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 im im)) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 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 (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (/.f64 im (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (+.f64 (*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (*.f64 im im))) (pow.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64))))) (*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 im im)) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))))
(* -1 (* (sqrt re) (* (sqrt -2) (pow (sqrt -1) 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 re)) #s(literal 1 binary64))
(* -1 (* re (+ (* -1 (* (/ (* im (pow (sqrt -1) 2)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -2) (pow (sqrt -1) 2))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal -1 binary64))) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (* (/ (* im (pow (sqrt -1) 2)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))) (+ (* -1/2 (* (/ (* (pow im 2) (pow (sqrt -1) 2)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -2) (pow (sqrt -1) 2)))))))
(*.f64 (-.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal -2 binary64))))))) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (* (/ (* im (pow (sqrt -1) 2)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))) (+ (* -1/2 (* (/ (* (pow im 2) (pow (sqrt -1) 2)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/2 (* (/ (* (pow im 3) (pow (sqrt -1) 2)) (pow (sqrt -2) 5)) (sqrt (/ 1 (pow re 7))))) (* (sqrt (/ 1 re)) (* (sqrt -2) (pow (sqrt -1) 2))))))))
(*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal -2 binary64))))) (/.f64 (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64))))) (pow.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 5 binary64))))) (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal -1 binary64))) (/.f64 (*.f64 (-.f64 #s(literal 0 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 #s(literal -2 binary64))))) (-.f64 #s(literal 0 binary64) re))
(* (sqrt re) (sqrt -2))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 re))
(+ (* (sqrt re) (sqrt -2)) (* (/ im (sqrt -2)) (sqrt (/ 1 re))))
(+.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 re)) (*.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 #s(literal -2 binary64)) (sqrt.f64 re)) (*.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 (*.f64 (/.f64 im (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) #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 #s(literal -2 binary64)) (sqrt.f64 re)) (*.f64 im (+.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 im (+.f64 (/.f64 (*.f64 #s(literal -1/2 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 #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 re re) #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 #s(literal -1/2 binary64) (+.f64 (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 re re) #s(literal 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 (*.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)))))))
(* -1 (* (sqrt im) (* (pow (sqrt -1) 2) (sqrt 2))))
(*.f64 (sqrt.f64 im) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 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 0 binary64) im))
(* -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 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re re) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (-.f64 #s(literal 0 binary64) im))
(* -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 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 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 (*.f64 #s(literal 1/2 binary64) (*.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re re) (/.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))))) (-.f64 #s(literal 0 binary64) im))
-2
#s(literal -2 binary64)
(- (* 2 (/ im re)) 2)
(+.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64))
(- (* 2 (/ im re)) 2)
(+.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64))
(- (* 2 (/ im re)) 2)
(+.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64))
(* 2 (/ im re))
(/.f64 (*.f64 im #s(literal 2 binary64)) re)
(* im (- (* 2 (/ 1 re)) (* 2 (/ 1 im))))
(*.f64 im (+.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 #s(literal -2 binary64) im)))
(* im (- (* 2 (/ 1 re)) (* 2 (/ 1 im))))
(*.f64 im (+.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 #s(literal -2 binary64) im)))
(* im (- (* 2 (/ 1 re)) (* 2 (/ 1 im))))
(*.f64 im (+.f64 (/.f64 #s(literal 2 binary64) re) (/.f64 #s(literal -2 binary64) im)))
(* 2 (/ im re))
(/.f64 (*.f64 im #s(literal 2 binary64)) re)
(* -1 (* im (- (* 2 (/ 1 im)) (* 2 (/ 1 re)))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (/.f64 #s(literal 2 binary64) im) (/.f64 #s(literal -2 binary64) re))))
(* -1 (* im (- (* 2 (/ 1 im)) (* 2 (/ 1 re)))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (/.f64 #s(literal 2 binary64) im) (/.f64 #s(literal -2 binary64) re))))
(* -1 (* im (- (* 2 (/ 1 im)) (* 2 (/ 1 re)))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (/.f64 #s(literal 2 binary64) im) (/.f64 #s(literal -2 binary64) re))))
(* 2 (/ im re))
(/.f64 (*.f64 im #s(literal 2 binary64)) re)
(/ (+ (* -2 re) (* 2 im)) re)
(/.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64))) re)
(/ (+ (* -2 re) (* 2 im)) re)
(/.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64))) re)
(/ (+ (* -2 re) (* 2 im)) re)
(/.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64))) re)
-2
#s(literal -2 binary64)
(- (* 2 (/ im re)) 2)
(+.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64))
(- (* 2 (/ im re)) 2)
(+.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64))
(- (* 2 (/ im re)) 2)
(+.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64))
-2
#s(literal -2 binary64)
(- (* 2 (/ im re)) 2)
(+.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64))
(- (* 2 (/ im re)) 2)
(+.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64))
(- (* 2 (/ im re)) 2)
(+.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) re) #s(literal -2 binary64))
(* 1/2 (/ (pow re 2) im))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)
(/ (+ (* -1 (* im re)) (* 1/2 (pow re 2))) im)
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im re)) im)
(/ (+ (* 1/2 (pow re 2)) (* im (+ im (* -1 re)))) im)
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im (-.f64 im re))) im)
(/ (+ (* 1/2 (pow re 2)) (* im (+ im (* -1 re)))) im)
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im (-.f64 im re))) im)
im
(* im (+ 1 (* -1 (/ re im))))
(*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(* im (+ 1 (+ (* -1 (/ re im)) (* 1/2 (/ (pow re 2) (pow im 2))))))
(*.f64 im (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))))
(* im (+ 1 (+ (* -1 (/ re im)) (* 1/2 (/ (pow re 2) (pow im 2))))))
(*.f64 im (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))))
im
(* -1 (* im (- (/ re im) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (/.f64 re im) #s(literal -1 binary64))))
(* -1 (* im (- (* -1 (/ (+ (* -1 re) (* 1/2 (/ (pow re 2) im))) im)) 1)))
(*.f64 (+.f64 (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im) re) (-.f64 #s(literal 0 binary64) im)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (- (* -1 (/ (+ (* -1 re) (* 1/2 (/ (pow re 2) im))) im)) 1)))
(*.f64 (+.f64 (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im) re) (-.f64 #s(literal 0 binary64) im)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) im))
im
(+ im (* -1 re))
(-.f64 im re)
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+.f64 im (*.f64 re (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) re) im) #s(literal -1 binary64))))
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+.f64 im (*.f64 re (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) re) im) #s(literal -1 binary64))))
(* 1/2 (/ (pow re 2) im))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)
(* (pow re 2) (- (* 1/2 (/ 1 im)) (/ 1 re)))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 #s(literal -1 binary64) re)))
(* (pow re 2) (- (+ (* 1/2 (/ 1 im)) (/ im (pow re 2))) (/ 1 re)))
(*.f64 (*.f64 re re) (+.f64 (/.f64 im (*.f64 re re)) (+.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 #s(literal -1 binary64) re))))
(* (pow re 2) (- (+ (* 1/2 (/ 1 im)) (/ im (pow re 2))) (/ 1 re)))
(*.f64 (*.f64 re re) (+.f64 (/.f64 im (*.f64 re re)) (+.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 #s(literal -1 binary64) re))))
(* 1/2 (/ (pow re 2) im))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)
(* (pow re 2) (- (* 1/2 (/ 1 im)) (/ 1 re)))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 #s(literal -1 binary64) re)))
(* (pow re 2) (+ (* -1 (/ (+ 1 (* -1 (/ im re))) re)) (* 1/2 (/ 1 im))))
(*.f64 (*.f64 re re) (-.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 im re)) re)))
(* (pow re 2) (+ (* -1 (/ (+ 1 (* -1 (/ im re))) re)) (* 1/2 (/ 1 im))))
(*.f64 (*.f64 re re) (-.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 im re)) re)))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/.f64 (*.f64 re (+.f64 re (*.f64 #s(literal -2 binary64) im))) im)
(/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)
(/.f64 (+.f64 (*.f64 re re) (*.f64 im (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64))))) im)
(/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)
(/.f64 (+.f64 (*.f64 re re) (*.f64 im (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64))))) im)
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) (/.f64 (*.f64 re re) (*.f64 im im))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) (/.f64 (*.f64 re re) (*.f64 im im))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* -1 (* im (- (* 2 (/ re im)) 2)))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (/.f64 (*.f64 re #s(literal 2 binary64)) im) #s(literal -2 binary64))))
(* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))
(*.f64 (+.f64 (/.f64 (+.f64 (/.f64 (*.f64 re re) im) (*.f64 re #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) im)) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))
(*.f64 (+.f64 (/.f64 (+.f64 (/.f64 (*.f64 re re) im) (*.f64 re #s(literal -2 binary64))) (-.f64 #s(literal 0 binary64) im)) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))
(* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 im (*.f64 re re))) (/.f64 #s(literal -2 binary64) re))))
(* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 im (*.f64 re re))) (/.f64 #s(literal -2 binary64) re))))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))
(* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im)))
(*.f64 (*.f64 re re) (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) im) re)) re)))
(* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im)))
(*.f64 (*.f64 re re) (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) im) re)) re)))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ re im)))
(-.f64 #s(literal 1 binary64) (/.f64 re im))
(+ 1 (* re (- (* 1/2 (/ re (pow im 2))) (/ 1 im))))
(+.f64 #s(literal 1 binary64) (*.f64 re (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) re) (*.f64 im im)) (/.f64 #s(literal -1 binary64) im))))
(+ 1 (* re (- (* 1/2 (/ re (pow im 2))) (/ 1 im))))
(+.f64 #s(literal 1 binary64) (*.f64 re (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) re) (*.f64 im im)) (/.f64 #s(literal -1 binary64) im))))
(* 1/2 (/ (pow re 2) (pow im 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))
(* (pow re 2) (- (* 1/2 (/ 1 (pow im 2))) (/ 1 (* im re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 im im)) (/.f64 #s(literal -1 binary64) (*.f64 im re))))
(* (pow re 2) (- (+ (* 1/2 (/ 1 (pow im 2))) (/ 1 (pow re 2))) (/ 1 (* im re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 im im)) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) (/.f64 #s(literal -1 binary64) (*.f64 im re)))))
(* (pow re 2) (- (+ (* 1/2 (/ 1 (pow im 2))) (/ 1 (pow re 2))) (/ 1 (* im re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 im im)) (+.f64 (/.f64 #s(literal 1 binary64) (*.f64 re re)) (/.f64 #s(literal -1 binary64) (*.f64 im re)))))
(* 1/2 (/ (pow re 2) (pow im 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))
(* (pow re 2) (- (* 1/2 (/ 1 (pow im 2))) (/ 1 (* im re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 im im)) (/.f64 #s(literal -1 binary64) (*.f64 im re))))
(* (pow re 2) (+ (* -1 (/ (- (/ 1 im) (/ 1 re)) re)) (* 1/2 (/ 1 (pow im 2)))))
(*.f64 (*.f64 re re) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 im im)) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -1 binary64) re)) re)))
(* (pow re 2) (+ (* -1 (/ (- (/ 1 im) (/ 1 re)) re)) (* 1/2 (/ 1 (pow im 2)))))
(*.f64 (*.f64 re re) (-.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 im im)) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -1 binary64) re)) re)))
(* 1/2 (/ (pow re 2) (pow im 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))
(/ (+ (* -1 (* im re)) (* 1/2 (pow re 2))) (pow im 2))
(/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im re)) (*.f64 im im))
(/ (+ (* 1/2 (pow re 2)) (* im (- im re))) (pow im 2))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im (-.f64 im re))) (*.f64 im im))
(/ (+ (* 1/2 (pow re 2)) (* im (- im re))) (pow im 2))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im (-.f64 im re))) (*.f64 im im))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ re im)))
(-.f64 #s(literal 1 binary64) (/.f64 re im))
(- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im))
(+.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))
(- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im))
(+.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))
1
#s(literal 1 binary64)
(+ 1 (* -1 (/ re im)))
(-.f64 #s(literal 1 binary64) (/.f64 re im))
(+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) (* -1 re)) im)))
(-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 re re)) im) re) im))
(+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) (* -1 re)) im)))
(-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 re re)) im) re) im))
(* 1/2 (* (sqrt (/ 1 im)) (* re (* (sqrt 1/2) (sqrt 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/ (+ (* -1/4 (* (sqrt (pow im 3)) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (sqrt im) (* re (* (sqrt 1/2) (sqrt 2)))))) im)
(/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 re (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) im)
(/ (+ (* 1/2 (* (sqrt im) (* re (* (sqrt 1/2) (sqrt 2))))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 im)) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2)))))))) im)
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 re (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (sqrt.f64 #s(literal 1/2 binary64))))))) im)
(/ (+ (* 1/2 (* (sqrt im) (* re (* (sqrt 1/2) (sqrt 2))))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 im)) (/ (sqrt 2) (sqrt 1/2)))) (* im (+ (* -1/16 (* (sqrt (/ 1 im)) (/ (sqrt 2) (* re (pow (sqrt 1/2) 3))))) (* 1/4 (* (sqrt (/ 1 im)) (/ (sqrt 2) (* re (sqrt 1/2)))))))))) im)
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 re (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 im (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (sqrt.f64 #s(literal 1/2 binary64)))))))))) im)
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/4 (* (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/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/16 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.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 -2 binary64)) (sqrt.f64 #s(literal -1 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 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(*.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -2) (sqrt -1)))))) (pow im 3))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(*.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (*.f64 (*.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 3/16 binary64)) (*.f64 im (*.f64 im im)))) (-.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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.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 (*.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 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))))))))
(* 1/2 (* (sqrt (/ 1 im)) (* re (* (sqrt 1/2) (sqrt 2)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(* re (+ (* -1/4 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2))))))
(*.f64 re (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))
(* re (+ (* -1/4 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2))))) (+ (* 1/4 (* (sqrt im) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* (pow re 2) (sqrt 1/2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2)))))))
(*.f64 re (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 im (/.f64 (*.f64 #s(literal 1/4 binary64) im) #s(literal -1/2 binary64))))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (sqrt.f64 #s(literal 1/2 binary64)))))))
(* re (+ (* -1/4 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2))))) (+ (* 1/8 (* (sqrt (pow im 3)) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* (pow re 3) (pow (sqrt 1/2) 3))))) (+ (* 1/4 (* (sqrt im) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* (pow re 2) (sqrt 1/2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2))))))))
(*.f64 re (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 im (/.f64 (*.f64 #s(literal 1/4 binary64) im) #s(literal -1/2 binary64))))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (*.f64 im (*.f64 im im)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (+.f64 im (/.f64 (*.f64 #s(literal 1/4 binary64) im) #s(literal -1/2 binary64))) (*.f64 re (*.f64 re re))))))))
(* -1/2 (* (sqrt (/ 1 im)) (* re (* (sqrt 1/2) (sqrt 2)))))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal -1/2 binary64)) (*.f64 (*.f64 re (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(* -1 (* re (+ (* -1/4 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* re (sqrt 1/2))))) (* 1/4 (* (sqrt im) (/ (sqrt 2) (sqrt 1/2))))) re)) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 im (/.f64 (*.f64 #s(literal 1/4 binary64) im) #s(literal -1/2 binary64))))) (*.f64 re (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) re)))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/8 (* (sqrt (pow im 3)) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* re (pow (sqrt 1/2) 3))))) (* 1/4 (* (sqrt im) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (sqrt 1/2))))) re)) (* 1/4 (* (sqrt im) (/ (sqrt 2) (sqrt 1/2))))) re)) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 im (/.f64 (*.f64 #s(literal 1/4 binary64) im) #s(literal -1/2 binary64)))))) (*.f64 re (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 im (/.f64 (*.f64 #s(literal 1/4 binary64) im) #s(literal -1/2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) re)) re)))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* re (- (/ re im) 2))
(*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))
(* re (- (/ re im) 2))
(*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))
(* re (- (/ re im) 2))
(*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/.f64 (*.f64 re (+.f64 re (*.f64 #s(literal -2 binary64) im))) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/.f64 (*.f64 re (+.f64 re (*.f64 #s(literal -2 binary64) im))) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/.f64 (*.f64 re (+.f64 re (*.f64 #s(literal -2 binary64) im))) im)
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(+ (* -2 re) (/ (pow re 2) im))
(+.f64 (/.f64 (*.f64 re re) im) (*.f64 re #s(literal -2 binary64)))
(+ (* -2 re) (/ (pow re 2) im))
(+.f64 (/.f64 (*.f64 re re) im) (*.f64 re #s(literal -2 binary64)))
(+ (* -2 re) (/ (pow re 2) im))
(+.f64 (/.f64 (*.f64 re re) im) (*.f64 re #s(literal -2 binary64)))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(+ (* -2 re) (/ (pow re 2) im))
(+.f64 (/.f64 (*.f64 re re) im) (*.f64 re #s(literal -2 binary64)))
(+ (* -2 re) (/ (pow re 2) im))
(+.f64 (/.f64 (*.f64 re re) im) (*.f64 re #s(literal -2 binary64)))
(+ (* -2 re) (/ (pow re 2) im))
(+.f64 (/.f64 (*.f64 re re) im) (*.f64 re #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))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* (sqrt (/ 1 im)) (* re (* (sqrt 1/2) (sqrt 2))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 re (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(/ (+ (* -1/2 (* (sqrt (pow im 3)) (/ (sqrt 2) (sqrt 1/2)))) (* (sqrt im) (* re (* (sqrt 1/2) (sqrt 2))))) im)
(/.f64 (+.f64 (*.f64 (*.f64 re (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) im)
(/ (+ (* (sqrt im) (* re (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 im)) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2)))))))) im)
(/.f64 (+.f64 (*.f64 (*.f64 re (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (sqrt.f64 #s(literal 1/2 binary64))))))) im)
(/ (+ (* (sqrt im) (* re (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 im)) (/ (sqrt 2) (sqrt 1/2)))) (* im (+ (* -1/8 (* (sqrt (/ 1 im)) (/ (sqrt 2) (* re (pow (sqrt 1/2) 3))))) (* 1/2 (* (sqrt (/ 1 im)) (/ (sqrt 2) (* re (sqrt 1/2)))))))))) im)
(/.f64 (+.f64 (*.f64 (*.f64 re (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 im (+.f64 (*.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (sqrt.f64 #s(literal 1/2 binary64)))))))))) im)
(* (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/4 (* (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/4 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/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 #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/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal 2 binary64))))))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -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 -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))
(*.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(*.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -2) (sqrt -1)))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(*.f64 (-.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 (*.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 3/8 binary64)) (*.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (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 #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/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))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))))))))
(* (sqrt (/ 1 im)) (* re (* (sqrt 1/2) (sqrt 2))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 re (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(* re (+ (* -1/2 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2))))) (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2)))))
(*.f64 re (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (sqrt.f64 #s(literal 1/2 binary64))))))
(* re (+ (* -1/2 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2))))) (+ (* 1/2 (* (sqrt im) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* (pow re 2) (sqrt 1/2))))) (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2))))))
(*.f64 re (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 im (/.f64 (*.f64 #s(literal 1/4 binary64) im) #s(literal -1/2 binary64)))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal 1/2 binary64))))))))
(* re (+ (* -1/2 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2))))) (+ (* 1/4 (* (sqrt (pow im 3)) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* (pow re 3) (pow (sqrt 1/2) 3))))) (+ (* 1/2 (* (sqrt im) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* (pow re 2) (sqrt 1/2))))) (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2)))))))
(*.f64 re (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 im (/.f64 (*.f64 #s(literal 1/4 binary64) im) #s(literal -1/2 binary64)))) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal 1/2 binary64))))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (*.f64 im (*.f64 im im)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (+.f64 im (/.f64 (*.f64 #s(literal 1/4 binary64) im) #s(literal -1/2 binary64))) (*.f64 re (*.f64 re re)))))))))
(* -1 (* (sqrt (/ 1 im)) (* re (* (sqrt 1/2) (sqrt 2)))))
(*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (*.f64 re (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(* -1 (* re (+ (* -1/2 (* (sqrt im) (/ (sqrt 2) (* re (sqrt 1/2))))) (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2))))))
(-.f64 #s(literal 0 binary64) (*.f64 re (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (sqrt.f64 #s(literal 1/2 binary64)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* re (sqrt 1/2))))) (* 1/2 (* (sqrt im) (/ (sqrt 2) (sqrt 1/2))))) re)) (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2))))))
(*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 im (/.f64 (*.f64 #s(literal 1/4 binary64) im) #s(literal -1/2 binary64))))) (*.f64 re (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) re)))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (sqrt (pow im 3)) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (* re (pow (sqrt 1/2) 3))))) (* 1/2 (* (sqrt im) (/ (* (sqrt 2) (- im (* 1/4 (/ im (pow (sqrt 1/2) 2))))) (sqrt 1/2))))) re)) (* 1/2 (* (sqrt im) (/ (sqrt 2) (sqrt 1/2))))) re)) (* (sqrt (/ 1 im)) (* (sqrt 1/2) (sqrt 2))))))
(*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (-.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 im (/.f64 (*.f64 #s(literal 1/4 binary64) im) #s(literal -1/2 binary64)))))) (*.f64 re (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 im (/.f64 (*.f64 #s(literal 1/4 binary64) im) #s(literal -1/2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) re)) re)))
(* 1/2 (pow re 2))
(*.f64 #s(literal 1/2 binary64) (*.f64 re re))
(* 1/2 (pow re 2))
(*.f64 #s(literal 1/2 binary64) (*.f64 re re))
(* 1/2 (pow re 2))
(*.f64 #s(literal 1/2 binary64) (*.f64 re re))
(* 1/2 (pow re 2))
(*.f64 #s(literal 1/2 binary64) (*.f64 re re))
(* 1/2 (pow re 2))
(*.f64 #s(literal 1/2 binary64) (*.f64 re re))
(* 1/2 (pow re 2))
(*.f64 #s(literal 1/2 binary64) (*.f64 re re))
(* 1/2 (pow re 2))
(*.f64 #s(literal 1/2 binary64) (*.f64 re re))
(* 1/2 (pow re 2))
(*.f64 #s(literal 1/2 binary64) (*.f64 re re))
(* 1/2 (pow re 2))
(*.f64 #s(literal 1/2 binary64) (*.f64 re re))
(* 1/2 (pow re 2))
(*.f64 #s(literal 1/2 binary64) (*.f64 re re))
(* 1/2 (pow re 2))
(*.f64 #s(literal 1/2 binary64) (*.f64 re re))
(* 1/2 (pow re 2))
(*.f64 #s(literal 1/2 binary64) (*.f64 re re))

eval113.0ms (1.2%)

Compiler

Compiled 21586 to 2742 computations (87.3% saved)

prune162.0ms (1.8%)

Pruning

16 alts after pruning (8 fresh and 8 done)

PrunedKeptTotal
New8343837
Fresh055
Picked145
Done044
Total83516851
Accuracy
100.0%
Counts
851 → 16
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶27.3%
(/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))
27.3%
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
17.0%
(/.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 re re) #s(literal 1/4 binary64)) im))
✓27.0%
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
▶27.2%
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 #s(literal 1/2 binary64) im)))
▶27.3%
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
24.3%
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (pow.f64 (/.f64 im re) #s(literal 1/2 binary64)))
✓14.6%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 im im) re)))
▶18.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))
✓57.1%
(*.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))))))
▶52.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)) (*.f64 im #s(literal 2 binary64)))))
✓43.5%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) im) re)))))
✓20.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64))))
✓57.1%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
✓78.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
✓58.6%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re))))
Compiler

Compiled 282 to 205 computations (27.3% saved)

simplify174.0ms (1.9%)

Algorithm
1×egg-herbie
Localize:

Found 19 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) im)
✓cost-diff0
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 #s(literal 1/2 binary64) im))
✓cost-diff0
(pow.f64 re #s(literal -1/4 binary64))
✓cost-diff6592
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 #s(literal 1/2 binary64) im)))
✓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 #s(literal 1 binary64) im)
✓cost-diff0
(sqrt.f64 re)
✓cost-diff0
(/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))
✓cost-diff128
(/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))
✓cost-diff0
(sqrt.f64 re)
✓cost-diff0
(/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))
✓cost-diff0
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
✓cost-diff0
(-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im))
✓cost-diff0
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)) (*.f64 im #s(literal 2 binary64)))
✓cost-diff0
(sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)) (*.f64 im #s(literal 2 binary64))))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 re (*.f64 #s(literal 1/2 binary64) re)) im)) im)) (*.f64 im #s(literal 2 binary64)))))
Rules
2344×*-lowering-*.f32
2344×*-lowering-*.f64
2218×fma-lowering-fma.f32
2218×fma-lowering-fma.f64
1792×fnmsub-define
Iterations

Useful iterations: 4 (0.0ms)

IterNodesCost
032210
174206
2162198
3408189
41390186
54913186
08185186
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(* 1/2 (sqrt (* (- 1 (/ (- re (/ (* re (* 1/2 re)) im)) im)) (* im 2))))
1/2
(sqrt (* (- 1 (/ (- re (/ (* re (* 1/2 re)) im)) im)) (* im 2)))
(* (- 1 (/ (- re (/ (* re (* 1/2 re)) im)) im)) (* im 2))
(- 1 (/ (- re (/ (* re (* 1/2 re)) im)) im))
1
(/ (- re (/ (* re (* 1/2 re)) im)) im)
(- re (/ (* re (* 1/2 re)) im))
re
(/ (* re (* 1/2 re)) im)
(* re (* 1/2 re))
(* 1/2 re)
im
(* im 2)
2
(* (/ 1/2 (sqrt re)) im)
(/ 1/2 (sqrt re))
1/2
(sqrt re)
re
im
(/ (/ 1/2 (sqrt re)) (/ 1 im))
(/ 1/2 (sqrt re))
1/2
(sqrt re)
re
(/ 1 im)
1
im
(* 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
(* (pow re -1/4) (* (pow re -1/4) (* 1/2 im)))
(pow re -1/4)
re
-1/4
(* (pow re -1/4) (* 1/2 im))
(* 1/2 im)
1/2
im
Outputs
(* 1/2 (sqrt (* (- 1 (/ (- re (/ (* re (* 1/2 re)) im)) im)) (* im 2))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re #s(literal -1/2 binary64)) im)) (/.f64 re im))) (*.f64 im #s(literal 2 binary64)))))
1/2
#s(literal 1/2 binary64)
(sqrt (* (- 1 (/ (- re (/ (* re (* 1/2 re)) im)) im)) (* im 2)))
(sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re #s(literal -1/2 binary64)) im)) (/.f64 re im))) (*.f64 im #s(literal 2 binary64))))
(* (- 1 (/ (- re (/ (* re (* 1/2 re)) im)) im)) (* im 2))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re #s(literal -1/2 binary64)) im)) (/.f64 re im))) (*.f64 im #s(literal 2 binary64)))
(- 1 (/ (- re (/ (* re (* 1/2 re)) im)) im))
(-.f64 #s(literal 1 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re #s(literal -1/2 binary64)) im)) (/.f64 re im)))
1
#s(literal 1 binary64)
(/ (- re (/ (* re (* 1/2 re)) im)) im)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re #s(literal -1/2 binary64)) im)) (/.f64 re im))
(- re (/ (* re (* 1/2 re)) im))
(*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 re #s(literal -1/2 binary64)) im)))
re
(/ (* re (* 1/2 re)) im)
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)
(* re (* 1/2 re))
(*.f64 #s(literal 1/2 binary64) (*.f64 re re))
(* 1/2 re)
(*.f64 #s(literal 1/2 binary64) re)
im
(* im 2)
(*.f64 im #s(literal 2 binary64))
2
#s(literal 2 binary64)
(* (/ 1/2 (sqrt re)) im)
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
(/ 1/2 (sqrt re))
(/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))
1/2
#s(literal 1/2 binary64)
(sqrt re)
(sqrt.f64 re)
re
im
(/ (/ 1/2 (sqrt re)) (/ 1 im))
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
(/ 1/2 (sqrt re))
(/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))
1/2
#s(literal 1/2 binary64)
(sqrt re)
(sqrt.f64 re)
re
(/ 1 im)
(/.f64 #s(literal 1 binary64) im)
1
#s(literal 1 binary64)
im
(* 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
(* (pow re -1/4) (* (pow re -1/4) (* 1/2 im)))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal -1/2 binary64)))
(pow re -1/4)
(pow.f64 re #s(literal -1/4 binary64))
re
-1/4
#s(literal -1/4 binary64)
(* (pow re -1/4) (* 1/2 im))
(*.f64 #s(literal 1/2 binary64) (*.f64 im (pow.f64 re #s(literal -1/4 binary64))))
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
1/2
#s(literal 1/2 binary64)
im

localize227.0ms (2.5%)

Localize:

Found 19 expressions of interest:

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

Compiled 224 to 33 computations (85.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 50.0ms
ival-mult: 20.0ms (40.3% of total)
ival-div: 15.0ms (30.2% of total)
ival-sqrt: 5.0ms (10.1% of total)
ival-sub: 4.0ms (8.1% of total)
ival-pow: 4.0ms (8.1% of total)
const: 1.0ms (2% of total)
backward-pass: 0.0ms (0% of total)

series189.0ms (2.1%)

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

93 calls:

TimeVariablePointExpression
63.0ms
re
@-inf
(pow re -1/4)
41.0ms
im
@0
(* (pow re -1/4) (* 1/2 im))
24.0ms
re
@0
(pow re -1/4)
13.0ms
re
@0
(/ 1/2 (sqrt re))
8.0ms
re
@-inf
(* (pow re -1/4) (* 1/2 im))

rewrite456.0ms (5%)

Algorithm
1×batch-egg-rewrite
Rules
4850×*-lowering-*.f32
4850×*-lowering-*.f64
4092×/-lowering-/.f32
4092×/-lowering-/.f64
2172×+-lowering-+.f64
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
032143
1165139
21234139
08617139
Stop Event
1×iter limit
1×node limit
Counts
20 → 402
Calls
Call 1
Inputs
(* 1/2 (sqrt (* (- 1 (/ (- re (/ (* re (* 1/2 re)) im)) im)) (* im 2))))
(sqrt (* (- 1 (/ (- re (/ (* re (* 1/2 re)) im)) im)) (* im 2)))
(* (- 1 (/ (- re (/ (* re (* 1/2 re)) im)) im)) (* im 2))
(- 1 (/ (- re (/ (* re (* 1/2 re)) im)) im))
(* (/ 1/2 (sqrt re)) im)
(/ 1/2 (sqrt re))
(sqrt re)
(/ (/ 1/2 (sqrt re)) (/ 1 im))
(/ 1 im)
(* 1/2 (sqrt (- (* re -4) (/ (* im im) re))))
(sqrt (- (* re -4) (/ (* im im) re)))
(- (* re -4) (/ (* im im) re))
(* re -4)
(* (pow re -1/4) (* (pow re -1/4) (* 1/2 im)))
(pow re -1/4)
(* (pow re -1/4) (* 1/2 im))
(* 1/2 im)
(* 1/2 re)
(* im 2)
(* im im)
Outputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)) (*.f64 im #s(literal 2 binary64)))))
(*.f64 (sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)) (*.f64 im #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))) (*.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)))) (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)) (*.f64 im #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)) (*.f64 im #s(literal 2 binary64))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))))))
(/.f64 (sqrt.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im))))))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))))
(/.f64 (sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)))))) (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))))))
(/.f64 (sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im))))) (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))))
(pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)) (*.f64 im #s(literal 2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)) (*.f64 im #s(literal 2 binary64))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)) (*.f64 im #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)) (*.f64 im #s(literal 2 binary64)))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)) (*.f64 im #s(literal 2 binary64))))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))) (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)) (sqrt.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))))
(*.f64 (sqrt.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)))))
(*.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)) (*.f64 im #s(literal 2 binary64))) #s(literal 1/4 binary64)) (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)) (*.f64 im #s(literal 2 binary64))) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 im) (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 im) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)))))
(*.f64 (pow.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (sqrt.f64 im))
(*.f64 (sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)) #s(literal 2 binary64))) (sqrt.f64 im))
(+.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)))
(+.f64 (*.f64 #s(literal 1 binary64) (*.f64 im #s(literal 2 binary64))) (*.f64 (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (*.f64 im #s(literal 2 binary64))))
(fma.f64 #s(literal 1 binary64) (*.f64 im #s(literal 2 binary64)) (*.f64 (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (*.f64 im #s(literal 2 binary64))))
(fma.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1 binary64) (*.f64 (*.f64 im #s(literal 2 binary64)) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)))
(/.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im))))))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)))))
(/.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)))))) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)))))) (*.f64 im #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im))))) (*.f64 im #s(literal 2 binary64))) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)))
(/.f64 (neg.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)))))))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))))))
(/.f64 (neg.f64 (*.f64 (*.f64 im #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im))))))) (neg.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)))))) (*.f64 im #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im))))) (*.f64 im #s(literal 2 binary64)))) (neg.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))))
(*.f64 im (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)) (*.f64 im #s(literal 2 binary64)))
(*.f64 #s(literal 2 binary64) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))))
(*.f64 (*.f64 im #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)))
(*.f64 (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))) #s(literal 2 binary64))
(*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)) #s(literal 2 binary64)) im)
(+.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))
(+.f64 (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) #s(literal 1 binary64))
(+.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))
(-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))))) (/.f64 (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im))))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))))))
(-.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))) (/.f64 (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)))) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))))
(fma.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) (/.f64 #s(literal -1 binary64) im) #s(literal 1 binary64))
(fma.f64 #s(literal -1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) #s(literal 1 binary64))
(fma.f64 (+.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) (/.f64 #s(literal 1 binary64) im) #s(literal 1 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im))))))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)))))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)))))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)))))) (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)))) (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)))))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im))))) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im))))) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im))))))) (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im))))))) (neg.f64 (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)))) (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)))))) (neg.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))))
(/.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)))))) (neg.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)))) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im))))))) (*.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)))) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))))))
(/.f64 (-.f64 (*.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)))))))) (neg.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im))))))) (neg.f64 (neg.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)))))
(pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im)) (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)))))) #s(literal -1 binary64))
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im) (/.f64 im (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im)) im))))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal -1 binary64) im)))
(/.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re)) im))
(/.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))))
(/.f64 #s(literal 1/2 binary64) (neg.f64 (neg.f64 (/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re)) im))))
(/.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) im) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) im)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re)) im) #s(literal 1/2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))))))
(/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))
(/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))
(/.f64 (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) im))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re)) im) #s(literal 1/2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))) #s(literal 1 binary64))))
(/.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)))
(/.f64 #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re)) im)))
(/.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) im) (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(/.f64 (-.f64 #s(literal 0 binary64) im) (neg.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64))))
(/.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal -1 binary64) im))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) im)) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (*.f64 im #s(literal -1/2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (*.f64 #s(literal -1/2 binary64) im) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 re))
(/.f64 (neg.f64 (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) im))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(/.f64 (neg.f64 (*.f64 im #s(literal -1/2 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(/.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) im)) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(/.f64 (neg.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) im))) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) im)) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re)) im) #s(literal 1/2 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 re #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) im)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 re #s(literal -1/2 binary64)) im))
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) im) (pow.f64 re #s(literal -1/2 binary64))) #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64))))
(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (pow.f64 re #s(literal -1/4 binary64)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (pow.f64 re #s(literal -1/4 binary64)))) (pow.f64 re #s(literal -1/4 binary64)))
(*.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) im)))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) im))
(*.f64 (pow.f64 re #s(literal -1/8 binary64)) (*.f64 (pow.f64 re #s(literal -1/8 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (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 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1/4 binary64)))) im)
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (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 (*.f64 (pow.f64 re #s(literal -1/2 binary64)) im) #s(literal 1/2 binary64))
(*.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) im))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64))) #s(literal -1 binary64)))
(neg.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)))
(/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))
(/.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(/.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1 binary64) (sqrt.f64 re)))
(/.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))))
(/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))))
(/.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 #s(literal -1/2 binary64) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(/.f64 #s(literal -1/2 binary64) (neg.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re))))
(/.f64 #s(literal -1/2 binary64) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))))
(/.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (*.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64))) #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal 1 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) #s(literal 1 binary64))
(*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 re) #s(literal 1/2 binary64)))
(sqrt.f64 re)
(pow.f64 re #s(literal 1/2 binary64))
(pow.f64 (*.f64 re re) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 re #s(literal 1/4 binary64)) #s(literal 2 binary64))
(*.f64 (pow.f64 re #s(literal 1/4 binary64)) (pow.f64 re #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal -1 binary64) im)))
(/.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re)) im))
(/.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))))
(/.f64 #s(literal 1/2 binary64) (neg.f64 (neg.f64 (/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re)) im))))
(/.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) im) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) im)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re)) im) #s(literal 1/2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))))))
(/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))
(/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))
(/.f64 (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) im))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re)) im) #s(literal 1/2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))) #s(literal 1 binary64))))
(/.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)))
(/.f64 #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re)) im)))
(/.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) im) (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(/.f64 (-.f64 #s(literal 0 binary64) im) (neg.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64))))
(/.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal -1 binary64) im))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) im)) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (*.f64 im #s(literal -1/2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (*.f64 #s(literal -1/2 binary64) im) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 re))
(/.f64 (neg.f64 (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) im))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(/.f64 (neg.f64 (*.f64 im #s(literal -1/2 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(/.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) im)) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(/.f64 (neg.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) im))) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) im)) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re)) im) #s(literal 1/2 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 re #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) im)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 re #s(literal -1/2 binary64)) im))
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) im) (pow.f64 re #s(literal -1/2 binary64))) #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64))))
(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (pow.f64 re #s(literal -1/4 binary64)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (pow.f64 re #s(literal -1/4 binary64)))) (pow.f64 re #s(literal -1/4 binary64)))
(*.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) im)))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) im))
(*.f64 (pow.f64 re #s(literal -1/8 binary64)) (*.f64 (pow.f64 re #s(literal -1/8 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (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 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1/4 binary64)))) im)
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (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 (*.f64 (pow.f64 re #s(literal -1/2 binary64)) im) #s(literal 1/2 binary64))
(*.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) im))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(exp.f64 (*.f64 (log.f64 im) #s(literal -1 binary64)))
(neg.f64 (/.f64 #s(literal -1 binary64) im))
(/.f64 #s(literal 1 binary64) im)
(/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) im)))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) im))
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(pow.f64 im #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) im) #s(literal 1 binary64))
(pow.f64 (*.f64 im im) #s(literal -1/2 binary64))
(pow.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) #s(literal -1 binary64))
(pow.f64 (pow.f64 im #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 im)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) im))
(*.f64 (/.f64 #s(literal 1 binary64) im) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) im))
(*.f64 (pow.f64 im #s(literal -1/2 binary64)) (pow.f64 im #s(literal -1/2 binary64)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)))
(sqrt.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 (*.f64 im im) re) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)))) (-.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re)))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)) (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re))))) (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 (*.f64 im im) re) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re))))) (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (-.f64 (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))) (*.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im (-.f64 #s(literal 0 binary64) im)) re))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))) (sqrt.f64 (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re)))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 (*.f64 im im) re) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)))))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re)))))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 (*.f64 im im) re) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)))))
(pow.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)) (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re))))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 (*.f64 im im) re) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 (*.f64 im im) re) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)))))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)))))
(*.f64 (pow.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64)) (pow.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64)))
(+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im (-.f64 #s(literal 0 binary64) im)) re))
(+.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)) (+.f64 (*.f64 (neg.f64 (/.f64 im re)) im) (/.f64 (*.f64 im im) re)))
(+.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)) (+.f64 (*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im im)) (/.f64 (*.f64 im im) re)))
(+.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)) (fma.f64 (*.f64 im (-.f64 #s(literal 0 binary64) im)) (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 im im) re)))
(+.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)) (fma.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 im re) (/.f64 (*.f64 im im) re)))
(+.f64 (/.f64 (*.f64 im (-.f64 #s(literal 0 binary64) im)) re) (*.f64 re #s(literal -4 binary64)))
(+.f64 (fma.f64 re #s(literal -4 binary64) (neg.f64 (*.f64 (/.f64 (*.f64 im im) re) #s(literal 1 binary64)))) (fma.f64 (/.f64 (*.f64 im (-.f64 #s(literal 0 binary64) im)) re) #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 im im) re) #s(literal 1 binary64))))
(+.f64 (fma.f64 re #s(literal -4 binary64) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)) (*.f64 im (-.f64 #s(literal 0 binary64) im))))) (fma.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re))) (*.f64 im (-.f64 #s(literal 0 binary64) im)) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)) (*.f64 im (-.f64 #s(literal 0 binary64) im)))))
(+.f64 (fma.f64 #s(literal -4 binary64) re (neg.f64 (*.f64 (/.f64 (*.f64 im im) re) #s(literal 1 binary64)))) (fma.f64 (/.f64 (*.f64 im (-.f64 #s(literal 0 binary64) im)) re) #s(literal 1 binary64) (*.f64 (/.f64 (*.f64 im im) re) #s(literal 1 binary64))))
(+.f64 (fma.f64 #s(literal -4 binary64) re (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)) (*.f64 im (-.f64 #s(literal 0 binary64) im))))) (fma.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re))) (*.f64 im (-.f64 #s(literal 0 binary64) im)) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)) (*.f64 im (-.f64 #s(literal 0 binary64) im)))))
(-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))
(-.f64 (/.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -64 binary64)) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 (*.f64 im im) re) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))) (/.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 (*.f64 im im) re) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))))
(-.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))) (/.f64 (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))
(fma.f64 re #s(literal -4 binary64) (/.f64 (*.f64 im (-.f64 #s(literal 0 binary64) im)) re))
(fma.f64 im (neg.f64 (/.f64 im re)) (*.f64 re #s(literal -4 binary64)))
(fma.f64 #s(literal -4 binary64) re (/.f64 (*.f64 im (-.f64 #s(literal 0 binary64) im)) re))
(fma.f64 (*.f64 im im) (neg.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 re #s(literal -4 binary64)))
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) re) (*.f64 re #s(literal -4 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 im re) (*.f64 re #s(literal -4 binary64)))
(fma.f64 (*.f64 im (-.f64 #s(literal 0 binary64) im)) (/.f64 #s(literal 1 binary64) re) (*.f64 re #s(literal -4 binary64)))
(fma.f64 (-.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 (*.f64 im im) re) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))) (+.f64 (*.f64 (neg.f64 (/.f64 im re)) im) (/.f64 (*.f64 im im) re)))
(fma.f64 (-.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 (*.f64 im im) re) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))) (+.f64 (*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im im)) (/.f64 (*.f64 im im) re)))
(fma.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))) (+.f64 (*.f64 (neg.f64 (/.f64 im re)) im) (/.f64 (*.f64 im im) re)))
(fma.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))) (+.f64 (*.f64 (neg.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im im)) (/.f64 (*.f64 im im) re)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 (*.f64 im im) re) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)))) (-.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)) (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 (*.f64 im im) re) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)))) (-.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)) (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))))))
(/.f64 (-.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 (*.f64 im im) re) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)))))
(/.f64 (-.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (-.f64 (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))) (*.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im (-.f64 #s(literal 0 binary64) im)) re)))))
(/.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re))))) (neg.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 (*.f64 im im) re) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re))))) (neg.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (-.f64 (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))) (*.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im (-.f64 #s(literal 0 binary64) im)) re))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))) (neg.f64 (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -64 binary64)) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 (*.f64 im im) re) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))) (*.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 (*.f64 im im) re) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)))) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re))))) (*.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 (*.f64 im im) re) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 (*.f64 im im) re) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))) (*.f64 (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))) (*.f64 (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re)))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 (*.f64 im im) re) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))))) (neg.f64 (neg.f64 (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)))))
(pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 (*.f64 im im) re) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)))) (-.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re)) (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))) #s(literal -1 binary64))
(*.f64 (-.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (*.f64 (/.f64 (*.f64 im im) re) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))))
(*.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))
(*.f64 re #s(literal -4 binary64))
(*.f64 #s(literal -4 binary64) re)
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal -1 binary64) im)))
(/.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re)) im))
(/.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))))
(/.f64 #s(literal 1/2 binary64) (neg.f64 (neg.f64 (/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re)) im))))
(/.f64 #s(literal 1/2 binary64) (neg.f64 (*.f64 (/.f64 #s(literal 1 binary64) im) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (*.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) im)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re)) im) #s(literal 1/2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))))))
(/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))
(/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))
(/.f64 (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) im))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re)) im) #s(literal 1/2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))) #s(literal 1 binary64))))
(/.f64 #s(literal -1/2 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im)))
(/.f64 #s(literal -1/2 binary64) (neg.f64 (/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re)) im)))
(/.f64 #s(literal -1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) im) (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(/.f64 (-.f64 #s(literal 0 binary64) im) (neg.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64))))
(/.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal -1 binary64) im))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) im)) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (*.f64 im #s(literal -1/2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (*.f64 #s(literal -1/2 binary64) im) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 re))
(/.f64 (neg.f64 (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))) #s(literal -1 binary64))
(/.f64 (neg.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) im))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(/.f64 (neg.f64 (*.f64 im #s(literal -1/2 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(/.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) im)) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(/.f64 (neg.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) im))) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))) #s(literal -1 binary64))
(pow.f64 (*.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) im)) #s(literal -1 binary64))
(pow.f64 (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re)) im) #s(literal 1/2 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 re #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) im)))
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 re #s(literal -1/2 binary64)) im))
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) im) (pow.f64 re #s(literal -1/2 binary64))) #s(literal -1 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64))))
(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (pow.f64 re #s(literal -1/4 binary64)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (pow.f64 re #s(literal -1/4 binary64)))) (pow.f64 re #s(literal -1/4 binary64)))
(*.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) im)))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) im))
(*.f64 (pow.f64 re #s(literal -1/8 binary64)) (*.f64 (pow.f64 re #s(literal -1/8 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (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 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1/4 binary64)))) im)
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (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 (*.f64 (pow.f64 re #s(literal -1/2 binary64)) im) #s(literal 1/2 binary64))
(*.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) im))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal 1/2 binary64)) #s(literal -1 binary64)) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -1/2 binary64)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(exp.f64 (*.f64 #s(literal -1/4 binary64) (log.f64 re)))
(exp.f64 (*.f64 (log.f64 (*.f64 re re)) #s(literal -1/8 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 re #s(literal -1/8 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 re) #s(literal -1/8 binary64)) #s(literal 2 binary64)))
(exp.f64 (+.f64 (*.f64 (log.f64 re) #s(literal -1/8 binary64)) (*.f64 (log.f64 re) #s(literal -1/8 binary64))))
(pow.f64 re #s(literal -1/4 binary64))
(pow.f64 (*.f64 re re) #s(literal -1/8 binary64))
(pow.f64 (pow.f64 re #s(literal -1/8 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 #s(literal -1/4 binary64)) (log.f64 re))
(*.f64 (pow.f64 re #s(literal -1/8 binary64)) (pow.f64 re #s(literal -1/8 binary64)))
(*.f64 #s(literal 1/2 binary64) (*.f64 im (pow.f64 re #s(literal -1/4 binary64))))
(*.f64 im (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1/4 binary64))))
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 #s(literal 1/2 binary64) im))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal -1/4 binary64)))
(*.f64 (pow.f64 re #s(literal -1/8 binary64)) (*.f64 (pow.f64 re #s(literal -1/8 binary64)) (*.f64 #s(literal 1/2 binary64) im)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1/4 binary64))) im)
(*.f64 (*.f64 (pow.f64 re #s(literal -1/4 binary64)) im) #s(literal 1/2 binary64))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) (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))
(*.f64 #s(literal 1/2 binary64) re)
(*.f64 re #s(literal 1/2 binary64))
(*.f64 im #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) im)
(exp.f64 (*.f64 (log.f64 im) #s(literal 2 binary64)))
(pow.f64 im #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64))
(pow.f64 (*.f64 im im) #s(literal 1 binary64))
(pow.f64 (-.f64 #s(literal 0 binary64) im) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) #s(literal -1 binary64))
(pow.f64 (exp.f64 (log.f64 im)) #s(literal 2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 im im))
(*.f64 im im)
(*.f64 (*.f64 im im) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 0 binary64) im))
(*.f64 (exp.f64 (log.f64 im)) (exp.f64 (log.f64 im)))

simplify411.0ms (4.5%)

Algorithm
1×egg-herbie
Rules
8462×*-lowering-*.f32
8462×*-lowering-*.f64
3138×+-lowering-+.f64
3138×+-lowering-+.f32
1708×fma-lowering-fma.f32
Iterations

Useful iterations: 1 (0.0ms)

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

eval109.0ms (1.2%)

Compiler

Compiled 15843 to 1756 computations (88.9% saved)

prune81.0ms (0.9%)

Pruning

16 alts after pruning (4 fresh and 12 done)

PrunedKeptTotal
New8531854
Fresh033
Picked145
Done088
Total85416870
Accuracy
100.0%
Counts
870 → 16
Alt Table
Click to see full alt table
StatusAccuracyProgram
✓27.3%
(/.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (/.f64 #s(literal 1 binary64) im))
27.3%
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
17.0%
(/.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (*.f64 re re) #s(literal 1/4 binary64)) im))
✓27.0%
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
✓27.2%
(*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 (pow.f64 re #s(literal -1/4 binary64)) (*.f64 #s(literal 1/2 binary64) im)))
✓27.3%
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
24.3%
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (pow.f64 (/.f64 im re) #s(literal 1/2 binary64)))
31.1%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 (*.f64 re (+.f64 re (*.f64 #s(literal -2 binary64) im))) (*.f64 #s(literal 2 binary64) (*.f64 im im))) im)))
✓14.6%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 im im) re)))
✓18.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (*.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))
✓57.1%
(*.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))))))
✓43.5%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) im) re)))))
✓20.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64))))
✓57.1%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
✓78.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
✓58.6%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re))))
Compiler

Compiled 454 to 261 computations (42.5% saved)

regimes83.0ms (0.9%)

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

7 calls:

38.0ms
(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
11.0ms
im
7.0ms
re
6.0ms
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))
6.0ms
(*.f64 im im)
Results
AccuracySegmentsBranch
88.7%2re
78.2%1im
88.5%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))))
88.5%2(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
88.6%2(*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
88.6%2(-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
78.2%1(*.f64 im im)
Compiler

Compiled 69 to 45 computations (34.8% saved)

regimes27.0ms (0.3%)

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

3 calls:

16.0ms
(*.f64 im im)
5.0ms
im
5.0ms
re
Results
AccuracySegmentsBranch
65.0%2im
65.0%2(*.f64 im im)
79.4%3re
Compiler

Compiled 11 to 7 computations (36.4% saved)

regimes3.0ms (0%)

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

1 calls:

2.0ms
re
Results
AccuracySegmentsBranch
79.0%3re
Compiler

Compiled 3 to 2 computations (33.3% saved)

regimes2.0ms (0%)

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

1 calls:

1.0ms
re
Results
AccuracySegmentsBranch
66.2%2re
Compiler

Compiled 3 to 2 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
57.1%1im
57.1%1re
Compiler

Compiled 6 to 4 computations (33.3% saved)

bsearch43.0ms (0.5%)

Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
40.0ms
6.478767252185229e+71
8.281278792448273e+74
Results
25.0ms53×2valid
4.0ms49×0valid
4.0ms21×1valid
2.0ms5×3valid
Compiler

Compiled 198 to 152 computations (23.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 26.0ms
ival-sub: 12.0ms (45.6% of total)
ival-mult: 7.0ms (26.6% of total)
ival-sqrt: 4.0ms (15.2% of total)
backward-pass: 2.0ms (7.6% of total)
ival-add: 1.0ms (3.8% of total)
const: 0.0ms (0% of total)

bsearch63.0ms (0.7%)

Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
27.0ms
2.6892416186885225e+69
9.14862685480056e+70
30.0ms
-7.540998990619993e+99
-1.1379211890931786e+89
Results
29.0ms211×0valid
14.0ms41×2valid
3.0ms14×1valid
2.0ms6×3valid
Compiler

Compiled 362 to 298 computations (17.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 35.0ms
ival-mult: 23.0ms (65.8% of total)
ival-sqrt: 6.0ms (17.2% of total)
backward-pass: 2.0ms (5.7% of total)
ival-sub: 2.0ms (5.7% of total)
ival-add: 2.0ms (5.7% of total)
const: 1.0ms (2.9% of total)

bsearch109.0ms (1.2%)

Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
24.0ms
2.6892416186885225e+69
9.14862685480056e+70
80.0ms
-7.540998990619993e+99
-1.1379211890931786e+89
Results
80.0ms219×0valid
11.0ms36×2valid
3.0ms15×1valid
1.0ms2×3valid
Compiler

Compiled 328 to 281 computations (14.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 82.0ms
ival-sqrt: 67.0ms (81.5% of total)
ival-mult: 9.0ms (10.9% of total)
backward-pass: 2.0ms (2.4% of total)
ival-sub: 2.0ms (2.4% of total)
ival-add: 2.0ms (2.4% of total)
const: 1.0ms (1.2% of total)

bsearch46.0ms (0.5%)

Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
44.0ms
-7.540998990619993e+99
-1.1379211890931786e+89
Results
38.0ms160×0valid
Compiler

Compiled 202 to 176 computations (12.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 32.0ms
ival-add: 25.0ms (77% of total)
ival-mult: 4.0ms (12.3% of total)
ival-sqrt: 2.0ms (6.2% of total)
ival-sub: 1.0ms (3.1% of total)
const: 0.0ms (0% of total)
backward-pass: 0.0ms (0% of total)

simplify9.0ms (0.1%)

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

Useful iterations: 0 (0.0ms)

IterNodesCost
04196
15396
25996
36196
46296
Stop Event
1×saturated
Calls
Call 1
Inputs
(if (<=.f64 re #s(literal 28000000000000000780363857336253275112023309315450320921618760651593744384 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im))
(if (<=.f64 re #s(literal -3900000000000000219830497242340661183644449908613523001793536069628602337532449336133156864 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 38999999999999997464991625849029165665962006950132213599623268421074944 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)))
(if (<=.f64 re #s(literal -114999999999999994449499780091099549329930799938112657648278037689961472078556658288033792 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 32000000000000002321005964208935524037067981108688702576582724975329280 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)))
(if (<=.f64 re #s(literal -1020000000000000005801869287322592914130532168566592690741974356130171888047556842532991190171648 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
Outputs
(if (<=.f64 re #s(literal 28000000000000000780363857336253275112023309315450320921618760651593744384 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im))
(if (<=.f64 re #s(literal 28000000000000000780363857336253275112023309315450320921618760651593744384 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))))
(if (<=.f64 re #s(literal -3900000000000000219830497242340661183644449908613523001793536069628602337532449336133156864 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 38999999999999997464991625849029165665962006950132213599623268421074944 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)))
(if (<=.f64 re #s(literal -3900000000000000219830497242340661183644449908613523001793536069628602337532449336133156864 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 38999999999999997464991625849029165665962006950132213599623268421074944 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re)))) (*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))))
(if (<=.f64 re #s(literal -114999999999999994449499780091099549329930799938112657648278037689961472078556658288033792 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 32000000000000002321005964208935524037067981108688702576582724975329280 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)))
(if (<=.f64 re #s(literal -114999999999999994449499780091099549329930799938112657648278037689961472078556658288033792 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 32000000000000002321005964208935524037067981108688702576582724975329280 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) im))) (*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))))
(if (<=.f64 re #s(literal -1020000000000000005801869287322592914130532168566592690741974356130171888047556842532991190171648 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 -1020000000000000005801869287322592914130532168566592690741974356130171888047556842532991190171648 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)))

soundness910.0ms (10%)

Rules
6836×*-lowering-*.f32
6836×*-lowering-*.f64
5336×*-lowering-*.f32
5336×*-lowering-*.f64
3214×/-lowering-/.f32
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
033125
1140114
2955111
08866111
Stop Event
1×fuel
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×saturated
Compiler

Compiled 222 to 139 computations (37.4% saved)

preprocess39.0ms (0.4%)

Remove

(abs im)

Compiler

Compiled 318 to 166 computations (47.8% saved)

end0.0ms (0%)

Profiling

Loading profile data...