math.sqrt on complex, real part

Time bar (total: 10.7s)

analyze136.0ms (1.3%)

Algorithm
1×search
Search
ProbabilityValidUnknownPreconditionInfiniteDomainCan'tIter
0%0%99.9%0.1%0%0%0%0
0%0%99.9%0.1%0%0%0%1
0%0%99.9%0.1%0%0%0%2
50%50%50%0.1%0%0%0%3
50%50%50%0.1%0%0%0%4
62.5%62.4%37.5%0.1%0%0%0%5
62.5%62.4%37.5%0.1%0%0%0%6
68.8%68.7%31.2%0.1%0%0%0%7
68.8%68.7%31.2%0.1%0%0%0%8
71.9%71.8%28.1%0.1%0%0%0%9
71.9%71.8%28.1%0.1%0%0%0%10
73.4%73.4%26.5%0.1%0%0%0%11
73.4%73.4%26.5%0.1%0%0%0%12
Compiler

Compiled 18 to 13 computations (27.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 67.0ms
ival-mult: 38.0ms (56.9% of total)
ival-sqrt: 16.0ms (23.9% of total)
ival-add: 11.0ms (16.5% of total)
const: 2.0ms (3% of total)
backward-pass: 0.0ms (0% of total)

sample1.5s (14.5%)

Results
653.0ms6251×0valid
356.0ms1210×2valid
145.0ms600×1valid
71.0ms195×3valid
Precisions
Click to see histograms. Total time spent on operations: 847.0ms
ival-mult: 445.0ms (52.5% of total)
ival-sqrt: 200.0ms (23.6% of total)
ival-add: 128.0ms (15.1% of total)
backward-pass: 57.0ms (6.7% of total)
const: 17.0ms (2% of total)
Bogosity

preprocess56.0ms (0.5%)

Algorithm
2×egg-herbie
Rules
836×fnmadd-define
748×fmsub-define
704×fnmsub-define
500×fmm-def
410×fma-define
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
03660
111460
220660
336260
472760
5122860
6175660
7239160
8278660
9282660
01210
12410
23110
33310
03310
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 re (hypot.f64 re im)))))
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 (+ re (hypot re im)))))
(* 1/2 (sqrt (* 2 (+ (sqrt (+ (* (neg re) (neg re)) (* im im))) (neg re)))))
(* 1/2 (sqrt (* 2 (- (hypot re im) re))))
(* 1/2 (sqrt (* 2 (+ (sqrt (+ (* re re) (* (neg im) (neg im)))) re))))
(* 1/2 (sqrt (* 2 (+ re (hypot re im)))))
(neg (* 1/2 (sqrt (* 2 (+ (sqrt (+ (* (neg re) (neg re)) (* im im))) (neg re))))))
(* (sqrt (* 2 (- (hypot re im) re))) -1/2)
(neg (* 1/2 (sqrt (* 2 (+ (sqrt (+ (* re re) (* (neg im) (neg im)))) re)))))
(* (sqrt (* 2 (+ re (hypot re im)))) -1/2)
(* 1/2 (sqrt (* 2 (+ (sqrt (+ (* im im) (* re re))) im))))
(* 1/2 (sqrt (* 2 (+ im (hypot re im)))))
Symmetry

(abs im)

explain164.0ms (1.5%)

FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1190-2(-1.9522510966895764e-233 3.1875424833203676e-161)(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
310-0-(+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
200-1(-4.348831922954745e+78 7.95500998479151e-120)(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-(*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) 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 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))
Results
76.0ms408×0valid
22.0ms62×2valid
8.0ms36×1valid
3.0ms6×3valid
Compiler

Compiled 173 to 38 computations (78% saved)

Precisions
Click to see histograms. Total time spent on operations: 74.0ms
ival-add: 29.0ms (39.4% of total)
ival-sqrt: 21.0ms (28.6% of total)
ival-mult: 19.0ms (25.8% of total)
backward-pass: 4.0ms (5.4% of total)
const: 1.0ms (1.4% 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
▶45.9%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))
▶81.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
Compiler

Compiled 29 to 21 computations (27.6% saved)

simplify14.0ms (0.1%)

Algorithm
1×egg-herbie
Localize:

Found 8 expressions of interest:

NewMetricScoreProgram
✓cost-diff320
(+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
✓cost-diff320
(*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
✓cost-diff320
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
✓cost-diff320
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))
✓cost-diff0
(+.f64 re (hypot.f64 re im))
✓cost-diff0
(*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))
✓cost-diff0
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
Rules
20×*-lowering-*.f32
20×*-lowering-*.f64
12×fma-lowering-fma.f32
12×fma-define
12×+-lowering-+.f64
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01686
13086
24086
04086
Stop Event
1×iter limit
1×saturated
Calls
Call 1
Inputs
(* 1/2 (sqrt (* 2 (+ re (sqrt (+ (* re re) (* im im)))))))
1/2
(sqrt (* 2 (+ re (sqrt (+ (* re re) (* im im))))))
(* 2 (+ re (sqrt (+ (* re re) (* im im)))))
2
(+ re (sqrt (+ (* re re) (* im im))))
re
(sqrt (+ (* 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 re) (* im im))
(* re re)
re
(* im im)
im
Outputs
(* 1/2 (sqrt (* 2 (+ re (sqrt (+ (* re re) (* im im)))))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
1/2
#s(literal 1/2 binary64)
(sqrt (* 2 (+ re (sqrt (+ (* re re) (* im im))))))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))
(* 2 (+ re (sqrt (+ (* re re) (* im im)))))
(*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))
2
#s(literal 2 binary64)
(+ re (sqrt (+ (* re re) (* im im))))
(+.f64 re (hypot.f64 re im))
re
(sqrt (+ (* re re) (* im im)))
(hypot.f64 re 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 re (hypot.f64 re im)))))
1/2
#s(literal 1/2 binary64)
(sqrt (* 2 (+ (sqrt (+ (* re re) (* im im))) re)))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))
(* 2 (+ (sqrt (+ (* re re) (* im im))) re))
(*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))
2
#s(literal 2 binary64)
(+ (sqrt (+ (* re re) (* im im))) re)
(+.f64 re (hypot.f64 re im))
(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

localize144.0ms (1.4%)

Localize:

Found 8 expressions of interest:

NewMetricScoreProgram
✓accuracy100.0%
(+.f64 (*.f64 re re) (*.f64 im im))
✓accuracy100.0%
(+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
✓accuracy99.6%
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
✓accuracy65.8%
(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
✓accuracy100.0%
(*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))
✓accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
✓accuracy100.0%
(+.f64 re (hypot.f64 re im))
✓accuracy99.6%
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))
Results
76.0ms52×5exit
41.0ms204×0valid
Compiler

Compiled 115 to 18 computations (84.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 79.0ms
ival-mult: 22.0ms (27.9% of total)
backward-pass: 20.0ms (25.4% of total)
compiled-spec: 12.0ms (15.2% of total)
ival-sqrt: 12.0ms (15.2% of total)
ival-add: 12.0ms (15.2% of total)
const: 1.0ms (1.3% of total)

series25.0ms (0.2%)

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

60 calls:

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

rewrite311.0ms (2.9%)

Algorithm
1×batch-egg-rewrite
Rules
3528×*-lowering-*.f32
3528×*-lowering-*.f64
2466×/-lowering-/.f32
2466×/-lowering-/.f64
1350×+-lowering-+.f64
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
01669
17268
258068
3685168
0806668
Stop Event
1×iter limit
1×node limit
Counts
10 → 431
Calls
Call 1
Inputs
(* 1/2 (sqrt (* 2 (+ re (sqrt (+ (* re re) (* im im)))))))
(sqrt (* 2 (+ re (sqrt (+ (* re re) (* im im))))))
(* 2 (+ re (sqrt (+ (* re re) (* im im)))))
(+ re (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))
(+ (sqrt (+ (* re re) (* im im))) re)
(sqrt (+ (* re re) (* im im)))
(+ (* re re) (* im im))
Outputs
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))) (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 re re) (*.f64 im im))))) (pow.f64 (-.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)))
(/.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 (hypot.f64 re im) re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #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 re (hypot.f64 re im))) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #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 re (hypot.f64 re im)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 re (hypot.f64 re im)) #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 re (hypot.f64 re im))) #s(literal 1/4 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) (*.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im)))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 re (*.f64 #s(literal 2 binary64) (hypot.f64 re im))))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 (*.f64 re re) #s(literal 4 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im)))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))) (pow.f64 (-.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))) (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 (hypot.f64 re im) re)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))) (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 re re) (*.f64 im im))))) (pow.f64 (-.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))))) (sqrt.f64 (-.f64 (hypot.f64 re im) re)))
(/.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (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 re re) (*.f64 im im)))) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (-.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)))
(/.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 (hypot.f64 re im) re)))
(pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64)))
(+.f64 (*.f64 #s(literal 2 binary64) re) (*.f64 #s(literal 2 binary64) (hypot.f64 re im)))
(+.f64 (*.f64 #s(literal 2 binary64) (hypot.f64 re im)) (*.f64 #s(literal 2 binary64) re))
(-.f64 (/.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (/.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
(-.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im)))) (/.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im)))))
(fma.f64 #s(literal 2 binary64) re (*.f64 #s(literal 2 binary64) (hypot.f64 re im)))
(fma.f64 #s(literal 2 binary64) (hypot.f64 re im) (*.f64 #s(literal 2 binary64) re))
(fma.f64 re #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (hypot.f64 re im)))
(fma.f64 (hypot.f64 re im) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) re))
(/.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) (*.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im))))) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) #s(literal 8 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 re (*.f64 #s(literal 2 binary64) (hypot.f64 re im)))))) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) #s(literal 8 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 (*.f64 re re) #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im))) (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (hypot.f64 re im)) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))))
(/.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 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (hypot.f64 re im) re) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))))))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) #s(literal 8 binary64))) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) (*.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im))))))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) #s(literal 8 binary64))) (+.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 re (*.f64 #s(literal 2 binary64) (hypot.f64 re im)))))))
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 (*.f64 re re) #s(literal 4 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))
(/.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im))))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (-.f64 re (hypot.f64 re im)))
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (+.f64 (*.f64 re re) (+.f64 (*.f64 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 (hypot.f64 re im) re))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) #s(literal 8 binary64)))) (neg.f64 (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) (*.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im)))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) #s(literal 8 binary64)))) (neg.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 re (*.f64 #s(literal 2 binary64) (hypot.f64 re im))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 (*.f64 re re) #s(literal 4 binary64)))) (neg.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)))) (neg.f64 (*.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im)))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))) (-.f64 (hypot.f64 re im) re))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))) (-.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 re (hypot.f64 re im)))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/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 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) #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 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))
(*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))
(*.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) (*.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 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) (/.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 re re) (*.f64 im im))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 re (hypot.f64 re im))) #s(literal 2 binary64)))
(*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (/.f64 #s(literal 2 binary64) (-.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 (hypot.f64 re im) re)))
(*.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) #s(literal 8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) (*.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im)))))))
(*.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) #s(literal 8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 re (*.f64 #s(literal 2 binary64) (hypot.f64 re im))))))))
(*.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 (*.f64 re re) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
(*.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im)))))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (/.f64 #s(literal 1 binary64) (-.f64 re (hypot.f64 re im))))
(*.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (/.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 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (+.f64 re (hypot.f64 re im)))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (pow.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))) (-.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))) (*.f64 re re)))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (pow.f64 (+.f64 (*.f64 im im) (*.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 (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (+.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 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (-.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 (*.f64 re re) (*.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 re (hypot.f64 re im)))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re)))) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))
(+.f64 re (hypot.f64 re im))
(+.f64 (hypot.f64 re im) re)
(+.f64 (/.f64 (*.f64 re re) (-.f64 re (hypot.f64 re im))) (neg.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 re (hypot.f64 re im)))))
(+.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (hypot.f64 re im) re)) (neg.f64 (/.f64 (*.f64 re re) (-.f64 (hypot.f64 re im) re))))
(-.f64 (/.f64 (*.f64 re re) (-.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 im im)) (-.f64 (hypot.f64 re im) re)) (/.f64 (*.f64 re re) (-.f64 (hypot.f64 re im) re)))
(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)) re)
(neg.f64 (/.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) (-.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 re re) (*.f64 im im))) (-.f64 (hypot.f64 re im) re)))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (+.f64 (*.f64 re re) (+.f64 (*.f64 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 re (hypot.f64 re im))))
(/.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im))))))
(/.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (-.f64 re (hypot.f64 re im)))
(/.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))) (-.f64 (hypot.f64 re im) re))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/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 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 9/2 binary64)) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))))) (*.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im))))) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 re re)) (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 9/2 binary64)) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 (*.f64 re re) (*.f64 (*.f64 re 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 re) (*.f64 (*.f64 re 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)))) (*.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re 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 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im))))) (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re 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 (hypot.f64 re im)) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))))))
(/.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (-.f64 re (hypot.f64 re im)) (+.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 (*.f64 re re) (*.f64 re re))) (*.f64 (-.f64 (hypot.f64 re im) re) (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) (*.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im))))) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))))
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) (*.f64 (-.f64 (hypot.f64 re im) re) (+.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 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im)))))
(/.f64 (-.f64 (*.f64 (*.f64 re re) (-.f64 re (hypot.f64 re im))) (*.f64 (-.f64 re (hypot.f64 re im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (-.f64 re (hypot.f64 re im)) (-.f64 re (hypot.f64 re im))))
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (hypot.f64 re im) re)) (*.f64 (-.f64 (hypot.f64 re im) re) (*.f64 re re))) (*.f64 (-.f64 (hypot.f64 re im) re) (-.f64 (hypot.f64 re im) re)))
(/.f64 (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 9/2 binary64)) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 re re)) (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 9/2 binary64)) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re 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)))) (*.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) #s(literal 1 binary64)) (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (*.f64 re re) (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))) (-.f64 (hypot.f64 re im) re)))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re 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))))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re 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))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))) (-.f64 re (hypot.f64 re im))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) #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 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (*.f64 re re) (*.f64 re re))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (-.f64 (hypot.f64 re im) re)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))) (neg.f64 (-.f64 #s(literal 0 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 re (hypot.f64 re im))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 re (hypot.f64 re im))) #s(literal 3 binary64))) (+.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 (*.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 (*.f64 re re) (*.f64 im im)) (-.f64 re (hypot.f64 re im)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (hypot.f64 re im) re)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 re re) (-.f64 (hypot.f64 re im) re)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (hypot.f64 re im) re)) (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (hypot.f64 re im) re))) (+.f64 (*.f64 (/.f64 (*.f64 re re) (-.f64 (hypot.f64 re im) re)) (/.f64 (*.f64 re re) (-.f64 (hypot.f64 re im) re))) (*.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (hypot.f64 re im) re)) (/.f64 (*.f64 re re) (-.f64 (hypot.f64 re im) re))))))
(/.f64 (-.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 (*.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 (*.f64 re re) (*.f64 im im)) (-.f64 re (hypot.f64 re im)))))
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (hypot.f64 re im) re)) (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (hypot.f64 re im) re))) (*.f64 (/.f64 (*.f64 re re) (-.f64 (hypot.f64 re im) re)) (/.f64 (*.f64 re re) (-.f64 (hypot.f64 re im) re)))) (+.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (hypot.f64 re im) re)) (/.f64 (*.f64 re re) (-.f64 (hypot.f64 re im) re))))
(/.f64 (*.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) #s(literal 1 binary64)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im))))))
(/.f64 (*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) #s(literal 1 binary64)) (-.f64 re (hypot.f64 re im)))
(/.f64 (*.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))) #s(literal 1 binary64)) (-.f64 (hypot.f64 re im) re))
(/.f64 (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 9/2 binary64)) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im))))))) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 re re)) (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 9/2 binary64)) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 (*.f64 re re) (*.f64 (*.f64 re 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 re) (*.f64 (*.f64 re 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)))) (*.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im))))))) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re 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) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im))))))) (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re 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) (-.f64 re (hypot.f64 re im)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (/.f64 #s(literal 1 binary64) (-.f64 re (hypot.f64 re im)))) (+.f64 (*.f64 re re) (+.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 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) (/.f64 #s(literal -1 binary64) (-.f64 re (hypot.f64 re im)))) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (*.f64 re re) (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (*.f64 re 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 re (hypot.f64 re im))) #s(literal -1 binary64))
(*.f64 (+.f64 re (hypot.f64 re im)) (*.f64 (-.f64 re (hypot.f64 re im)) (/.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 re (hypot.f64 re im)) (-.f64 re (hypot.f64 re im))))
(*.f64 (+.f64 re (hypot.f64 re im)) (/.f64 (-.f64 (hypot.f64 re im) re) (-.f64 (hypot.f64 re im) re)))
(*.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) (/.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 re (hypot.f64 re im)) (/.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 re (hypot.f64 re im)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
(*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (/.f64 #s(literal 1 binary64) (-.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 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im)))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (/.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 #s(literal 1 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))))) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 re (hypot.f64 re im))) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))
(*.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 re (hypot.f64 re im)))
(*.f64 (/.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (+.f64 re (hypot.f64 re im)))
(*.f64 (/.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) (+.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (pow.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))) (-.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))) (*.f64 re re)))))
(*.f64 (/.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (pow.f64 (+.f64 (*.f64 im im) (*.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 (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) (+.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 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) (-.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 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))
(*.f64 (/.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))
(*.f64 (/.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))) (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 re re) (*.f64 im im))))) (pow.f64 (-.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)))
(/.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 (hypot.f64 re im) re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #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 re (hypot.f64 re im))) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #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 re (hypot.f64 re im)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 re (hypot.f64 re im)) #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 re (hypot.f64 re im))) #s(literal 1/4 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) (*.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im)))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 re (*.f64 #s(literal 2 binary64) (hypot.f64 re im))))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 (*.f64 re re) #s(literal 4 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im)))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))) (pow.f64 (-.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))) (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 (hypot.f64 re im) re)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))) (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 re re) (*.f64 im im))))) (pow.f64 (-.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)))
(/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))))) (sqrt.f64 (-.f64 (hypot.f64 re im) re)))
(/.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (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 re re) (*.f64 im im)))) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (-.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)))
(/.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (-.f64 (hypot.f64 re im) re)))
(pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64)))
(+.f64 (*.f64 #s(literal 2 binary64) re) (*.f64 #s(literal 2 binary64) (hypot.f64 re im)))
(+.f64 (*.f64 #s(literal 2 binary64) (hypot.f64 re im)) (*.f64 #s(literal 2 binary64) re))
(-.f64 (/.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (/.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
(-.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im)))) (/.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im)))))
(fma.f64 #s(literal 2 binary64) re (*.f64 #s(literal 2 binary64) (hypot.f64 re im)))
(fma.f64 #s(literal 2 binary64) (hypot.f64 re im) (*.f64 #s(literal 2 binary64) re))
(fma.f64 re #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (hypot.f64 re im)))
(fma.f64 (hypot.f64 re im) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) re))
(/.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) (*.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im))))) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) #s(literal 8 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 re (*.f64 #s(literal 2 binary64) (hypot.f64 re im)))))) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) #s(literal 8 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 (*.f64 re re) #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im))) (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (hypot.f64 re im)) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))))
(/.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 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (hypot.f64 re im) re) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))))))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) #s(literal 8 binary64))) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) (*.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im))))))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) #s(literal 8 binary64))) (+.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 re (*.f64 #s(literal 2 binary64) (hypot.f64 re im)))))))
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 (*.f64 re re) #s(literal 4 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))
(/.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64))) (*.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im))))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (-.f64 re (hypot.f64 re im)))
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (+.f64 (*.f64 re re) (+.f64 (*.f64 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 (hypot.f64 re im) re))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) #s(literal 8 binary64)))) (neg.f64 (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) (*.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im)))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) #s(literal 8 binary64)))) (neg.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 re (*.f64 #s(literal 2 binary64) (hypot.f64 re im))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 (*.f64 re re) #s(literal 4 binary64)))) (neg.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)))) (neg.f64 (*.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im)))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))) (-.f64 (hypot.f64 re im) re))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))) (-.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 re (hypot.f64 re im)))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/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 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) #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 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))
(*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))
(*.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) (*.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 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) (/.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 re re) (*.f64 im im))) (*.f64 (/.f64 #s(literal 1 binary64) (-.f64 re (hypot.f64 re im))) #s(literal 2 binary64)))
(*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (/.f64 #s(literal 2 binary64) (-.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 (hypot.f64 re im) re)))
(*.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) #s(literal 8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) (*.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im)))))))
(*.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) #s(literal 8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 re (*.f64 #s(literal 2 binary64) (hypot.f64 re im))))))))
(*.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64)) (*.f64 (*.f64 re re) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
(*.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im)))))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (/.f64 #s(literal 1 binary64) (-.f64 re (hypot.f64 re im))))
(*.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (/.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 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (+.f64 re (hypot.f64 re im)))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (pow.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))) (-.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))) (*.f64 re re)))))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (pow.f64 (+.f64 (*.f64 im im) (*.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 (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (+.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 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (-.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 (*.f64 re re) (*.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 re (hypot.f64 re im)))
(*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re)))) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))
(+.f64 re (hypot.f64 re im))
(+.f64 (hypot.f64 re im) re)
(+.f64 (/.f64 (*.f64 re re) (-.f64 re (hypot.f64 re im))) (neg.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 re (hypot.f64 re im)))))
(+.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (hypot.f64 re im) re)) (neg.f64 (/.f64 (*.f64 re re) (-.f64 (hypot.f64 re im) re))))
(-.f64 (/.f64 (*.f64 re re) (-.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 im im)) (-.f64 (hypot.f64 re im) re)) (/.f64 (*.f64 re re) (-.f64 (hypot.f64 re im) re)))
(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)) re)
(neg.f64 (/.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) (-.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 re re) (*.f64 im im))) (-.f64 (hypot.f64 re im) re)))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (+.f64 (*.f64 re re) (+.f64 (*.f64 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 re (hypot.f64 re im))))
(/.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im))))))
(/.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (-.f64 re (hypot.f64 re im)))
(/.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))) (-.f64 (hypot.f64 re im) re))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/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 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 9/2 binary64)) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))))) (*.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im))))) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 re re)) (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 9/2 binary64)) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 (*.f64 re re) (*.f64 (*.f64 re 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 re) (*.f64 (*.f64 re 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)))) (*.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))))))
(/.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re 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 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im))))) (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))))
(/.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re 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 (hypot.f64 re im)) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))))))
(/.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (-.f64 re (hypot.f64 re im)) (+.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 (*.f64 re re) (*.f64 re re))) (*.f64 (-.f64 (hypot.f64 re im) re) (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) (*.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im))))) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))))
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) (*.f64 (-.f64 (hypot.f64 re im) re) (+.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 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im)))))
(/.f64 (-.f64 (*.f64 (*.f64 re re) (-.f64 re (hypot.f64 re im))) (*.f64 (-.f64 re (hypot.f64 re im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (-.f64 re (hypot.f64 re im)) (-.f64 re (hypot.f64 re im))))
(/.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (hypot.f64 re im) re)) (*.f64 (-.f64 (hypot.f64 re im) re) (*.f64 re re))) (*.f64 (-.f64 (hypot.f64 re im) re) (-.f64 (hypot.f64 re im) re)))
(/.f64 (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 9/2 binary64)) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 re re)) (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 9/2 binary64)) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re 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)))) (*.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) #s(literal 1 binary64)) (*.f64 (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (*.f64 re re) (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))) (-.f64 (hypot.f64 re im) re)))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re 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))))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re 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))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))) (-.f64 re (hypot.f64 re im))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) #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 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (*.f64 re re) (*.f64 re re))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (-.f64 (hypot.f64 re im) re)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))) (neg.f64 (-.f64 #s(literal 0 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 re (hypot.f64 re im))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 re (hypot.f64 re im))) #s(literal 3 binary64))) (+.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 (*.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 (*.f64 re re) (*.f64 im im)) (-.f64 re (hypot.f64 re im)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (hypot.f64 re im) re)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 re re) (-.f64 (hypot.f64 re im) re)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (hypot.f64 re im) re)) (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (hypot.f64 re im) re))) (+.f64 (*.f64 (/.f64 (*.f64 re re) (-.f64 (hypot.f64 re im) re)) (/.f64 (*.f64 re re) (-.f64 (hypot.f64 re im) re))) (*.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (hypot.f64 re im) re)) (/.f64 (*.f64 re re) (-.f64 (hypot.f64 re im) re))))))
(/.f64 (-.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 (*.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 (*.f64 re re) (*.f64 im im)) (-.f64 re (hypot.f64 re im)))))
(/.f64 (-.f64 (*.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (hypot.f64 re im) re)) (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (hypot.f64 re im) re))) (*.f64 (/.f64 (*.f64 re re) (-.f64 (hypot.f64 re im) re)) (/.f64 (*.f64 re re) (-.f64 (hypot.f64 re im) re)))) (+.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (hypot.f64 re im) re)) (/.f64 (*.f64 re re) (-.f64 (hypot.f64 re im) re))))
(/.f64 (*.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) #s(literal 1 binary64)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im))))))
(/.f64 (*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) #s(literal 1 binary64)) (-.f64 re (hypot.f64 re im)))
(/.f64 (*.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))) #s(literal 1 binary64)) (-.f64 (hypot.f64 re im) re))
(/.f64 (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 9/2 binary64)) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im))))))) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re (*.f64 re re)) (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))))
(/.f64 (*.f64 (+.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 9/2 binary64)) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 (*.f64 re re) (*.f64 (*.f64 re 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 re) (*.f64 (*.f64 re 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)))) (*.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im))))))) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re 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) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im))))))) (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re 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) (-.f64 re (hypot.f64 re im)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) (/.f64 #s(literal 1 binary64) (-.f64 re (hypot.f64 re im)))) (+.f64 (*.f64 re re) (+.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 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) (/.f64 #s(literal -1 binary64) (-.f64 re (hypot.f64 re im)))) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (*.f64 re re) (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))))
(/.f64 (*.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (*.f64 re 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 re (hypot.f64 re im))) #s(literal -1 binary64))
(*.f64 (+.f64 re (hypot.f64 re im)) (*.f64 (-.f64 re (hypot.f64 re im)) (/.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 re (hypot.f64 re im)) (-.f64 re (hypot.f64 re im))))
(*.f64 (+.f64 re (hypot.f64 re im)) (/.f64 (-.f64 (hypot.f64 re im) re) (-.f64 (hypot.f64 re im) re)))
(*.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) (/.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 re (hypot.f64 re im)) (/.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 re (hypot.f64 re im)) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
(*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (/.f64 #s(literal 1 binary64) (-.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 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im)))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (/.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 #s(literal 1 binary64) (+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))))) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 re (hypot.f64 re im))) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))
(*.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 re (hypot.f64 re im)))
(*.f64 (/.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (+.f64 re (hypot.f64 re im)))
(*.f64 (/.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) (+.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (pow.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))) #s(literal 3 binary64)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))) (-.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))) (*.f64 re re)))))
(*.f64 (/.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (pow.f64 (+.f64 (*.f64 im im) (*.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 (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) (+.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 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) (-.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 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))
(*.f64 (/.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))
(*.f64 (/.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re re))) (-.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)) (*.f64 re (*.f64 re re)))) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 re re) (*.f64 im im)))))
(hypot.f64 re im)
(hypot.f64 im re)
(fabs.f64 (hypot.f64 re im))
(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 re 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 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im))))))
(/.f64 (hypot.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im)))) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 re 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 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (*.f64 re 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 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im))))) (neg.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))))
(pow.f64 (hypot.f64 re im) #s(literal 1 binary64))
(pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/2 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 (*.f64 re 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 (*.f64 re 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 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im 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 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re re) (*.f64 im im)))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im 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 re re) (*.f64 im im))
(+.f64 (*.f64 im im) (*.f64 re re))
(+.f64 (/.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (-.f64 (*.f64 re re) (*.f64 im im))) (neg.f64 (/.f64 (*.f64 (*.f64 im 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 (*.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 re re) (*.f64 im im))) #s(literal 1 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 (*.f64 (*.f64 re re) (*.f64 re re)) (-.f64 (*.f64 re re) (*.f64 im im))) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (-.f64 (*.f64 re re) (*.f64 im im))))
(-.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (-.f64 (*.f64 im im) (*.f64 re re))) (/.f64 (*.f64 (*.f64 re 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 #s(literal 0 binary64) (+.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))
(/.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im 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 (*.f64 im im) (*.f64 im im)) (*.f64 (*.f64 re re) (*.f64 re re)))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im)))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))))) (*.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))))) (*.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) (*.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (-.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) (*.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))) (*.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (-.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) (*.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))) (*.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im)))))))
(/.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))) (*.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im)))))
(/.f64 (-.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (*.f64 re re) (*.f64 re re))) (-.f64 (*.f64 im im) (*.f64 re re)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (-.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (*.f64 im im) (*.f64 im im)))) (*.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))) #s(literal 1 binary64)) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im))) #s(literal 1 binary64)) (-.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 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (sqrt.f64 (+.f64 (*.f64 (*.f64 re 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 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 re 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 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im 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 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(/.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im)))) (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im 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 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))))) (*.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) (*.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (-.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) (*.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))) #s(literal 1 binary64)) (*.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) (*.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im))))) (-.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im))) (-.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 re 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 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 (*.f64 re re) (*.f64 re re)))) (neg.f64 (-.f64 (*.f64 im im) (*.f64 re re))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (-.f64 (*.f64 re re) (*.f64 im im))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (-.f64 (*.f64 re re) (*.f64 im im))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (-.f64 (*.f64 re re) (*.f64 im im))) (/.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (-.f64 (*.f64 re re) (*.f64 im im)))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (-.f64 (*.f64 re re) (*.f64 im im))) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (-.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (/.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (-.f64 (*.f64 re re) (*.f64 im im))) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (-.f64 (*.f64 re re) (*.f64 im im)))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (-.f64 (*.f64 re re) (*.f64 im im))) (/.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (-.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (-.f64 (*.f64 re re) (*.f64 im im))) (/.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (-.f64 (*.f64 re re) (*.f64 im im))))) (+.f64 (/.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (-.f64 (*.f64 re re) (*.f64 im im))) (/.f64 (*.f64 (*.f64 im 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 (*.f64 re 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 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im 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 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))))
(/.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im)))) (hypot.f64 re im)) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))))) (*.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))) (+.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) (*.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (-.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) (*.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))) (-.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) (*.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re re) (*.f64 im im)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) (*.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re re) (*.f64 im im)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im))))
(/.f64 (/.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im))) (+.f64 re im)) (-.f64 re im))
(pow.f64 (hypot.f64 re im) #s(literal 2 binary64))
(pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1 binary64))
(pow.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.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 (hypot.f64 re im) (hypot.f64 re im))
(*.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 (+.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))))
(*.f64 (+.f64 (*.f64 (*.f64 re 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 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(*.f64 (+.f64 (*.f64 (*.f64 re 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 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))))
(*.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im 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 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im 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 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (+.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re re) (*.f64 im im))) (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im 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 (*.f64 im im) (*.f64 im im)) (*.f64 (*.f64 re re) (*.f64 re re))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 im im) (*.f64 re re))))
(*.f64 (pow.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))) #s(literal 1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) #s(literal 1 binary64)))
(*.f64 (pow.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im 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 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im))) (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im)))) (+.f64 (*.f64 re re) (*.f64 im im)))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))) (+.f64 (*.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) (*.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))) (+.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) (*.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))) (-.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))) (*.f64 (*.f64 re re) (*.f64 re re))))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))) (-.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))))) (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))
(*.f64 (/.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 im im))) (-.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 re re) (*.f64 im im)))))

simplify373.0ms (3.5%)

Algorithm
1×egg-herbie
Rules
7228×*-lowering-*.f32
7228×*-lowering-*.f64
2506×+-lowering-+.f64
2506×+-lowering-+.f32
1616×sum3-define
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
05005174
117764802
269034766
089844766
Stop Event
1×iter limit
1×node limit
Counts
240 → 240
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/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (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 re) (pow (sqrt 2) 2)))
(* re (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))
(* re (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
(* re (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/64 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(+ (* 1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/1024 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))
(+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))))
(+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* -1/4 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/8 (sqrt (/ 1 (pow re 3)))))))
(+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/4 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))
(* 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/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -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/4 (* (sqrt (/ 1 (pow im 3))) (* re (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/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (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/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (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 re) (pow (sqrt 2) 2))
(* re (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))
(* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))
(* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/32 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
(* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))
(+ (* 1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/512 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* (sqrt re) (pow (sqrt 2) 2))
(+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (pow (sqrt 2) 2)))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* -1/2 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/4 (sqrt (/ 1 (pow re 3)))))))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* 1/4 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/2 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))
(* (sqrt im) (sqrt 2))
(* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (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/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (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 im) (* 2 re))
(+ (* 2 im) (* re (+ 2 (/ re im))))
(+ (* 2 im) (* re (+ 2 (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))))))
(* 4 re)
(* re (+ 4 (/ (pow im 2) (pow re 2))))
(* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))
(* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))
(* -1 (/ (pow im 2) re))
(* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re))
(* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re))
(* -1 (/ (+ (* -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)
(+ (* 4 re) (/ (pow im 2) re))
(+ (* 4 re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))))
(+ (* 4 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (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 (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2))))))
(* -2 im)
(* -1 (* im (+ 2 (* -2 (/ re im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (pow re 2) im)) (* 2 re)) im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im)) (* 2 re)) im)))))
im
(+ im re)
(+ im (* re (+ 1 (* 1/2 (/ re im)))))
(+ im (* re (+ 1 (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))
(* 2 re)
(* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))
(* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(* 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))
(* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re))
(* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re))
(* -1 (/ (+ (* -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/2 (/ (pow im 2) re)) (* 2 re))
(+ (* 2 re) (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+ (* 2 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 (/ 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 (* -1 (/ re im)))))
(* -1 (* im (+ 1 (* -1 (/ (+ re (* -1/2 (/ (pow re 2) im))) im)))))
(* -1 (* im (+ 1 (* -1 (/ (+ re (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/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/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (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 re) (pow (sqrt 2) 2)))
(* re (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))
(* re (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
(* re (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/64 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(+ (* 1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/1024 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))
(+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))))
(+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* -1/4 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/8 (sqrt (/ 1 (pow re 3)))))))
(+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/4 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))
(* 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/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -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/4 (* (sqrt (/ 1 (pow im 3))) (* re (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/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (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/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (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 re) (pow (sqrt 2) 2))
(* re (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))
(* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))
(* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/32 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
(* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))
(+ (* 1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/512 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* (sqrt re) (pow (sqrt 2) 2))
(+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (pow (sqrt 2) 2)))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* -1/2 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/4 (sqrt (/ 1 (pow re 3)))))))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* 1/4 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/2 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))
(* (sqrt im) (sqrt 2))
(* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (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/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (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 im) (* 2 re))
(+ (* 2 im) (* re (+ 2 (/ re im))))
(+ (* 2 im) (* re (+ 2 (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))))))
(* 4 re)
(* re (+ 4 (/ (pow im 2) (pow re 2))))
(* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))
(* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))
(* -1 (/ (pow im 2) re))
(* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re))
(* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re))
(* -1 (/ (+ (* -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)
(+ (* 4 re) (/ (pow im 2) re))
(+ (* 4 re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))))
(+ (* 4 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (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 (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2))))))
(* -2 im)
(* -1 (* im (+ 2 (* -2 (/ re im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (pow re 2) im)) (* 2 re)) im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im)) (* 2 re)) im)))))
im
(+ im re)
(+ im (* re (+ 1 (* 1/2 (/ re im)))))
(+ im (* re (+ 1 (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))
(* 2 re)
(* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))
(* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(* 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))
(* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re))
(* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re))
(* -1 (/ (+ (* -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/2 (/ (pow im 2) re)) (* 2 re))
(+ (* 2 re) (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+ (* 2 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 (/ 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 (* -1 (/ re im)))))
(* -1 (* im (+ 1 (* -1 (/ (+ re (* -1/2 (/ (pow re 2) im))) im)))))
(* -1 (* im (+ 1 (* -1 (/ (+ re (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im))) im)))))
im
(+ im (* 1/2 (/ (pow re 2) im)))
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
im
(* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
(pow im 2)
(+ (pow im 2) (pow re 2))
(+ (pow im 2) (pow re 2))
(+ (pow im 2) (pow re 2))
(pow re 2)
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(pow re 2)
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(pow re 2)
(+ (pow im 2) (pow re 2))
(+ (pow im 2) (pow re 2))
(+ (pow im 2) (pow re 2))
(pow im 2)
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(pow im 2)
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
Outputs
(* 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 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/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))))))
(+.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 re (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.f64 #s(literal 1/16 binary64) 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))) (* 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 #s(literal -1/32 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 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 re) (pow (sqrt 2) 2)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(* re (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))
(*.f64 re (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 im im))) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* re (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
(*.f64 re (+.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 im im))) (*.f64 #s(literal -1/32 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))))
(* re (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/64 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
(*.f64 re (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 im im))) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (+.f64 (*.f64 #s(literal -1/32 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal -1/64 binary64) (pow.f64 im #s(literal 4 binary64))) #s(literal 2 binary64))))))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))
(+ (* 1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal 1/32 binary64))))
(+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 re (*.f64 re re))))
(+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/1024 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (+.f64 (/.f64 (*.f64 #s(literal 1/64 binary64) (*.f64 (pow.f64 im #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 #s(literal 1/512 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))))))) (*.f64 re (*.f64 re re))))
(* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))))
(+.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 #s(literal 1/8 binary64) (*.f64 im im))))
(+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* -1/4 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/8 (sqrt (/ 1 (pow re 3)))))))
(+.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (+.f64 (/.f64 #s(literal 1/32 binary64) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/8 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) #s(literal -1/4 binary64))) (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))))))
(+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/4 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))
(+.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (*.f64 im (*.f64 im (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (+.f64 (/.f64 #s(literal 1/32 binary64) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/8 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/32 binary64) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/8 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re)))))))))))))
(* 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 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (*.f64 #s(literal 1/4 binary64) (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/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) #s(literal 1/8 binary64))))))
(* im (+ (* -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/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(*.f64 im (+.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (*.f64 #s(literal 1/4 binary64) (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)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re))) #s(literal 1/16 binary64))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (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))) (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 -1) (sqrt 2))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (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))) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) #s(literal -1/8 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (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))) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re))) (*.f64 (sqrt.f64 im) #s(literal 3/16 binary64))) (*.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* 1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/2 binary64) re)))
(+ (* re (+ (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (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 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.f64 #s(literal 1/8 binary64) re)))))
(+ (* 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 (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/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))))))))
(* (sqrt re) (pow (sqrt 2) 2))
(*.f64 #s(literal 2 binary64) (sqrt.f64 re))
(* re (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))
(*.f64 re (+.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 im im)))))
(* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))
(*.f64 re (+.f64 (+.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 im im)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/16 binary64)))))
(* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/32 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
(*.f64 re (+.f64 (+.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 im im)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/16 binary64)) (/.f64 (*.f64 #s(literal -1/32 binary64) (pow.f64 im #s(literal 4 binary64))) #s(literal 2 binary64))))))
(* (* im (* (sqrt -1) (* (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)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im (sqrt.f64 #s(literal -1 binary64)))))
(+ (* 1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt -1) (* (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)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (* (sqrt -1) (* (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)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 re (*.f64 re re))))
(+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/512 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (* (sqrt -1) (* (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)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (+.f64 (/.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 (pow.f64 im #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))))))) (*.f64 re (*.f64 re re))))
(* (sqrt re) (pow (sqrt 2) 2))
(*.f64 #s(literal 2 binary64) (sqrt.f64 re))
(+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (pow (sqrt 2) 2)))
(+.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 #s(literal 1/4 binary64) (*.f64 im im))))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* -1/2 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/4 (sqrt (/ 1 (pow re 3)))))))
(+.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1/32 binary64) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/8 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))))))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* 1/4 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/2 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))
(+.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) (*.f64 im (*.f64 im (+.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (*.f64 im (*.f64 im (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/32 binary64) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/8 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1/2 binary64))) (*.f64 (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/32 binary64) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/8 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(*.f64 im (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/4 binary64))))))
(* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) #s(literal 1/8 binary64))) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1 binary64)))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re))) #s(literal -1/4 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (-.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))))) (*.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re)))) (/.f64 #s(literal 3/8 binary64) (*.f64 im (*.f64 im im))))) (-.f64 #s(literal 0 binary64) im))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* 2 im) (* 2 re))
(*.f64 #s(literal 2 binary64) (+.f64 im re))
(+ (* 2 im) (* re (+ 2 (/ re im))))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))
(+ (* 2 im) (* re (+ 2 (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))))))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))))))))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(* re (+ 4 (/ (pow im 2) (pow re 2))))
(*.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))
(* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))
(*.f64 re (+.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 re #s(literal 4 binary64))))))
(* 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 re (+.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))) (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 re #s(literal 4 binary64))))))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re))
(/.f64 (+.f64 (*.f64 im im) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re))
(/.f64 (+.f64 (+.f64 (*.f64 im im) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (*.f64 re re))) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re))
(/.f64 (-.f64 (+.f64 (+.f64 (*.f64 im im) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (*.f64 re re))) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (pow.f64 re #s(literal 6 binary64)))) (-.f64 #s(literal 0 binary64) re))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(+ (* 4 re) (/ (pow im 2) re))
(+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))
(+ (* 4 re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))))
(+.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/4 binary64)) (*.f64 re (*.f64 re re))))))
(+ (* 4 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 re #s(literal 4 binary64)) (*.f64 im (*.f64 im (+.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))))))))
(* 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 re im)) (+.f64 #s(literal 2 binary64) (*.f64 re (/.f64 re (*.f64 im im))))))
(* im (+ 2 (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2))))))
(*.f64 im (+.f64 #s(literal 2 binary64) (+.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (/.f64 re (*.f64 im im)))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))))
(* -2 im)
(*.f64 im #s(literal -2 binary64))
(* -1 (* im (+ 2 (* -2 (/ re im)))))
(*.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (pow re 2) im)) (* 2 re)) im)))))
(*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) re) (/.f64 (*.f64 re re) im)) im)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im)) (* 2 re)) im)))))
(-.f64 #s(literal 0 binary64) (*.f64 im (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) re) (/.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 re)
(+.f64 im re)
(+ im (* re (+ 1 (* 1/2 (/ re im)))))
(+.f64 im (*.f64 re (+.f64 #s(literal 1 binary64) (*.f64 re (/.f64 #s(literal 1/2 binary64) im)))))
(+ im (* re (+ 1 (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))
(+.f64 im (*.f64 re (+.f64 #s(literal 1 binary64) (*.f64 re (+.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/8 binary64)) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1/2 binary64) im))))))
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
(* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))
(*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))))
(* re (+ 2 (+ (* -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 2 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (pow.f64 re #s(literal 4 binary64))))))
(* 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 re (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (pow.f64 re #s(literal 4 binary64))))) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))))
(* -1/2 (/ (pow im 2) re))
(/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) re)
(* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re))
(/.f64 (+.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (*.f64 re re)) (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (-.f64 #s(literal 0 binary64) re))
(* -1 (/ (+ (* -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 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 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 #s(literal 0 binary64) re))
(* -1 (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re))
(/.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (*.f64 re re)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64))) (pow.f64 re #s(literal 6 binary64))))) (-.f64 #s(literal 0 binary64) re))
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
(+ (* 1/2 (/ (pow im 2) re)) (* 2 re))
(+.f64 (*.f64 #s(literal 2 binary64) re) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re))
(+ (* 2 re) (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+.f64 (*.f64 #s(literal 2 binary64) re) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal -1/8 binary64)) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/2 binary64) re))))
(+ (* 2 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
(+.f64 (*.f64 #s(literal 2 binary64) re) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re re))))))))
im
(* im (+ 1 (/ re im)))
(*.f64 im (+.f64 #s(literal 1 binary64) (/.f64 re im)))
(* im (+ 1 (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im))))
(*.f64 im (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 re im) (/.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))) (/ 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 (* -1 (/ re im)))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(* -1 (* im (+ 1 (* -1 (/ (+ re (* -1/2 (/ (pow re 2) im))) im)))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 (*.f64 re re) #s(literal -1/2 binary64)) im)) im)))
(* -1 (* im (+ 1 (* -1 (/ (+ re (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im))) im)))))
(-.f64 #s(literal 0 binary64) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im)) (*.f64 #s(literal 1/2 binary64) (*.f64 re re))) im)) 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 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/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))))))
(+.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 re (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.f64 #s(literal 1/16 binary64) 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))) (* 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 #s(literal -1/32 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 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 re) (pow (sqrt 2) 2)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(* re (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))
(*.f64 re (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 im im))) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* re (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
(*.f64 re (+.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 im im))) (*.f64 #s(literal -1/32 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))))
(* re (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/64 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
(*.f64 re (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 im im))) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (+.f64 (*.f64 #s(literal -1/32 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal -1/64 binary64) (pow.f64 im #s(literal 4 binary64))) #s(literal 2 binary64))))))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))
(+ (* 1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal 1/32 binary64))))
(+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 re (*.f64 re re))))
(+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/1024 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (+.f64 (/.f64 (*.f64 #s(literal 1/64 binary64) (*.f64 (pow.f64 im #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 #s(literal 1/512 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))))))) (*.f64 re (*.f64 re re))))
(* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))))
(+.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 #s(literal 1/8 binary64) (*.f64 im im))))
(+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* -1/4 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/8 (sqrt (/ 1 (pow re 3)))))))
(+.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (+.f64 (/.f64 #s(literal 1/32 binary64) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/8 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) #s(literal -1/4 binary64))) (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))))))
(+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/4 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))
(+.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (*.f64 im (*.f64 im (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (+.f64 (/.f64 #s(literal 1/32 binary64) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/8 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/32 binary64) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/8 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re)))))))))))))
(* 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 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (*.f64 #s(literal 1/4 binary64) (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/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) #s(literal 1/8 binary64))))))
(* im (+ (* -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/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(*.f64 im (+.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (*.f64 #s(literal 1/4 binary64) (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)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re))) #s(literal 1/16 binary64))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (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))) (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 -1) (sqrt 2))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (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))) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) #s(literal -1/8 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (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))) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re))) (*.f64 (sqrt.f64 im) #s(literal 3/16 binary64))) (*.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* 1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/2 binary64) re)))
(+ (* re (+ (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (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 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.f64 #s(literal 1/8 binary64) re)))))
(+ (* 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 (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/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))))))))
(* (sqrt re) (pow (sqrt 2) 2))
(*.f64 #s(literal 2 binary64) (sqrt.f64 re))
(* re (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))
(*.f64 re (+.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 im im)))))
(* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))
(*.f64 re (+.f64 (+.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 im im)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/16 binary64)))))
(* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/32 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
(*.f64 re (+.f64 (+.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 im im)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/16 binary64)) (/.f64 (*.f64 #s(literal -1/32 binary64) (pow.f64 im #s(literal 4 binary64))) #s(literal 2 binary64))))))
(* (* im (* (sqrt -1) (* (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)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im (sqrt.f64 #s(literal -1 binary64)))))
(+ (* 1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt -1) (* (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)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (* (sqrt -1) (* (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)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 re (*.f64 re re))))
(+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/512 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (* (sqrt -1) (* (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)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 re) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (+.f64 (/.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 (pow.f64 im #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 #s(literal 1/256 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))))))) (*.f64 re (*.f64 re re))))
(* (sqrt re) (pow (sqrt 2) 2))
(*.f64 #s(literal 2 binary64) (sqrt.f64 re))
(+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (pow (sqrt 2) 2)))
(+.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 #s(literal 1/4 binary64) (*.f64 im im))))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* -1/2 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/4 (sqrt (/ 1 (pow re 3)))))))
(+.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1/32 binary64) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/8 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))))))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* 1/4 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/2 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))
(+.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) (*.f64 im (*.f64 im (+.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (*.f64 im (*.f64 im (+.f64 (*.f64 (+.f64 (/.f64 #s(literal 1/32 binary64) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/8 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1/2 binary64))) (*.f64 (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (*.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/32 binary64) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/8 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(*.f64 im (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/4 binary64))))))
(* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) #s(literal 1/8 binary64))) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1 binary64)))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re))) #s(literal -1/4 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (-.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))))) (*.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re)))) (/.f64 #s(literal 3/8 binary64) (*.f64 im (*.f64 im im))))) (-.f64 #s(literal 0 binary64) im))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* 2 im) (* 2 re))
(*.f64 #s(literal 2 binary64) (+.f64 im re))
(+ (* 2 im) (* re (+ 2 (/ re im))))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))
(+ (* 2 im) (* re (+ 2 (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))))))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))))))))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(* re (+ 4 (/ (pow im 2) (pow re 2))))
(*.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))
(* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))
(*.f64 re (+.f64 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 re #s(literal 4 binary64))))))
(* 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 re (+.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))) (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 re #s(literal 4 binary64))))))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re))
(/.f64 (+.f64 (*.f64 im im) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re))
(/.f64 (+.f64 (+.f64 (*.f64 im im) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (*.f64 re re))) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re))
(/.f64 (-.f64 (+.f64 (+.f64 (*.f64 im im) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (*.f64 re re))) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (pow.f64 re #s(literal 6 binary64)))) (-.f64 #s(literal 0 binary64) re))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(+ (* 4 re) (/ (pow im 2) re))
(+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))
(+ (* 4 re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))))
(+.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/4 binary64)) (*.f64 re (*.f64 re re))))))
(+ (* 4 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 re #s(literal 4 binary64)) (*.f64 im (*.f64 im (+.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re)))))))))
(* 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 re im)) (+.f64 #s(literal 2 binary64) (*.f64 re (/.f64 re (*.f64 im im))))))
(* im (+ 2 (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2))))))
(*.f64 im (+.f64 #s(literal 2 binary64) (+.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (/.f64 re (*.f64 im im)))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))))
(* -2 im)
(*.f64 im #s(literal -2 binary64))
(* -1 (* im (+ 2 (* -2 (/ re im)))))
(*.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (pow re 2) im)) (* 2 re)) im)))))
(*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) re) (/.f64 (*.f64 re re) im)) im)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im)) (* 2 re)) im)))))
(-.f64 #s(literal 0 binary64) (*.f64 im (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) re) (/.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 re)
(+.f64 im re)
(+ im (* re (+ 1 (* 1/2 (/ re im)))))
(+.f64 im (*.f64 re (+.f64 #s(literal 1 binary64) (*.f64 re (/.f64 #s(literal 1/2 binary64) im)))))
(+ im (* re (+ 1 (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))
(+.f64 im (*.f64 re (+.f64 #s(literal 1 binary64) (*.f64 re (+.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/8 binary64)) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1/2 binary64) im))))))
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
(* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))
(*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))))
(* re (+ 2 (+ (* -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 2 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (pow.f64 re #s(literal 4 binary64))))))
(* 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 re (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (pow.f64 re #s(literal 4 binary64))))) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))))
(* -1/2 (/ (pow im 2) re))
(/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) re)
(* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re))
(/.f64 (+.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (*.f64 re re)) (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (-.f64 #s(literal 0 binary64) re))
(* -1 (/ (+ (* -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 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 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 #s(literal 0 binary64) re))
(* -1 (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re))
(/.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (*.f64 re re)) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64))) (pow.f64 re #s(literal 6 binary64))))) (-.f64 #s(literal 0 binary64) re))
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
(+ (* 1/2 (/ (pow im 2) re)) (* 2 re))
(+.f64 (*.f64 #s(literal 2 binary64) re) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re))
(+ (* 2 re) (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+.f64 (*.f64 #s(literal 2 binary64) re) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal -1/8 binary64)) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/2 binary64) re))))
(+ (* 2 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
(+.f64 (*.f64 #s(literal 2 binary64) re) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re re))))))))
im
(* im (+ 1 (/ re im)))
(*.f64 im (+.f64 #s(literal 1 binary64) (/.f64 re im)))
(* im (+ 1 (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im))))
(*.f64 im (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 re im) (/.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))) (/ 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 (* -1 (/ re im)))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(* -1 (* im (+ 1 (* -1 (/ (+ re (* -1/2 (/ (pow re 2) im))) im)))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 (*.f64 re re) #s(literal -1/2 binary64)) im)) im)))
(* -1 (* im (+ 1 (* -1 (/ (+ re (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im))) im)))))
(-.f64 #s(literal 0 binary64) (*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im)) (*.f64 #s(literal 1/2 binary64) (*.f64 re re))) im)) im))))
im
(+ im (* 1/2 (/ (pow re 2) im)))
(+.f64 im (*.f64 re (*.f64 re (/.f64 #s(literal 1/2 binary64) im))))
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+.f64 im (*.f64 re (*.f64 re (+.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal -1/8 binary64)) (*.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 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 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 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 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 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 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 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 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 (*.f64 im im) #s(literal -1/8 binary64)) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/2 binary64) re))))
(+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
(+.f64 re (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re re))))))))
im
(* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))
(*.f64 im (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(*.f64 im (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64)))))
(* -1 im)
(-.f64 #s(literal 0 binary64) im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(*.f64 (-.f64 #s(literal 0 binary64) 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 #s(literal 0 binary64) im) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64)))))
(pow im 2)
(*.f64 im im)
(+ (pow im 2) (pow re 2))
(+.f64 (*.f64 im im) (*.f64 re re))
(+ (pow im 2) (pow re 2))
(+.f64 (*.f64 im im) (*.f64 re re))
(+ (pow im 2) (pow re 2))
(+.f64 (*.f64 im im) (*.f64 re re))
(pow 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 im im) (*.f64 re re))
(+ (pow im 2) (pow re 2))
(+.f64 (*.f64 im im) (*.f64 re re))
(+ (pow im 2) (pow re 2))
(+.f64 (*.f64 im im) (*.f64 re re))
(pow im 2)
(*.f64 im im)
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(*.f64 (*.f64 im im) (+.f64 #s(literal 1 binary64) (*.f64 re (/.f64 re (*.f64 im im)))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(*.f64 (*.f64 im im) (+.f64 #s(literal 1 binary64) (*.f64 re (/.f64 re (*.f64 im im)))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(*.f64 (*.f64 im im) (+.f64 #s(literal 1 binary64) (*.f64 re (/.f64 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 re (/.f64 re (*.f64 im im)))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(*.f64 (*.f64 im im) (+.f64 #s(literal 1 binary64) (*.f64 re (/.f64 re (*.f64 im im)))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(*.f64 (*.f64 im im) (+.f64 #s(literal 1 binary64) (*.f64 re (/.f64 re (*.f64 im im)))))

eval97.0ms (0.9%)

Compiler

Compiled 23494 to 2245 computations (90.4% saved)

prune59.0ms (0.6%)

Pruning

13 alts after pruning (12 fresh and 1 done)

PrunedKeptTotal
New65912671
Fresh000
Picked112
Done000
Total66013673
Accuracy
90.7%
Counts
673 → 13
Alt Table
Click to see full alt table
StatusAccuracyProgram
51.9%
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
▶29.9%
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
▶13.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))))
▶28.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))))
25.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/4 binary64)) (*.f64 re (*.f64 re re))))))))
52.6%
(*.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))))))
41.6%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))))))))))
28.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (/.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im))))))
54.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 re im))))))
51.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
▶4.5%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) re))))
✓81.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
▶55.4%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re))))
Compiler

Compiled 402 to 283 computations (29.6% saved)

simplify168.0ms (1.6%)

Algorithm
1×egg-herbie
Localize:

Found 18 expressions of interest:

NewMetricScoreProgram
✓cost-diff384
(+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) re)
✓cost-diff512
(*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) re))
✓cost-diff512
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) re)))
✓cost-diff512
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) re))))
✓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 (*.f64 im im) re)
✓cost-diff0
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
✓cost-diff0
(sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))))
✓cost-diff0
(sqrt.f64 re)
✓cost-diff128
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
✓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
2488×*-lowering-*.f32
2488×*-lowering-*.f64
1824×fma-lowering-fma.f32
1824×fma-lowering-fma.f64
1754×fmsub-define
Iterations

Useful iterations: 4 (0.0ms)

IterNodesCost
032232
175226
2156222
3459222
41987204
55688204
08057204
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 (sqrt re))
1
(sqrt re)
re
(* 1/2 (sqrt (- 0 (/ (* im im) re))))
1/2
(sqrt (- 0 (/ (* im im) re)))
(- 0 (/ (* im im) re))
0
(/ (* im im) re)
(* im im)
im
re
(* 1/2 (sqrt (+ (* re 4) (/ (* im im) re))))
1/2
(sqrt (+ (* re 4) (/ (* im im) re)))
(+ (* re 4) (/ (* im im) re))
(* re 4)
re
4
(/ (* im im) re)
(* im im)
im
(* 1/2 (sqrt (* 2 (+ (* (+ 1 (/ (* 1/2 (* im im)) (* re re))) (- 0 re)) re))))
1/2
(sqrt (* 2 (+ (* (+ 1 (/ (* 1/2 (* im im)) (* re re))) (- 0 re)) re)))
(* 2 (+ (* (+ 1 (/ (* 1/2 (* im im)) (* re re))) (- 0 re)) re))
2
(+ (* (+ 1 (/ (* 1/2 (* im im)) (* re re))) (- 0 re)) re)
(* (+ 1 (/ (* 1/2 (* im im)) (* re re))) (- 0 re))
(+ 1 (/ (* 1/2 (* im im)) (* re re)))
1
(/ (* 1/2 (* im im)) (* re re))
(* 1/2 (* im im))
(* im im)
im
(* re re)
re
(- 0 re)
0
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 (sqrt re))
(sqrt.f64 re)
1
#s(literal 1 binary64)
(sqrt re)
(sqrt.f64 re)
re
(* 1/2 (sqrt (- 0 (/ (* im im) re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (-.f64 #s(literal 0 binary64) (/.f64 im re)))))
1/2
#s(literal 1/2 binary64)
(sqrt (- 0 (/ (* im im) re)))
(sqrt.f64 (*.f64 im (-.f64 #s(literal 0 binary64) (/.f64 im re))))
(- 0 (/ (* im im) re))
(*.f64 im (-.f64 #s(literal 0 binary64) (/.f64 im re)))
0
#s(literal 0 binary64)
(/ (* im im) re)
(/.f64 (*.f64 im im) re)
(* im im)
(*.f64 im im)
im
re
(* 1/2 (sqrt (+ (* re 4) (/ (* im im) re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (/.f64 (*.f64 im im) re) (*.f64 re #s(literal 4 binary64)))))
1/2
#s(literal 1/2 binary64)
(sqrt (+ (* re 4) (/ (* im im) re)))
(sqrt.f64 (+.f64 (/.f64 (*.f64 im im) re) (*.f64 re #s(literal 4 binary64))))
(+ (* re 4) (/ (* im im) re))
(+.f64 (/.f64 (*.f64 im im) re) (*.f64 re #s(literal 4 binary64)))
(* re 4)
(*.f64 re #s(literal 4 binary64))
re
4
#s(literal 4 binary64)
(/ (* im im) re)
(/.f64 (*.f64 im im) re)
(* im im)
(*.f64 im im)
im
(* 1/2 (sqrt (* 2 (+ (* (+ 1 (/ (* 1/2 (* im im)) (* re re))) (- 0 re)) re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 im (*.f64 im (-.f64 #s(literal 0 binary64) re))) (*.f64 re re))))
1/2
#s(literal 1/2 binary64)
(sqrt (* 2 (+ (* (+ 1 (/ (* 1/2 (* im im)) (* re re))) (- 0 re)) re)))
(sqrt.f64 (/.f64 (*.f64 im (*.f64 im (-.f64 #s(literal 0 binary64) re))) (*.f64 re re)))
(* 2 (+ (* (+ 1 (/ (* 1/2 (* im im)) (* re re))) (- 0 re)) re))
(/.f64 (*.f64 im (*.f64 im (-.f64 #s(literal 0 binary64) re))) (*.f64 re re))
2
#s(literal 2 binary64)
(+ (* (+ 1 (/ (* 1/2 (* im im)) (* re re))) (- 0 re)) re)
(/.f64 (*.f64 im (*.f64 im (*.f64 re #s(literal -1/2 binary64)))) (*.f64 re re))
(* (+ 1 (/ (* 1/2 (* im im)) (* re re))) (- 0 re))
(*.f64 re (+.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re))))
(+ 1 (/ (* 1/2 (* im im)) (* re re)))
(+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))
1
#s(literal 1 binary64)
(/ (* 1/2 (* im im)) (* re re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* 1/2 (* im im))
(*.f64 #s(literal 1/2 binary64) (*.f64 im im))
(* im im)
(*.f64 im im)
im
(* re re)
(*.f64 re re)
re
(- 0 re)
(-.f64 #s(literal 0 binary64) re)
0
#s(literal 0 binary64)

localize205.0ms (1.9%)

Localize:

Found 18 expressions of interest:

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

Compiled 253 to 33 computations (87% saved)

Precisions
Click to see histograms. Total time spent on operations: 56.0ms
ival-mult: 35.0ms (62.2% of total)
ival-sqrt: 9.0ms (16% of total)
ival-add: 5.0ms (8.9% of total)
ival-div: 4.0ms (7.1% of total)
ival-sub: 3.0ms (5.3% of total)
const: 1.0ms (1.8% of total)
backward-pass: 0.0ms (0% of total)

series62.0ms (0.6%)

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

105 calls:

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

rewrite379.0ms (3.6%)

Algorithm
1×batch-egg-rewrite
Rules
4652×*-lowering-*.f32
4652×*-lowering-*.f64
2784×/-lowering-/.f32
2784×/-lowering-/.f64
2694×+-lowering-+.f64
Iterations

Useful iterations: 2 (0.0ms)

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

simplify499.0ms (4.7%)

Algorithm
1×egg-herbie
Rules
8402×*-lowering-*.f32
8402×*-lowering-*.f64
3744×+-lowering-+.f64
3744×+-lowering-+.f32
1812×fma-lowering-fma.f32
Iterations

Useful iterations: 1 (0.0ms)

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

eval401.0ms (3.8%)

Compiler

Compiled 20927 to 2424 computations (88.4% saved)

prune141.0ms (1.3%)

Pruning

23 alts after pruning (20 fresh and 3 done)

PrunedKeptTotal
New85114865
Fresh167
Picked325
Done011
Total85523878
Accuracy
99.6%
Counts
878 → 23
Alt Table
Click to see full alt table
StatusAccuracyProgram
19.9%
(pow.f64 (*.f64 re re) #s(literal 1/4 binary64))
51.9%
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
15.6%
(*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (*.f64 im im)) (sqrt.f64 (-.f64 #s(literal 0 binary64) re))))
12.5%
(*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (/.f64 re (*.f64 im im))))))
15.7%
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (*.f64 im im)) (sqrt.f64 (neg.f64 (/.f64 #s(literal 1 binary64) re)))))
20.5%
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 (neg.f64 (/.f64 im re)))))
30.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 (/.f64 im re) im))))
25.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/4 binary64)) (*.f64 re (*.f64 re re))))))))
▶52.6%
(*.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))))))
41.6%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))))))))))
28.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (/.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im))))))
16.1%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (neg.f64 im) (/.f64 im re))))
▶54.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal 2 binary64)) im)))))
51.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
▶2.1%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) re)))) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)))))))))
1.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)))) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)))) (*.f64 re re)))))))
1.5%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 re re)) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re))))))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))))
✓4.5%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) re))))
✓81.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
✓55.4%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re))))
▶13.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (neg.f64 (/.f64 (*.f64 im im) re))))
4.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 0 binary64)))
▶29.9%
(sqrt.f64 re)
Compiler

Compiled 906 to 530 computations (41.5% saved)

simplify260.0ms (2.4%)

Algorithm
1×egg-herbie
Localize:

Found 17 expressions of interest:

NewMetricScoreProgram
✓cost-diff768
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) re)))) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re))))))
✓cost-diff768
(*.f64 #s(literal 2 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) re)))) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)))))))
✓cost-diff768
(sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) re)))) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re))))))))
✓cost-diff768
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) re)))) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)))))))))
✓cost-diff0
(*.f64 im #s(literal 2 binary64))
✓cost-diff0
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))
✓cost-diff0
(sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))))
✓cost-diff-64
(sqrt.f64 (neg.f64 (/.f64 (*.f64 im im) re)))
✓cost-diff-64
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (neg.f64 (/.f64 (*.f64 im im) re))))
✓cost-diff0
(*.f64 im im)
✓cost-diff0
(/.f64 (*.f64 im im) re)
✓cost-diff0
(sqrt.f64 re)
✓cost-diff0
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal 2 binary64)) im))
✓cost-diff256
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal 2 binary64)) im)))
✓cost-diff256
(sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal 2 binary64)) im))))
✓cost-diff256
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal 2 binary64)) im)))))
Rules
3340×*-lowering-*.f32
3340×*-lowering-*.f64
2520×/-lowering-/.f32
2520×/-lowering-/.f64
1212×fma-lowering-fma.f32
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
045596
1126592
2387492
31598424
46936424
08405424
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(* 1/2 (sqrt (* im (+ 2 (/ (* re 2) im)))))
1/2
(sqrt (* im (+ 2 (/ (* re 2) im))))
(* im (+ 2 (/ (* re 2) im)))
im
(+ 2 (/ (* re 2) im))
2
(/ (* re 2) im)
(* re 2)
re
(sqrt re)
re
(* 1/2 (sqrt (neg (/ (* im im) re))))
1/2
(sqrt (neg (/ (* im im) re)))
(neg (/ (* im im) re))
(/ (* im im) re)
(* im im)
im
re
(* 1/2 (sqrt (+ (* im 2) (* re (+ 2 (/ re im))))))
1/2
(sqrt (+ (* im 2) (* re (+ 2 (/ re im)))))
(+ (* im 2) (* re (+ 2 (/ re im))))
(* im 2)
im
2
(* re (+ 2 (/ re im)))
re
(+ 2 (/ re im))
(/ re im)
(* 1/2 (sqrt (* 2 (/ (+ (* (- 0 (* re re)) (- 1 (* (* im im) (/ 1/2 (* re re))))) (* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 re)))) (* (- 0 re) (- 1 (* (* im im) (/ 1/2 (* re re)))))))))
1/2
(sqrt (* 2 (/ (+ (* (- 0 (* re re)) (- 1 (* (* im im) (/ 1/2 (* re re))))) (* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 re)))) (* (- 0 re) (- 1 (* (* im im) (/ 1/2 (* re re))))))))
(* 2 (/ (+ (* (- 0 (* re re)) (- 1 (* (* im im) (/ 1/2 (* re re))))) (* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 re)))) (* (- 0 re) (- 1 (* (* im im) (/ 1/2 (* re re)))))))
2
(/ (+ (* (- 0 (* re re)) (- 1 (* (* im im) (/ 1/2 (* re re))))) (* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 re)))) (* (- 0 re) (- 1 (* (* im im) (/ 1/2 (* re re))))))
(+ (* (- 0 (* re re)) (- 1 (* (* im im) (/ 1/2 (* re re))))) (* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 re))))
(* (- 0 (* re re)) (- 1 (* (* im im) (/ 1/2 (* re re)))))
(- 0 (* re re))
0
(* re re)
re
(- 1 (* (* im im) (/ 1/2 (* re re))))
1
(* (* im im) (/ 1/2 (* re re)))
(* im im)
im
(/ 1/2 (* re re))
(* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 re)))
(- 0 re)
(* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 re))
(- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re)))))
(* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))
1/4
(* (/ (* im im) (* re re)) (/ (* im im) (* re re)))
(/ (* im im) (* re re))
(* (- 0 re) (- 1 (* (* im im) (/ 1/2 (* re re)))))
Outputs
(* 1/2 (sqrt (* im (+ 2 (/ (* re 2) im)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re))))
1/2
#s(literal 1/2 binary64)
(sqrt (* im (+ 2 (/ (* re 2) im))))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re)))
(* im (+ 2 (/ (* re 2) im)))
(*.f64 #s(literal 2 binary64) (+.f64 im re))
im
(+ 2 (/ (* re 2) im))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im))
2
#s(literal 2 binary64)
(/ (* re 2) im)
(/.f64 (*.f64 #s(literal 2 binary64) re) im)
(* re 2)
(*.f64 #s(literal 2 binary64) re)
re
(sqrt re)
(sqrt.f64 re)
re
(* 1/2 (sqrt (neg (/ (* im im) re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 im im) (-.f64 #s(literal 0 binary64) re))))
1/2
#s(literal 1/2 binary64)
(sqrt (neg (/ (* im im) re)))
(sqrt.f64 (/.f64 (*.f64 im im) (-.f64 #s(literal 0 binary64) re)))
(neg (/ (* im im) re))
(/.f64 (*.f64 im im) (-.f64 #s(literal 0 binary64) re))
(/ (* im im) re)
(/.f64 (*.f64 im im) re)
(* im im)
(*.f64 im im)
im
re
(* 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))
(/ re im)
(/.f64 re im)
(* 1/2 (sqrt (* 2 (/ (+ (* (- 0 (* re re)) (- 1 (* (* im im) (/ 1/2 (* re re))))) (* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 re)))) (* (- 0 re) (- 1 (* (* im im) (/ 1/2 (* re re)))))))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 (*.f64 (*.f64 re re) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)) #s(literal -1 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 re re)) (*.f64 re re))))) (/.f64 #s(literal -2 binary64) re)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re))))))
1/2
#s(literal 1/2 binary64)
(sqrt (* 2 (/ (+ (* (- 0 (* re re)) (- 1 (* (* im im) (/ 1/2 (* re re))))) (* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 re)))) (* (- 0 re) (- 1 (* (* im im) (/ 1/2 (* re re))))))))
(sqrt.f64 (/.f64 (*.f64 (*.f64 (*.f64 re re) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)) #s(literal -1 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 re re)) (*.f64 re re))))) (/.f64 #s(literal -2 binary64) re)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re)))))
(* 2 (/ (+ (* (- 0 (* re re)) (- 1 (* (* im im) (/ 1/2 (* re re))))) (* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 re)))) (* (- 0 re) (- 1 (* (* im im) (/ 1/2 (* re re)))))))
(/.f64 (*.f64 (*.f64 (*.f64 re re) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)) #s(literal -1 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 re re)) (*.f64 re re))))) (/.f64 #s(literal -2 binary64) re)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re))))
2
#s(literal 2 binary64)
(/ (+ (* (- 0 (* re re)) (- 1 (* (* im im) (/ 1/2 (* re re))))) (* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 re)))) (* (- 0 re) (- 1 (* (* im im) (/ 1/2 (* re re))))))
(/.f64 (*.f64 (*.f64 re re) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)) #s(literal -1 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 re re)) (*.f64 re re))))) (*.f64 re (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)) #s(literal -1 binary64))))
(+ (* (- 0 (* re re)) (- 1 (* (* im im) (/ 1/2 (* re re))))) (* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 re))))
(*.f64 (*.f64 re re) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)) #s(literal -1 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 re re)) (*.f64 re re)))))
(* (- 0 (* re re)) (- 1 (* (* im im) (/ 1/2 (* re re)))))
(*.f64 re (*.f64 re (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)) #s(literal -1 binary64))))
(- 0 (* re re))
(-.f64 #s(literal 0 binary64) (*.f64 re re))
0
#s(literal 0 binary64)
(* re re)
(*.f64 re re)
re
(- 1 (* (* im im) (/ 1/2 (* re re))))
(+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re)))
1
#s(literal 1 binary64)
(* (* im im) (/ 1/2 (* re re)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* im im)
(*.f64 im im)
im
(/ 1/2 (* re re))
(/.f64 #s(literal 1/2 binary64) (*.f64 re re))
(* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 re)))
(*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 re re)) (*.f64 re re))))
(- 0 re)
(-.f64 #s(literal 0 binary64) re)
(* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 re))
(*.f64 re (+.f64 (*.f64 (*.f64 im (/.f64 im (*.f64 re (*.f64 re re)))) (/.f64 (*.f64 (*.f64 im im) #s(literal 1/4 binary64)) re)) #s(literal -1 binary64)))
(- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re)))))
(+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 re re)) (*.f64 re re)))
(* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))
(*.f64 (*.f64 im (/.f64 im (*.f64 re (*.f64 re re)))) (/.f64 (*.f64 (*.f64 im im) #s(literal 1/4 binary64)) re))
1/4
#s(literal 1/4 binary64)
(* (/ (* im im) (* re re)) (/ (* im im) (* re re)))
(/.f64 (/.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 re re)) (*.f64 re re))
(/ (* im im) (* re re))
(/.f64 (*.f64 im im) (*.f64 re re))
(* (- 0 re) (- 1 (* (* im im) (/ 1/2 (* re re)))))
(*.f64 re (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)) #s(literal -1 binary64)))

localize261.0ms (2.4%)

Localize:

Found 17 expressions of interest:

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

Compiled 633 to 46 computations (92.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 86.0ms
ival-sqrt: 31.0ms (36.3% of total)
ival-mult: 30.0ms (35.1% of total)
ival-div: 13.0ms (15.2% of total)
ival-sub: 5.0ms (5.8% of total)
ival-add: 5.0ms (5.8% of total)
const: 1.0ms (1.2% of total)
ival-neg: 1.0ms (1.2% of total)
backward-pass: 0.0ms (0% of total)

series58.0ms (0.5%)

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

114 calls:

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

rewrite441.0ms (4.1%)

Algorithm
1×batch-egg-rewrite
Rules
3002×*-lowering-*.f32
3002×*-lowering-*.f64
2332×fma-lowering-fma.f32
2332×fma-lowering-fma.f64
1982×/-lowering-/.f32
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
045338
1269308
22533274
08480274
Stop Event
1×iter limit
1×node limit
Counts
21 → 344
Calls
Call 1
Inputs
(* 1/2 (sqrt (* im (+ 2 (/ (* re 2) im)))))
(sqrt (* im (+ 2 (/ (* re 2) im))))
(* im (+ 2 (/ (* re 2) im)))
(+ 2 (/ (* re 2) im))
(sqrt re)
(/ (* im im) re)
(* im im)
(* 1/2 (sqrt (neg (/ (* im im) re))))
(sqrt (neg (/ (* im im) re)))
(* 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 (* 2 (/ (+ (* (- 0 (* re re)) (- 1 (* (* im im) (/ 1/2 (* re re))))) (* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 re)))) (* (- 0 re) (- 1 (* (* im im) (/ 1/2 (* re re)))))))))
(sqrt (* 2 (/ (+ (* (- 0 (* re re)) (- 1 (* (* im im) (/ 1/2 (* re re))))) (* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 re)))) (* (- 0 re) (- 1 (* (* im im) (/ 1/2 (* re re))))))))
(* 2 (/ (+ (* (- 0 (* re re)) (- 1 (* (* im im) (/ 1/2 (* re re))))) (* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 re)))) (* (- 0 re) (- 1 (* (* im im) (/ 1/2 (* re re)))))))
(/ (+ (* (- 0 (* re re)) (- 1 (* (* im im) (/ 1/2 (* re re))))) (* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 re)))) (* (- 0 re) (- 1 (* (* im im) (/ 1/2 (* re re))))))
(* re 2)
(neg (/ (* im im) re))
(* re (+ 2 (/ re im)))
(* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))
Outputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64)))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64)))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 (+.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (/.f64 im re)))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 (+.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (/.f64 im re)))))
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 im (*.f64 im im))) (*.f64 (*.f64 #s(literal 8 binary64) (*.f64 re (*.f64 re re))) #s(literal 1 binary64)))) (sqrt.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64))) (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64)))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64))))) (sqrt.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64)))))
(/.f64 (sqrt.f64 (*.f64 im (+.f64 #s(literal 8 binary64) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im im)))))) (sqrt.f64 (+.f64 #s(literal 4 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (/.f64 im re)) (-.f64 (/.f64 #s(literal 2 binary64) (/.f64 im re)) #s(literal 2 binary64))))))
(/.f64 (sqrt.f64 (*.f64 im (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 re im) (/.f64 im re)))))) (pow.f64 (-.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (/.f64 im re))) #s(literal 1/2 binary64)))
(/.f64 (sqrt.f64 (*.f64 (+.f64 #s(literal 8 binary64) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im im)))) im)) (sqrt.f64 (+.f64 #s(literal 4 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (/.f64 im re)) (-.f64 (/.f64 #s(literal 2 binary64) (/.f64 im re)) #s(literal 2 binary64))))))
(/.f64 (sqrt.f64 (*.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 re im) (/.f64 im re)))) im)) (pow.f64 (-.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (/.f64 im re))) #s(literal 1/2 binary64)))
(pow.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64))) (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64)))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64))))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 im) (sqrt.f64 (+.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (/.f64 im re)))))
(*.f64 (sqrt.f64 (+.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (/.f64 im re)))) (sqrt.f64 im))
(*.f64 (pow.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64))) #s(literal 1/4 binary64)))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64)))
(+.f64 (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64)) (*.f64 im #s(literal 2 binary64)))
(fma.f64 im #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64)))
(fma.f64 im (/.f64 #s(literal 2 binary64) (/.f64 im re)) (*.f64 im #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) im (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64)))
(fma.f64 re (*.f64 (/.f64 #s(literal 2 binary64) im) im) (*.f64 im #s(literal 2 binary64)))
(fma.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64) (*.f64 im #s(literal 2 binary64)))
(fma.f64 (/.f64 #s(literal 2 binary64) (/.f64 im re)) im (*.f64 im #s(literal 2 binary64)))
(fma.f64 (*.f64 im re) (/.f64 #s(literal 2 binary64) im) (*.f64 im #s(literal 2 binary64)))
(fma.f64 (*.f64 im (*.f64 #s(literal 2 binary64) re)) (/.f64 #s(literal 1 binary64) im) (*.f64 im #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 im (*.f64 im im))) (*.f64 (*.f64 #s(literal 8 binary64) (*.f64 re (*.f64 re re))) #s(literal 1 binary64))) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64))) (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64)))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) #s(literal 1 binary64))))
(/.f64 (*.f64 im (+.f64 #s(literal 8 binary64) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im im))))) (+.f64 #s(literal 4 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (/.f64 im re)) (-.f64 (/.f64 #s(literal 2 binary64) (/.f64 im re)) #s(literal 2 binary64)))))
(/.f64 (*.f64 im (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 re im) (/.f64 im re))))) (-.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (/.f64 im re))))
(/.f64 (*.f64 (+.f64 #s(literal 8 binary64) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im im)))) im) (+.f64 #s(literal 4 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (/.f64 im re)) (-.f64 (/.f64 #s(literal 2 binary64) (/.f64 im re)) #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 re im) (/.f64 im re)))) im) (-.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (/.f64 im re))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (/.f64 im re))))
(*.f64 (+.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (/.f64 im re))) im)
(+.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (/.f64 im re)))
(+.f64 (/.f64 #s(literal 2 binary64) (/.f64 im 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 #s(literal 4 binary64) (/.f64 (/.f64 re im) (/.f64 im re))) (-.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (/.f64 im re)))))
(fma.f64 #s(literal 2 binary64) (/.f64 re im) #s(literal 2 binary64))
(fma.f64 re (/.f64 #s(literal 2 binary64) im) #s(literal 2 binary64))
(fma.f64 (*.f64 #s(literal 2 binary64) re) (/.f64 #s(literal 1 binary64) im) #s(literal 2 binary64))
(fma.f64 (/.f64 re im) #s(literal 2 binary64) #s(literal 2 binary64))
(fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (/.f64 im re)) #s(literal 2 binary64))
(fma.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) im)) #s(literal 2 binary64))
(fma.f64 (/.f64 #s(literal 1 binary64) im) (*.f64 #s(literal 2 binary64) re) #s(literal 2 binary64))
(fma.f64 (/.f64 #s(literal 2 binary64) im) re #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 4 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (/.f64 im re)) (-.f64 (/.f64 #s(literal 2 binary64) (/.f64 im re)) #s(literal 2 binary64)))) (+.f64 #s(literal 8 binary64) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im im))))))
(/.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 #s(literal 4 binary64) (/.f64 (/.f64 re im) (/.f64 im re))))))
(/.f64 (+.f64 #s(literal 8 binary64) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im im)))) (+.f64 #s(literal 4 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (/.f64 im re)) (-.f64 (/.f64 #s(literal 2 binary64) (/.f64 im re)) #s(literal 2 binary64)))))
(/.f64 (+.f64 #s(literal 8 binary64) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im im)))) (+.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 re im) (/.f64 im re))) (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (/.f64 im re))))))
(/.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 re im) (/.f64 im re)))) (-.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (/.f64 im re))))
(/.f64 (neg.f64 (+.f64 #s(literal 8 binary64) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im im))))) (neg.f64 (+.f64 #s(literal 4 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (/.f64 im re)) (-.f64 (/.f64 #s(literal 2 binary64) (/.f64 im re)) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 re im) (/.f64 im re))))) (neg.f64 (-.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (/.f64 im re)))))
(/.f64 (-.f64 (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 re im) (/.f64 im re))) #s(literal 4 binary64)) (-.f64 (/.f64 #s(literal 2 binary64) (/.f64 im re)) #s(literal 2 binary64)))
(pow.f64 (/.f64 (+.f64 #s(literal 4 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (/.f64 im re)) (-.f64 (/.f64 #s(literal 2 binary64) (/.f64 im re)) #s(literal 2 binary64)))) (+.f64 #s(literal 8 binary64) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im im))))) #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 #s(literal 4 binary64) (/.f64 (/.f64 re im) (/.f64 im re))))) #s(literal -1 binary64))
(*.f64 (+.f64 #s(literal 8 binary64) (/.f64 (*.f64 #s(literal 8 binary64) (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im im)))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 4 binary64) (*.f64 (/.f64 #s(literal 2 binary64) (/.f64 im re)) (-.f64 (/.f64 #s(literal 2 binary64) (/.f64 im re)) #s(literal 2 binary64))))))
(*.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 re im) (/.f64 im re)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (/.f64 im re)))))
(exp.f64 (*.f64 (log.f64 re) #s(literal 1/2 binary64)))
(sqrt.f64 re)
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re))) (sqrt.f64 (-.f64 #s(literal 0 binary64) re)))
(/.f64 (sqrt.f64 (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (sqrt.f64 (*.f64 re re)))
(pow.f64 re #s(literal 1/2 binary64))
(pow.f64 (*.f64 re re) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 re #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 re)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 re #s(literal 1/4 binary64)) (pow.f64 re #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 re (*.f64 im im))) #s(literal -1 binary64)))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 re (*.f64 im im))))
(/.f64 (*.f64 im im) re)
(/.f64 #s(literal 1 binary64) (/.f64 re (*.f64 im im)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 re (*.f64 im im)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (-.f64 #s(literal 0 binary64) re))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 re (*.f64 im im))))
(/.f64 (*.f64 (*.f64 im im) #s(literal 1 binary64)) re)
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im))) (neg.f64 (-.f64 #s(literal 0 binary64) re)))
(pow.f64 (/.f64 re (*.f64 im im)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 re (*.f64 im im)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 im (/.f64 im re))
(*.f64 (*.f64 im im) (/.f64 #s(literal 1 binary64) re))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 im im) re))
(*.f64 (*.f64 im (/.f64 im (*.f64 re re))) re)
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)))
(*.f64 (/.f64 im 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 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re))
(exp.f64 (*.f64 (log.f64 im) #s(literal 2 binary64)))
(pow.f64 im #s(literal 2 binary64))
(pow.f64 (*.f64 im im) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 im)) #s(literal 2 binary64))
(*.f64 im im)
(*.f64 (exp.f64 (log.f64 im)) (exp.f64 (log.f64 im)))
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 (-.f64 #s(literal 0 binary64) re))))
(*.f64 (/.f64 im (sqrt.f64 (-.f64 #s(literal 0 binary64) re))) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) (/.f64 re (*.f64 im im)))) #s(literal 1/2 binary64)))
(sqrt.f64 (/.f64 #s(literal -1 binary64) (/.f64 re (*.f64 im im))))
(/.f64 im (sqrt.f64 (-.f64 #s(literal 0 binary64) re)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (/.f64 re (*.f64 im im)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 im im))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 re (-.f64 #s(literal 0 binary64) (*.f64 im im)))))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 re (*.f64 im im))))
(/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im) (sqrt.f64 re))
(/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im) (sqrt.f64 (neg.f64 (-.f64 #s(literal 0 binary64) re))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)))) (sqrt.f64 (-.f64 #s(literal 0 binary64) re)))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 re (*.f64 re re))))) (sqrt.f64 (+.f64 #s(literal 0 binary64) (+.f64 (*.f64 im (*.f64 im (*.f64 im (/.f64 im (*.f64 re re))))) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im (*.f64 im (/.f64 im (*.f64 re re))))))) (sqrt.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))))
(/.f64 (sqrt.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 im im)))) (sqrt.f64 (-.f64 #s(literal 0 binary64) re)))
(pow.f64 (/.f64 #s(literal -1 binary64) (/.f64 re (*.f64 im im))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (/.f64 re (*.f64 im im))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 #s(literal -1 binary64) (/.f64 re (*.f64 im im))) (/.f64 #s(literal -1 binary64) (/.f64 re (*.f64 im im)))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 #s(literal -1 binary64) (/.f64 re (*.f64 im im))))) #s(literal 1/2 binary64))
(*.f64 im (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/2 binary64)))
(*.f64 im (pow.f64 (neg.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 1/2 binary64)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re))))
(*.f64 im (sqrt.f64 (neg.f64 (/.f64 #s(literal 1 binary64) re))))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 im (sqrt.f64 re)))
(*.f64 (/.f64 im (sqrt.f64 re)) (sqrt.f64 #s(literal -1 binary64)))
(*.f64 (sqrt.f64 im) (pow.f64 (neg.f64 (/.f64 im re)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 im) (pow.f64 (/.f64 im (-.f64 #s(literal 0 binary64) re)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 im) (sqrt.f64 (neg.f64 (/.f64 im re))))
(*.f64 (sqrt.f64 im) (sqrt.f64 (/.f64 im (-.f64 #s(literal 0 binary64) re))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (/.f64 re (*.f64 im im))) #s(literal 1/4 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (/.f64 re (*.f64 im im))) #s(literal 1/4 binary64)))
(*.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 (pow.f64 (-.f64 #s(literal 0 binary64) im) #s(literal 1/2 binary64)) (pow.f64 (/.f64 im re) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 im im) (-.f64 #s(literal 0 binary64) (*.f64 re re))) #s(literal 1/2 binary64)) (sqrt.f64 re))
(*.f64 (pow.f64 (/.f64 (*.f64 im im) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) #s(literal 1/2 binary64)) (pow.f64 (*.f64 re re) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) im)) (sqrt.f64 (/.f64 im re)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 im im) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (sqrt.f64 re))
(*.f64 (sqrt.f64 (/.f64 (*.f64 im im) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 (*.f64 re 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 (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 #s(literal 8 binary64) (*.f64 im (*.f64 im im))) (*.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 #s(literal 8 binary64) (*.f64 im (*.f64 im im))) (*.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 #s(literal 8 binary64) (*.f64 im (*.f64 im im))) (*.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 (*.f64 im #s(literal 2 binary64)) 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 #s(literal 8 binary64) (*.f64 im (*.f64 im im))) (*.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)))))
(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 #s(literal 8 binary64) (*.f64 im (*.f64 im im))) (*.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 #s(literal 8 binary64) (*.f64 im (*.f64 im im))) (*.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 #s(literal 2 binary64) re) (+.f64 (/.f64 re (/.f64 im re)) (*.f64 im #s(literal 2 binary64))))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))
(+.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 im #s(literal 2 binary64)))
(+.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) re)) (/.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))))))
(fma.f64 im #s(literal 2 binary64) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))
(fma.f64 #s(literal 2 binary64) im (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))
(fma.f64 #s(literal 2 binary64) re (+.f64 (/.f64 re (/.f64 im re)) (*.f64 im #s(literal 2 binary64))))
(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 (+.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 #s(literal 8 binary64) (*.f64 im (*.f64 im im))) (*.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 #s(literal 8 binary64) (*.f64 im (*.f64 im im))) (*.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 #s(literal 8 binary64) (*.f64 im (*.f64 im im))) (*.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 (*.f64 im #s(literal 2 binary64)) 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 (neg.f64 (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 im (*.f64 im im))) (*.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 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))))
(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 #s(literal 8 binary64) (*.f64 im (*.f64 im im))) (*.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 #s(literal 8 binary64) (*.f64 im (*.f64 im im))) (*.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) (sqrt.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))))))
(*.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))))))
(exp.f64 (*.f64 (log.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))))) #s(literal 1/2 binary64)))
(sqrt.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))))) (sqrt.f64 (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))))))
(/.f64 (sqrt.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))))) (sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (neg.f64 (-.f64 #s(literal 0 binary64) re)))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))))) (sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (neg.f64 (-.f64 #s(literal 0 binary64) re)))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) re)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))))
(/.f64 (sqrt.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) #s(literal 2 binary64))) (sqrt.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (neg.f64 (-.f64 #s(literal 0 binary64) re)))))
(/.f64 (sqrt.f64 (*.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) re)) #s(literal 2 binary64))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))))
(/.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) re)))
(/.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) (-.f64 #s(literal 0 binary64) re))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))))
(pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))))) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))))))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))))))
(*.f64 (sqrt.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))))) (pow.f64 (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))))) #s(literal 1/4 binary64)) (pow.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))))) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) (pow.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) (sqrt.f64 (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))) #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))) #s(literal 1/2 binary64)) (sqrt.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) re))))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/2 binary64)) (pow.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))) (sqrt.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) re))) (sqrt.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))))
(/.f64 #s(literal 2 binary64) (/.f64 (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))))))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (neg.f64 (-.f64 #s(literal 0 binary64) re))))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (neg.f64 (-.f64 #s(literal 0 binary64) re))))
(/.f64 (*.f64 #s(literal 2 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) re))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (neg.f64 (-.f64 #s(literal 0 binary64) re))))
(/.f64 (*.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) re)) #s(literal 2 binary64)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))
(/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))) (-.f64 #s(literal 0 binary64) re))
(/.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) (-.f64 #s(literal 0 binary64) re)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))
(pow.f64 (/.f64 (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))))) #s(literal -1 binary64))
(*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))))))
(*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))) #s(literal 2 binary64)))
(*.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))))) #s(literal 2 binary64))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))))
(*.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))) (neg.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) re)))
(*.f64 (/.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) re)) (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))))
(exp.f64 (*.f64 (log.f64 (/.f64 (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (neg.f64 (-.f64 #s(literal 0 binary64) re)))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (neg.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) re))))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (neg.f64 (-.f64 #s(literal 0 binary64) re))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))))) (*.f64 (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))) (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))))) (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))) re)) (-.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))) re)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))))))
(/.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) (*.f64 (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))) (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))))
(/.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) re)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))))) (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))) re)) (-.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))) re)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))))) (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))))))
(/.f64 (*.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) #s(literal 1 binary64)) (*.f64 (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))))) (neg.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (neg.f64 (-.f64 #s(literal 0 binary64) re)))))
(/.f64 (neg.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) re))) (neg.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))))
(/.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))) (-.f64 #s(literal 0 binary64) re))
(/.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) #s(literal 1 binary64)) (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))))
(/.f64 (*.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))) (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))))) (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))) re)) (-.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))) re)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))))))
(/.f64 (*.f64 (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))) (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))))
(pow.f64 (/.f64 (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (neg.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) re))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))))))
(*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))))
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) (/.f64 #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (neg.f64 (-.f64 #s(literal 0 binary64) re)))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) #s(literal -1 binary64)))
(*.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) re)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)) (pow.f64 (/.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))) (neg.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) re)))
(*.f64 (/.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) re)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re)))))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))))
(*.f64 (/.f64 (neg.f64 (/.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) re)) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))
(*.f64 (pow.f64 (/.f64 (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))) (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))) (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))))) (*.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))) re)) (-.f64 (neg.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))) re)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))))))))
(*.f64 (pow.f64 (/.f64 (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))) (*.f64 (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))) (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re)))))))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))))
(*.f64 #s(literal 2 binary64) re)
(*.f64 re #s(literal 2 binary64))
(+.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) (/.f64 re (*.f64 im im))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(neg.f64 (/.f64 (*.f64 im im) re))
(/.f64 (*.f64 im im) (-.f64 #s(literal 0 binary64) re))
(/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 re (*.f64 im im))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 im im)))
(/.f64 #s(literal 1 binary64) (/.f64 re (-.f64 #s(literal 0 binary64) (*.f64 im im))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) re)
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (neg.f64 (-.f64 #s(literal 0 binary64) re)))
(/.f64 #s(literal -1 binary64) (/.f64 re (*.f64 im im)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im))) (-.f64 #s(literal 0 binary64) re))
(/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 re (*.f64 re re)))) (+.f64 #s(literal 0 binary64) (+.f64 (*.f64 im (*.f64 im (*.f64 im (/.f64 im (*.f64 re re))))) (*.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im (*.f64 im (/.f64 im (*.f64 re re)))))) (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)))
(/.f64 (*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (*.f64 im im))) (-.f64 #s(literal 0 binary64) re))
(pow.f64 (neg.f64 (/.f64 re (*.f64 im im))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 im im)) #s(literal -1 binary64))
(pow.f64 (/.f64 re (-.f64 #s(literal 0 binary64) (*.f64 im im))) #s(literal -1 binary64))
(*.f64 im (neg.f64 (/.f64 im re)))
(*.f64 im (/.f64 im (-.f64 #s(literal 0 binary64) re)))
(*.f64 (*.f64 im im) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)))
(*.f64 (*.f64 im im) (neg.f64 (/.f64 #s(literal 1 binary64) re)))
(*.f64 (/.f64 (*.f64 im im) re) #s(literal -1 binary64))
(*.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 im re))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (/.f64 #s(literal 1 binary64) re))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) re))
(*.f64 (/.f64 (*.f64 im im) (-.f64 #s(literal 0 binary64) (*.f64 re re))) re)
(*.f64 (/.f64 (*.f64 im im) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re))
(+.f64 (*.f64 #s(literal 2 binary64) re) (/.f64 re (/.f64 im re)))
(+.f64 (/.f64 re (/.f64 im re)) (*.f64 #s(literal 2 binary64) re))
(fma.f64 #s(literal 2 binary64) re (/.f64 re (/.f64 im re)))
(fma.f64 re #s(literal 2 binary64) (/.f64 re (/.f64 im re)))
(fma.f64 re (/.f64 re im) (*.f64 #s(literal 2 binary64) re))
(fma.f64 (/.f64 re im) re (*.f64 #s(literal 2 binary64) re))
(fma.f64 (*.f64 re re) (/.f64 #s(literal 1 binary64) im) (*.f64 #s(literal 2 binary64) re))
(/.f64 (+.f64 (*.f64 #s(literal 8 binary64) (*.f64 re (*.f64 re re))) (/.f64 (*.f64 re (*.f64 re re)) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))))) (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) re) (*.f64 #s(literal 2 binary64) re)) (-.f64 (*.f64 (*.f64 re re) (/.f64 (/.f64 re im) (/.f64 im re))) (*.f64 (*.f64 #s(literal 2 binary64) re) (/.f64 re (/.f64 im re))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) re) (*.f64 #s(literal 2 binary64) re)) (*.f64 (*.f64 re re) (/.f64 (/.f64 re im) (/.f64 im re)))) (-.f64 (*.f64 #s(literal 2 binary64) re) (/.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 re im) (-.f64 (/.f64 re im) #s(literal 2 binary64)))))
(/.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 re im) (-.f64 (/.f64 re im) #s(literal 2 binary64)))))
(/.f64 (*.f64 (-.f64 #s(literal 4 binary64) (/.f64 (/.f64 re im) (/.f64 im re))) re) (-.f64 #s(literal 2 binary64) (/.f64 re im)))
(*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))
(*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) re)
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (/.f64 (/.f64 re im) (/.f64 im re)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (*.f64 re (*.f64 re (*.f64 re re))))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im im)) (*.f64 re re))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (*.f64 re re))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 re (*.f64 re (*.f64 re re))))
(/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im (*.f64 im (*.f64 im (/.f64 im (*.f64 re re)))))) (*.f64 re re))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (/.f64 (*.f64 im im) re)) re)
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) #s(literal 1 binary64)) (/.f64 (/.f64 re im) (/.f64 im re)))
(/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (-.f64 #s(literal 0 binary64) (*.f64 im im))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))
(/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (*.f64 re re))
(/.f64 (*.f64 (*.f64 im (*.f64 im (*.f64 im im))) #s(literal 1/4 binary64)) (*.f64 re (*.f64 re (*.f64 re re))))
(/.f64 (*.f64 (*.f64 im (*.f64 im (*.f64 im (/.f64 im (*.f64 re re))))) #s(literal 1/4 binary64)) (*.f64 re re))
(pow.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) #s(literal 2 binary64))
(*.f64 im (*.f64 (/.f64 im (/.f64 (*.f64 re re) #s(literal 1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))
(*.f64 (*.f64 im im) (*.f64 (/.f64 im (/.f64 (*.f64 re re) #s(literal 1/2 binary64))) (/.f64 im (/.f64 (*.f64 re re) #s(literal 1/2 binary64)))))
(*.f64 (*.f64 im im) (*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (/.f64 (/.f64 re im) (/.f64 im re))))
(*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))
(*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 im (/.f64 im (*.f64 re re))) (/.f64 (/.f64 re im) (/.f64 im re))))
(*.f64 (*.f64 im (/.f64 im (*.f64 re re))) (*.f64 #s(literal 1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))
(*.f64 (/.f64 (*.f64 im (/.f64 im (*.f64 re re))) (/.f64 (/.f64 re im) (/.f64 im re))) #s(literal 1/4 binary64))
(*.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (/.f64 (/.f64 re im) (/.f64 im re))) #s(literal 1 binary64))
(*.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 re re)) (/.f64 #s(literal 1/2 binary64) (*.f64 re re))))
(*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))
(*.f64 (*.f64 im (*.f64 im (*.f64 im (/.f64 im (*.f64 re re))))) (pow.f64 (/.f64 #s(literal 1/2 binary64) re) #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re (*.f64 re re)))))
(*.f64 (*.f64 (/.f64 im (/.f64 (*.f64 re re) #s(literal 1/2 binary64))) (/.f64 im (/.f64 (*.f64 re re) #s(literal 1/2 binary64)))) (*.f64 im im))
(*.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 re re)) (/.f64 #s(literal 1/2 binary64) (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) im) (/.f64 im (/.f64 (*.f64 re re) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im im)) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (/.f64 #s(literal 1/2 binary64) (*.f64 re re))) (*.f64 im im))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) im) (/.f64 im (*.f64 re re)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im im)) (/.f64 #s(literal 1 binary64) (*.f64 re re)))
(*.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (/.f64 im re)) (/.f64 im re))
(*.f64 (*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (*.f64 im (/.f64 im (*.f64 re re))))
(*.f64 (pow.f64 (*.f64 #s(literal 1 binary64) (*.f64 im im)) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1/2 binary64) (*.f64 re re)) (/.f64 #s(literal 1/2 binary64) (*.f64 re re))))
(*.f64 (pow.f64 (*.f64 #s(literal 1 binary64) im) #s(literal 2 binary64)) (*.f64 (/.f64 im (/.f64 (*.f64 re re) #s(literal 1/2 binary64))) (/.f64 im (/.f64 (*.f64 re re) #s(literal 1/2 binary64)))))

simplify395.0ms (3.7%)

Algorithm
1×egg-herbie
Rules
7696×*-lowering-*.f32
7696×*-lowering-*.f64
4830×+-lowering-+.f64
4830×+-lowering-+.f32
1944×associate-*r*
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
07287406
127296551
085186551
Stop Event
1×iter limit
1×node limit
Counts
456 → 456
Calls
Call 1
Inputs
(* 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 im)) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))))
(* im (+ (* -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 (/ 1 (pow im 3))) (/ re (sqrt 2))))))))
(* -1/2 (* (sqrt im) (* (pow (sqrt -1) 2) (sqrt 2))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2)))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))) (+ (* -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 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))) (+ (* -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 im) (sqrt 2)))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (pow (sqrt 2) 3)))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))))))
(+ (* 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) (sqrt -1))))
(* -1 (* re (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt -1)))) (* 1/2 (* (/ (* im (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))))))
(* -1 (* re (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt -1)))) (* 1/2 (* (/ (* im (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow re 3)))))))))
(* -1 (* re (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (/ (* (pow im 3) (sqrt -1)) (pow (sqrt -2) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt -1)))) (* 1/2 (* (/ (* im (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))))))))
(* (sqrt re) (sqrt 2))
(+ (* (sqrt re) (sqrt 2)) (* (/ im (sqrt 2)) (sqrt (/ 1 re))))
(+ (* im (+ (* -1/2 (* (/ im (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (/ 1 (sqrt 2))))) (* (sqrt re) (sqrt 2)))
(+ (* im (+ (* im (+ (* -1/2 (* (sqrt (/ 1 (pow re 3))) (/ 1 (pow (sqrt 2) 3)))) (* 1/2 (* (/ im (pow (sqrt 2) 5)) (sqrt (/ 1 (pow re 5))))))) (* (sqrt (/ 1 re)) (/ 1 (sqrt 2))))) (* (sqrt re) (sqrt 2)))
(* (sqrt im) (sqrt 2))
(* im (+ (* (sqrt (/ 1 im)) (sqrt 2)) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* (sqrt (/ 1 im)) (sqrt 2)) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2))))))
(* im (+ (* -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)) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))))
(* -1 (* (sqrt im) (* (pow (sqrt -1) 2) (sqrt 2))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))) (+ (* -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)))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))) (+ (* -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 im) (sqrt 2))
(+ (* (sqrt im) (sqrt 2)) (* (sqrt (/ 1 im)) (/ re (sqrt 2))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (pow (sqrt 2) 3)))) (* (sqrt (/ 1 im)) (/ 1 (sqrt 2))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* 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 (/ 1 im)) (/ 1 (sqrt 2))))) (* (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) (sqrt -1))))
(* -1 (* re (+ (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt -1))) (* (/ (* im (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow re 3)))))))
(* -1 (* re (+ (* -1/2 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt -1))) (* (/ (* im (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))))))
(* -1 (* re (+ (* -1/2 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (/ (* (pow im 3) (sqrt -1)) (pow (sqrt -2) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt -1))) (* (/ (* im (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow re 3)))))))))
(* 2 re)
(+ (* 2 im) (* 2 re))
(+ (* 2 im) (* 2 re))
(+ (* 2 im) (* 2 re))
(* 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 im) (* 2 re))
(+ (* 2 im) (* 2 re))
(+ (* 2 im) (* 2 re))
(* 2 re)
(* re (+ 2 (* 2 (/ im re))))
(* re (+ 2 (* 2 (/ im re))))
(* re (+ 2 (* 2 (/ im re))))
(* 2 re)
(* -1 (* re (- (* -2 (/ im re)) 2)))
(* -1 (* re (- (* -2 (/ im re)) 2)))
(* -1 (* re (- (* -2 (/ im re)) 2)))
2
(+ 2 (* 2 (/ re im)))
(+ 2 (* 2 (/ re im)))
(+ 2 (* 2 (/ re im)))
(* 2 (/ re im))
(* re (+ (* 2 (/ 1 im)) (* 2 (/ 1 re))))
(* re (+ (* 2 (/ 1 im)) (* 2 (/ 1 re))))
(* re (+ (* 2 (/ 1 im)) (* 2 (/ 1 re))))
(* 2 (/ re im))
(* re (+ (* 2 (/ 1 im)) (* 2 (/ 1 re))))
(* re (+ (* 2 (/ 1 im)) (* 2 (/ 1 re))))
(* re (+ (* 2 (/ 1 im)) (* 2 (/ 1 re))))
(* 2 (/ re im))
(/ (+ (* 2 im) (* 2 re)) im)
(/ (+ (* 2 im) (* 2 re)) im)
(/ (+ (* 2 im) (* 2 re)) im)
2
(+ 2 (* 2 (/ re im)))
(+ 2 (* 2 (/ re im)))
(+ 2 (* 2 (/ re im)))
2
(+ 2 (* 2 (/ re im)))
(+ 2 (* 2 (/ re im)))
(+ 2 (* 2 (/ re im)))
(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)))
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* -1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* -1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* -1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* -1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* -1 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* -1 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* -1 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* -1 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* 1/2 (* (sqrt (/ 1 im)) re))
(/ (+ (* 1/2 (sqrt (pow im 3))) (* 1/2 (* (sqrt im) re))) im)
(/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* 1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re)))))) im)
(/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* 1/2 (sqrt (/ 1 im))) (* im (+ (* -1/4 (* (sqrt (/ 1 im)) (/ 1 re))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 re)))))))) im)
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2))))))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))))
(* im (+ (* -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 (/ 1 (pow im 3))) (/ re (sqrt 2))))))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))))))
(* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (+ (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2))))))))
(* -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 im)) (* (sqrt -2) (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 (* (pow im 2) (pow (sqrt 2) 4))) (/ 1 (* (pow im 2) (pow (sqrt 2) 2))))) (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))))))))
(* 1/2 (* (sqrt (/ 1 im)) re))
(* re (+ (* 1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re)))))
(* re (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (+ (* 1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re))))))
(* re (+ (* -1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3)))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (+ (* 1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re)))))))
(* -1/2 (* (sqrt (/ 1 im)) re))
(* -1 (* re (+ (* 1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/2 (sqrt im)) (* -1/4 (* (sqrt im) (/ (- (* 2 im) im) re)))) re)) (* 1/2 (sqrt (/ 1 im))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re))) (* 1/4 (* (sqrt im) (- (* 2 im) im)))) re)) (* -1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))
(* (sqrt (/ 1 im)) re)
(/ (+ (sqrt (pow im 3)) (* (sqrt im) re)) im)
(/ (+ (* (sqrt im) re) (* (pow im 2) (+ (sqrt (/ 1 im)) (* (sqrt im) (/ 1 re))))) im)
(/ (+ (* (sqrt im) re) (* (pow im 2) (+ (sqrt (/ 1 im)) (* im (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 re))) (* (sqrt (/ 1 im)) (/ 1 re))))))) im)
(* (sqrt im) (sqrt 2))
(* im (+ (* (sqrt (/ 1 im)) (sqrt 2)) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (+ (* (sqrt (/ 1 im)) (sqrt 2)) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2))))))
(* im (+ (* -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)) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* im (+ (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))) (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2))))))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (+ (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))) (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))))))
(* -1 (* im (+ (* -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 (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))))))
(* (sqrt im) (sqrt 2))
(+ (* (sqrt im) (sqrt 2)) (* (sqrt (/ 1 im)) (/ re (sqrt 2))))
(+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))) (* (sqrt (/ 1 im)) (/ 1 (sqrt 2))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 (* (pow im 2) (pow (sqrt 2) 4))) (/ 1 (* (pow im 2) (pow (sqrt 2) 2))))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))))) (* (sqrt (/ 1 im)) (/ 1 (sqrt 2))))) (* (sqrt im) (sqrt 2)))
(* (sqrt (/ 1 im)) re)
(* re (+ (sqrt (/ 1 im)) (* (sqrt im) (/ 1 re))))
(* re (+ (sqrt (/ 1 im)) (+ (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* (sqrt im) (/ 1 re)))))
(* re (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3)))) (+ (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* (sqrt im) (/ 1 re))))))
(* -1 (* (sqrt (/ 1 im)) re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* (sqrt im) (/ 1 re)))))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (* -1 (sqrt im)) (* -1/2 (* (sqrt im) (/ (- (* 2 im) im) re)))) re)))))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (* -1 (sqrt im)) (* -1 (/ (+ (* -1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re))) (* 1/2 (* (sqrt im) (- (* 2 im) im)))) re))) re)))))
(/ (pow re 2) im)
(/ (+ (* 2 (* im re)) (pow re 2)) im)
(/ (+ (* im (+ (* 2 im) (* 2 re))) (pow re 2)) im)
(/ (+ (* im (+ (* 2 im) (* 2 re))) (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 im) (* 2 re))
(+ (* 2 im) (* re (+ 2 (/ re im))))
(+ (* 2 im) (* re (+ 2 (/ re im))))
(/ (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 (/ im re)) 2) re)) (/ 1 im)))
(* (pow re 2) (+ (* -1 (/ (- (* -2 (/ im re)) 2) 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 (* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* 1/2 (* (sqrt (/ (+ (* -1 (pow re 2)) (pow re 2)) re)) (sqrt -2)))
(+ (* 1/4 (* (* (pow im 2) (* (sqrt -2) (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))))) (sqrt (/ re (+ (* -1 (pow re 2)) (pow re 2)))))) (* 1/2 (* (sqrt (/ (+ (* -1 (pow re 2)) (pow re 2)) re)) (sqrt -2))))
(+ (* 1/2 (* (sqrt (/ (+ (* -1 (pow re 2)) (pow re 2)) re)) (sqrt -2))) (* (pow im 2) (+ (* -1/4 (* (* (pow im 2) (* (sqrt -2) (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 2))) (+ (* 1/4 (/ 1 (pow re 3))) (* 1/4 (/ (* re (pow (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) 2)) (+ (* -1 (pow re 2)) (pow re 2)))))))) (sqrt (/ re (+ (* -1 (pow re 2)) (pow re 2)))))) (* 1/4 (* (sqrt (/ re (+ (* -1 (pow re 2)) (pow re 2)))) (* (sqrt -2) (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3))))))))))
(+ (* 1/2 (* (sqrt (/ (+ (* -1 (pow re 2)) (pow re 2)) re)) (sqrt -2))) (* (pow im 2) (+ (* 1/4 (* (sqrt (/ re (+ (* -1 (pow re 2)) (pow re 2)))) (* (sqrt -2) (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3))))))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ re (+ (* -1 (pow re 2)) (pow re 2)))) (* (sqrt -2) (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 2))) (+ (* 1/4 (/ 1 (pow re 3))) (* 1/4 (/ (* re (pow (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) 2)) (+ (* -1 (pow re 2)) (pow re 2))))))))) (* -1/4 (* (* (pow im 2) (* (sqrt -2) (+ (* -1/2 (/ (* re (* (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 2))) (+ (* 1/4 (/ 1 (pow re 3))) (* 1/4 (/ (* re (pow (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) 2)) (+ (* -1 (pow re 2)) (pow re 2)))))) (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))))) (+ (* -1 (pow re 2)) (pow re 2)))) (* 1/2 (/ (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 2))) (* 1/4 (/ 1 (pow re 3)))) (pow re 2)))))) (sqrt (/ re (+ (* -1 (pow re 2)) (pow re 2)))))))))))
(* 1/2 (* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re))))
(* im (+ (* -1/2 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 4) (sqrt 1/2))) (sqrt (pow re 3)))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt 1/2))))))
(* im (+ (* -1 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 6) (sqrt 1/2))) (sqrt (pow re 7)))) (+ (* -1/2 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 4) (sqrt 1/2))) (sqrt (pow re 3)))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt 1/2)))))))
(* im (+ (* -1 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 6) (sqrt 1/2))) (sqrt (pow re 7)))) (+ (* -1/2 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 4) (sqrt 1/2))) (sqrt (pow re 3)))) (+ (* -1/4 (* (/ (* (sqrt -2) (+ (* 8 (* (pow re 5) (+ (* -1 (pow re 2)) (pow re 2)))) (/ (* (pow re 3) (pow (+ (* -1 (pow re 2)) (pow re 2)) 2)) (pow (sqrt 1/2) 2)))) (* (pow im 8) (sqrt 1/2))) (sqrt re))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt 1/2))))))))
(* -1/2 (* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re))))
(* -1 (* im (+ (* -1/2 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 4) (sqrt 1/2))) (sqrt (pow re 3)))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt 1/2)))))))
(* -1 (* im (+ (* -1 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 6) (sqrt 1/2))) (sqrt (pow re 7)))) (+ (* -1/2 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 4) (sqrt 1/2))) (sqrt (pow re 3)))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt 1/2))))))))
(* -1 (* im (+ (* -1 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 6) (sqrt 1/2))) (sqrt (pow re 7)))) (+ (* -1/2 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 4) (sqrt 1/2))) (sqrt (pow re 3)))) (+ (* -1/4 (* (/ (* (sqrt -2) (+ (* 8 (* (pow re 5) (+ (* -1 (pow re 2)) (pow re 2)))) (/ (* (pow re 3) (pow (+ (* -1 (pow re 2)) (pow re 2)) 2)) (pow (sqrt 1/2) 2)))) (* (pow im 8) (sqrt 1/2))) (sqrt re))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt 1/2)))))))))
(* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))
(* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))
(* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))
(* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))
(* (sqrt (/ (+ (* -1 (pow re 2)) (pow re 2)) re)) (sqrt -2))
(+ (* 1/2 (* (* (pow im 2) (* (sqrt -2) (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))))) (sqrt (/ re (+ (* -1 (pow re 2)) (pow re 2)))))) (* (sqrt (/ (+ (* -1 (pow re 2)) (pow re 2)) re)) (sqrt -2)))
(+ (* (sqrt (/ (+ (* -1 (pow re 2)) (pow re 2)) re)) (sqrt -2)) (* (pow im 2) (+ (* -1/2 (* (* (pow im 2) (* (sqrt -2) (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 2))) (+ (* 1/4 (/ 1 (pow re 3))) (* 1/4 (/ (* re (pow (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) 2)) (+ (* -1 (pow re 2)) (pow re 2)))))))) (sqrt (/ re (+ (* -1 (pow re 2)) (pow re 2)))))) (* 1/2 (* (sqrt (/ re (+ (* -1 (pow re 2)) (pow re 2)))) (* (sqrt -2) (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3))))))))))
(+ (* (sqrt (/ (+ (* -1 (pow re 2)) (pow re 2)) re)) (sqrt -2)) (* (pow im 2) (+ (* 1/2 (* (sqrt (/ re (+ (* -1 (pow re 2)) (pow re 2)))) (* (sqrt -2) (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3))))))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ re (+ (* -1 (pow re 2)) (pow re 2)))) (* (sqrt -2) (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 2))) (+ (* 1/4 (/ 1 (pow re 3))) (* 1/4 (/ (* re (pow (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) 2)) (+ (* -1 (pow re 2)) (pow re 2))))))))) (* -1/2 (* (* (pow im 2) (* (sqrt -2) (+ (* -1/2 (/ (* re (* (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 2))) (+ (* 1/4 (/ 1 (pow re 3))) (* 1/4 (/ (* re (pow (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) 2)) (+ (* -1 (pow re 2)) (pow re 2)))))) (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))))) (+ (* -1 (pow re 2)) (pow re 2)))) (* 1/2 (/ (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 2))) (* 1/4 (/ 1 (pow re 3)))) (pow re 2)))))) (sqrt (/ re (+ (* -1 (pow re 2)) (pow re 2)))))))))))
(* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re)))
(* im (+ (* -1 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 4) (sqrt 1/2))) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt 1/2)))))
(* im (+ (* -2 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 6) (sqrt 1/2))) (sqrt (pow re 7)))) (+ (* -1 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 4) (sqrt 1/2))) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt 1/2))))))
(* im (+ (* -2 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 6) (sqrt 1/2))) (sqrt (pow re 7)))) (+ (* -1 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 4) (sqrt 1/2))) (sqrt (pow re 3)))) (+ (* -1/2 (* (/ (* (sqrt -2) (+ (* 8 (* (pow re 5) (+ (* -1 (pow re 2)) (pow re 2)))) (/ (* (pow re 3) (pow (+ (* -1 (pow re 2)) (pow re 2)) 2)) (pow (sqrt 1/2) 2)))) (* (pow im 8) (sqrt 1/2))) (sqrt re))) (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt 1/2)))))))
(* -1 (* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re))))
(* -1 (* im (+ (* -1 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 4) (sqrt 1/2))) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt 1/2))))))
(* -1 (* im (+ (* -2 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 6) (sqrt 1/2))) (sqrt (pow re 7)))) (+ (* -1 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 4) (sqrt 1/2))) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt 1/2)))))))
(* -1 (* im (+ (* -2 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 6) (sqrt 1/2))) (sqrt (pow re 7)))) (+ (* -1 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 4) (sqrt 1/2))) (sqrt (pow re 3)))) (+ (* -1/2 (* (/ (* (sqrt -2) (+ (* 8 (* (pow re 5) (+ (* -1 (pow re 2)) (pow re 2)))) (/ (* (pow re 3) (pow (+ (* -1 (pow re 2)) (pow re 2)) 2)) (pow (sqrt 1/2) 2)))) (* (pow im 8) (sqrt 1/2))) (sqrt re))) (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt 1/2))))))))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -2 (/ (+ (* -1 (pow re 2)) (pow re 2)) re))
(+ (* -2 (* (pow im 2) (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))))) (* -2 (/ (+ (* -1 (pow re 2)) (pow re 2)) re)))
(+ (* -2 (/ (+ (* -1 (pow re 2)) (pow re 2)) re)) (* (pow im 2) (+ (* -2 (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3))))) (* 2 (* (pow im 2) (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 2))) (* 1/4 (/ 1 (pow re 3)))))))))
(+ (* -2 (/ (+ (* -1 (pow re 2)) (pow re 2)) re)) (* (pow im 2) (+ (* -2 (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3))))) (* (pow im 2) (+ (* 2 (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 2))) (* 1/4 (/ 1 (pow re 3))))) (* (pow im 2) (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 4))) (* 1/4 (/ 1 (pow re 5))))))))))
(* -1 (/ (pow im 2) re))
(* (pow im 2) (- (* 4 (/ (* re (+ (* -1 (pow re 2)) (pow re 2))) (pow im 4))) (/ 1 re)))
(* (pow im 2) (- (+ (* 4 (/ (* re (+ (* -1 (pow re 2)) (pow re 2))) (pow im 4))) (* 8 (/ (* (pow re 3) (+ (* -1 (pow re 2)) (pow re 2))) (pow im 6)))) (/ 1 re)))
(* (pow im 2) (- (+ (* 4 (/ (* re (+ (* -1 (pow re 2)) (pow re 2))) (pow im 4))) (+ (* 8 (/ (* (pow re 3) (+ (* -1 (pow re 2)) (pow re 2))) (pow im 6))) (* 16 (/ (* (pow re 5) (+ (* -1 (pow re 2)) (pow re 2))) (pow im 8))))) (/ 1 re)))
(* -1 (/ (pow im 2) re))
(* (pow im 2) (- (* 4 (/ (* re (+ (* -1 (pow re 2)) (pow re 2))) (pow im 4))) (/ 1 re)))
(* (pow im 2) (- (+ (* 4 (/ (* re (+ (* -1 (pow re 2)) (pow re 2))) (pow im 4))) (* 8 (/ (* (pow re 3) (+ (* -1 (pow re 2)) (pow re 2))) (pow im 6)))) (/ 1 re)))
(* (pow im 2) (- (+ (* 4 (/ (* re (+ (* -1 (pow re 2)) (pow re 2))) (pow im 4))) (+ (* 8 (/ (* (pow re 3) (+ (* -1 (pow re 2)) (pow re 2))) (pow im 6))) (* 16 (/ (* (pow re 5) (+ (* -1 (pow re 2)) (pow re 2))) (pow im 8))))) (/ 1 re)))
(* -1/2 (/ (pow im 2) re))
(* -1/2 (/ (pow im 2) re))
(* -1/2 (/ (pow im 2) re))
(* -1/2 (/ (pow im 2) re))
(* -1/2 (/ (pow im 2) re))
(* -1/2 (/ (pow im 2) re))
(* -1/2 (/ (pow im 2) re))
(* -1/2 (/ (pow im 2) re))
(* -1/2 (/ (pow im 2) re))
(* -1/2 (/ (pow im 2) re))
(* -1/2 (/ (pow im 2) re))
(* -1/2 (/ (pow im 2) re))
(* -1 (/ (+ (* -1 (pow re 2)) (pow re 2)) re))
(+ (* -1 (* (pow im 2) (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))))) (* -1 (/ (+ (* -1 (pow re 2)) (pow re 2)) re)))
(+ (* -1 (/ (+ (* -1 (pow re 2)) (pow re 2)) re)) (* (pow im 2) (+ (* -1 (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3))))) (* (pow im 2) (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 2))) (* 1/4 (/ 1 (pow re 3))))))))
(+ (* -1 (/ (+ (* -1 (pow re 2)) (pow re 2)) re)) (* (pow im 2) (+ (* -1 (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3))))) (* (pow im 2) (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 2))) (+ (* 1/4 (/ 1 (pow re 3))) (* 1/2 (/ (* (pow im 2) (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 2))) (* 1/4 (/ 1 (pow re 3))))) (pow re 2)))))))))
(* -1/2 (/ (pow im 2) re))
(* (pow im 2) (- (* 2 (/ (* re (+ (* -1 (pow re 2)) (pow re 2))) (pow im 4))) (* 1/2 (/ 1 re))))
(* (pow im 2) (- (+ (* 2 (/ (* re (+ (* -1 (pow re 2)) (pow re 2))) (pow im 4))) (* 4 (/ (* (pow re 3) (+ (* -1 (pow re 2)) (pow re 2))) (pow im 6)))) (* 1/2 (/ 1 re))))
(* (pow im 2) (- (+ (* 2 (/ (* re (+ (* -1 (pow re 2)) (pow re 2))) (pow im 4))) (+ (* 4 (/ (* (pow re 3) (+ (* -1 (pow re 2)) (pow re 2))) (pow im 6))) (* 8 (/ (* (pow re 5) (+ (* -1 (pow re 2)) (pow re 2))) (pow im 8))))) (* 1/2 (/ 1 re))))
(* -1/2 (/ (pow im 2) re))
(* (pow im 2) (- (* 2 (/ (* re (+ (* -1 (pow re 2)) (pow re 2))) (pow im 4))) (* 1/2 (/ 1 re))))
(* (pow im 2) (- (+ (* 2 (/ (* re (+ (* -1 (pow re 2)) (pow re 2))) (pow im 4))) (* 4 (/ (* (pow re 3) (+ (* -1 (pow re 2)) (pow re 2))) (pow im 6)))) (* 1/2 (/ 1 re))))
(* (pow im 2) (- (+ (* 2 (/ (* re (+ (* -1 (pow re 2)) (pow re 2))) (pow im 4))) (+ (* 4 (/ (* (pow re 3) (+ (* -1 (pow re 2)) (pow re 2))) (pow im 6))) (* 8 (/ (* (pow re 5) (+ (* -1 (pow re 2)) (pow re 2))) (pow im 8))))) (* 1/2 (/ 1 re))))
(* 2 re)
(* 2 re)
(* 2 re)
(* 2 re)
(* 2 re)
(* 2 re)
(* 2 re)
(* 2 re)
(* 2 re)
(* 2 re)
(* 2 re)
(* 2 re)
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* 2 re)
(* re (+ 2 (/ re im)))
(* re (+ 2 (/ re im)))
(* re (+ 2 (/ re im)))
(/ (pow re 2) im)
(* (pow re 2) (+ (/ 1 im) (* 2 (/ 1 re))))
(* (pow re 2) (+ (/ 1 im) (* 2 (/ 1 re))))
(* (pow re 2) (+ (/ 1 im) (* 2 (/ 1 re))))
(/ (pow re 2) im)
(* (pow re 2) (+ (/ 1 im) (* 2 (/ 1 re))))
(* (pow re 2) (+ (/ 1 im) (* 2 (/ 1 re))))
(* (pow re 2) (+ (/ 1 im) (* 2 (/ 1 re))))
(/ (pow re 2) im)
(/ (+ (* 2 (* im re)) (pow re 2)) im)
(/ (+ (* 2 (* im re)) (pow re 2)) im)
(/ (+ (* 2 (* im re)) (pow re 2)) im)
(* 2 re)
(+ (* 2 re) (/ (pow re 2) im))
(+ (* 2 re) (/ (pow re 2) im))
(+ (* 2 re) (/ (pow re 2) im))
(* 2 re)
(+ (* 2 re) (/ (pow re 2) im))
(+ (* 2 re) (/ (pow re 2) im))
(+ (* 2 re) (/ (pow re 2) im))
(* 1/4 (/ (pow im 4) (pow re 4)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(* 1/4 (/ (pow im 4) (pow re 4)))
Outputs
(* 1/2 (* (sqrt re) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* 1/2 (* (sqrt re) (sqrt 2))) (* 1/2 (* (/ im (sqrt 2)) (sqrt (/ 1 re)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) 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)))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 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 im (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 2 binary64)))))))
(+ (* 1/2 (* (sqrt re) (sqrt 2))) (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (/ 1 (sqrt 2)))) (* im (+ (* -1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (pow (sqrt 2) 3)))) (* 1/4 (* (/ im (pow (sqrt 2) 5)) (sqrt (/ 1 (pow re 5))))))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 im (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 im (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 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 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 im)) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2))))))
(*.f64 (*.f64 im #s(literal 1/2 binary64)) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))))
(*.f64 im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (/.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))))
(* im (+ (* -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 (/ 1 (pow im 3))) (/ re (sqrt 2))))))))
(*.f64 im (+.f64 (*.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 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64)))) (/.f64 (*.f64 re (*.f64 re re)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))))
(* -1/2 (* (sqrt im) (* (pow (sqrt -1) 2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2)))))))
(*.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 re (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))) (+ (* -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))))))))
(*.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 re (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))) (+ (* -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)))))))))
(*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64)))) (/.f64 (*.f64 re (-.f64 #s(literal 0 binary64) (*.f64 re re))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))) (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 re (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))) (-.f64 #s(literal 0 binary64) im))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im)) (*.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 (pow im 3))) (/ re (pow (sqrt 2) 3)))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 re (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.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))) (* 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 (*.f64 #s(literal -1/4 binary64) (/.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 (*.f64 #s(literal 1/4 binary64) (/.f64 re (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #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 (*.f64 re #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) (sqrt -1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))
(* -1 (* re (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt -1)))) (* 1/2 (* (/ (* im (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64)))))) (neg.f64 re))
(* -1 (* re (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt -1)))) (* 1/2 (* (/ (* im (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow re 3)))))))))
(*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64)))))) (*.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.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)))))) (neg.f64 re))
(* -1 (* re (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (/ (* (pow im 3) (sqrt -1)) (pow (sqrt -2) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt -1)))) (* 1/2 (* (/ (* im (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))))))))
(*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64)))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) (*.f64 (*.f64 im (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 5 binary64)))))) (*.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.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))))))) (neg.f64 re))
(* (sqrt re) (sqrt 2))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 2 binary64)))
(+ (* (sqrt re) (sqrt 2)) (* (/ im (sqrt 2)) (sqrt (/ 1 re))))
(+.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(+ (* im (+ (* -1/2 (* (/ im (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (/ 1 (sqrt 2))))) (* (sqrt re) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 2 binary64))) (*.f64 im (+.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (/.f64 (*.f64 #s(literal -1/2 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))))))))
(+ (* im (+ (* im (+ (* -1/2 (* (sqrt (/ 1 (pow re 3))) (/ 1 (pow (sqrt 2) 3)))) (* 1/2 (* (/ im (pow (sqrt 2) 5)) (sqrt (/ 1 (pow re 5))))))) (* (sqrt (/ 1 re)) (/ 1 (sqrt 2))))) (* (sqrt re) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 2 binary64))) (*.f64 im (+.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 im (+.f64 (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 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 5 binary64)))))))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im))
(* im (+ (* (sqrt (/ 1 im)) (sqrt 2)) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))
(*.f64 im (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* (sqrt (/ 1 im)) (sqrt 2)) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2))))))
(*.f64 im (+.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (/.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1/2 binary64))))
(* im (+ (* -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)) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))))
(*.f64 im (+.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (/.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1/2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64)))) (/.f64 (*.f64 re (*.f64 re re)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 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 (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (/.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 (pow (sqrt -1) 2)) (sqrt 2)))) (+ (* -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)))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))) (+ (* -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))))))))
(*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64)))) (/.f64 (*.f64 re (-.f64 #s(literal 0 binary64) (*.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)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (/.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (-.f64 #s(literal 0 binary64) im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im))
(+ (* (sqrt im) (sqrt 2)) (* (sqrt (/ 1 im)) (/ re (sqrt 2))))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (pow (sqrt 2) 3)))) (* (sqrt (/ 1 im)) (/ 1 (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)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 re (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))))
(+ (* re (+ (* 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 (/ 1 im)) (/ 1 (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)) (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 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 re (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))))))))
(* (sqrt re) (sqrt 2))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 2 binary64)))
(* re (+ (* (sqrt (/ 1 re)) (sqrt 2)) (* (/ im (sqrt 2)) (sqrt (/ 1 (pow re 3))))))
(*.f64 re (+.f64 (*.f64 (sqrt.f64 #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) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (sqrt.f64 re) #s(literal -1 binary64)))
(* -1 (* re (+ (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt -1))) (* (/ (* im (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow re 3)))))))
(*.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64))))) (neg.f64 re))
(* -1 (* re (+ (* -1/2 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt -1))) (* (/ (* im (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))))))
(*.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64)))) (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.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))))))) (neg.f64 re))
(* -1 (* re (+ (* -1/2 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (/ (* (pow im 3) (sqrt -1)) (pow (sqrt -2) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt -1))) (* (/ (* im (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow re 3)))))))))
(*.f64 (+.f64 (*.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (*.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64)))) (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (*.f64 im im))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (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)))))))) (neg.f64 re))
(* 2 re)
(*.f64 re #s(literal 2 binary64))
(+ (* 2 im) (* 2 re))
(*.f64 #s(literal 2 binary64) (+.f64 im re))
(+ (* 2 im) (* 2 re))
(*.f64 #s(literal 2 binary64) (+.f64 im re))
(+ (* 2 im) (* 2 re))
(*.f64 #s(literal 2 binary64) (+.f64 im re))
(* 2 im)
(*.f64 #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)))
(* im (+ 2 (* 2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal 2 binary64)) im)))
(* 2 im)
(*.f64 #s(literal 2 binary64) im)
(* -1 (* im (- (* -2 (/ re im)) 2)))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) re) im) #s(literal -2 binary64))))
(* -1 (* im (- (* -2 (/ re im)) 2)))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) re) im) #s(literal -2 binary64))))
(* -1 (* im (- (* -2 (/ re im)) 2)))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) re) im) #s(literal -2 binary64))))
(* 2 im)
(*.f64 #s(literal 2 binary64) im)
(+ (* 2 im) (* 2 re))
(*.f64 #s(literal 2 binary64) (+.f64 im re))
(+ (* 2 im) (* 2 re))
(*.f64 #s(literal 2 binary64) (+.f64 im re))
(+ (* 2 im) (* 2 re))
(*.f64 #s(literal 2 binary64) (+.f64 im re))
(* 2 re)
(*.f64 re #s(literal 2 binary64))
(* re (+ 2 (* 2 (/ im re))))
(*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) im) re)))
(* re (+ 2 (* 2 (/ im re))))
(*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) im) re)))
(* re (+ 2 (* 2 (/ im re))))
(*.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 (/ im re)) 2)))
(*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) im) re) #s(literal -2 binary64)) (neg.f64 re))
(* -1 (* re (- (* -2 (/ im re)) 2)))
(*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) im) re) #s(literal -2 binary64)) (neg.f64 re))
(* -1 (* re (- (* -2 (/ im re)) 2)))
(*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) im) re) #s(literal -2 binary64)) (neg.f64 re))
2
#s(literal 2 binary64)
(+ 2 (* 2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal 2 binary64)) im))
(+ 2 (* 2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal 2 binary64)) im))
(+ 2 (* 2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal 2 binary64)) im))
(* 2 (/ re im))
(/.f64 (*.f64 re #s(literal 2 binary64)) im)
(* re (+ (* 2 (/ 1 im)) (* 2 (/ 1 re))))
(*.f64 re (+.f64 (/.f64 #s(literal 2 binary64) im) (/.f64 #s(literal 2 binary64) re)))
(* re (+ (* 2 (/ 1 im)) (* 2 (/ 1 re))))
(*.f64 re (+.f64 (/.f64 #s(literal 2 binary64) im) (/.f64 #s(literal 2 binary64) re)))
(* re (+ (* 2 (/ 1 im)) (* 2 (/ 1 re))))
(*.f64 re (+.f64 (/.f64 #s(literal 2 binary64) im) (/.f64 #s(literal 2 binary64) re)))
(* 2 (/ re im))
(/.f64 (*.f64 re #s(literal 2 binary64)) im)
(* re (+ (* 2 (/ 1 im)) (* 2 (/ 1 re))))
(*.f64 re (+.f64 (/.f64 #s(literal 2 binary64) im) (/.f64 #s(literal 2 binary64) re)))
(* re (+ (* 2 (/ 1 im)) (* 2 (/ 1 re))))
(*.f64 re (+.f64 (/.f64 #s(literal 2 binary64) im) (/.f64 #s(literal 2 binary64) re)))
(* re (+ (* 2 (/ 1 im)) (* 2 (/ 1 re))))
(*.f64 re (+.f64 (/.f64 #s(literal 2 binary64) im) (/.f64 #s(literal 2 binary64) re)))
(* 2 (/ re im))
(/.f64 (*.f64 re #s(literal 2 binary64)) im)
(/ (+ (* 2 im) (* 2 re)) im)
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re)) im)
(/ (+ (* 2 im) (* 2 re)) im)
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re)) im)
(/ (+ (* 2 im) (* 2 re)) im)
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re)) im)
2
#s(literal 2 binary64)
(+ 2 (* 2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal 2 binary64)) im))
(+ 2 (* 2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal 2 binary64)) im))
(+ 2 (* 2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal 2 binary64)) im))
2
#s(literal 2 binary64)
(+ 2 (* 2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal 2 binary64)) im))
(+ 2 (* 2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal 2 binary64)) im))
(+ 2 (* 2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal 2 binary64)) im))
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(*.f64 (sqrt.f64 re) #s(literal 1 binary64))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(*.f64 (sqrt.f64 re) #s(literal 1 binary64))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(*.f64 (sqrt.f64 re) #s(literal 1 binary64))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(*.f64 (sqrt.f64 re) #s(literal 1 binary64))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* -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/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/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/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/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* -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 (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 (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 (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))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* 1/2 (* (sqrt (/ 1 im)) re))
(*.f64 (*.f64 re #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))
(/ (+ (* 1/2 (sqrt (pow im 3))) (* 1/2 (* (sqrt im) re))) im)
(/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.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 (*.f64 im im) #s(literal 1/2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) re)))) im)
(/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* 1/2 (sqrt (/ 1 im))) (* im (+ (* -1/4 (* (sqrt (/ 1 im)) (/ 1 re))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 re)))))))) im)
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re (sqrt.f64 im))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.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 im)) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2))))))
(*.f64 (*.f64 im #s(literal 1/2 binary64)) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))))
(*.f64 im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (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/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 (/ 1 (pow im 3))) (/ re (sqrt 2))))))))
(*.f64 im (+.f64 (*.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 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (/.f64 (*.f64 re re) (sqrt.f64 #s(literal 2 binary64))))))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (/.f64 (*.f64 (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/4 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (+ (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (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 -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (/.f64 (*.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 im)) (* (sqrt -2) (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (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 -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 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 im)) (*.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 im) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im)) (*.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)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (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 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64))))) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 (* (pow im 2) (pow (sqrt 2) 4))) (/ 1 (* (pow im 2) (pow (sqrt 2) 2))))) (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (/ (- (/ 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 re (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (+.f64 (/.f64 (*.f64 re (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 4 binary64))) (/.f64 #s(literal -1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 im im))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))))))
(* 1/2 (* (sqrt (/ 1 im)) re))
(*.f64 (*.f64 re #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))
(* re (+ (* 1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re)))))
(*.f64 (*.f64 re #s(literal 1/2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) re)))
(* re (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (+ (* 1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re))))))
(*.f64 re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) re))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 im)) (-.f64 (*.f64 #s(literal 2 binary64) im) im)) (*.f64 re re))))
(* re (+ (* -1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3)))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (+ (* 1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re)))))))
(*.f64 re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) re))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 im)) (-.f64 (*.f64 #s(literal 2 binary64) im) im)) (*.f64 re re)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (-.f64 (*.f64 #s(literal 2 binary64) im) im))) (*.f64 re (*.f64 re re))))))
(* -1/2 (* (sqrt (/ 1 im)) re))
(*.f64 (*.f64 #s(literal -1/2 binary64) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))
(* -1 (* re (+ (* 1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re))))))
(*.f64 (*.f64 (neg.f64 re) #s(literal 1/2 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) re)))
(* -1 (* re (+ (* -1 (/ (+ (* -1/2 (sqrt im)) (* -1/4 (* (sqrt im) (/ (- (* 2 im) im) re)))) re)) (* 1/2 (sqrt (/ 1 im))))))
(-.f64 #s(literal 0 binary64) (*.f64 re (-.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (+.f64 (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)) (*.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 im)) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) im) re))) re))))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re))) (* 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 (sqrt.f64 im) #s(literal -1/2 binary64)) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) im) re)) (sqrt.f64 (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 im)) (-.f64 (*.f64 #s(literal 2 binary64) im) im))) re)) re)) (neg.f64 re))
(* (sqrt (/ 1 im)) re)
(*.f64 re (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))
(/ (+ (sqrt (pow im 3)) (* (sqrt im) re)) im)
(/.f64 (+.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 re (sqrt.f64 im))) im)
(/ (+ (* (sqrt im) re) (* (pow im 2) (+ (sqrt (/ 1 im)) (* (sqrt im) (/ 1 re))))) im)
(/.f64 (+.f64 (*.f64 re (sqrt.f64 im)) (*.f64 (*.f64 im im) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) re)))) im)
(/ (+ (* (sqrt im) re) (* (pow im 2) (+ (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 im (*.f64 (/.f64 #s(literal 1/2 binary64) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))) im)
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im))
(* im (+ (* (sqrt (/ 1 im)) (sqrt 2)) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))
(*.f64 im (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (+ (* (sqrt (/ 1 im)) (sqrt 2)) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2))))))
(*.f64 im (+.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (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 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)) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))))
(*.f64 im (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (/.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) #s(literal -1/2 binary64)) (+.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (/.f64 (*.f64 re 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 0 binary64) (sqrt.f64 im)))
(* -1 (* im (+ (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))) (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2))))))
(*.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (+ (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))) (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))))))
(*.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (/.f64 (*.f64 (*.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/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 (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))))))
(*.f64 (-.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -2 binary64)))) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)) (*.f64 (*.f64 re re) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -2 binary64))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 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))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im))
(+ (* (sqrt im) (sqrt 2)) (* (sqrt (/ 1 im)) (/ re (sqrt 2))))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))
(+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))) (* (sqrt (/ 1 im)) (/ 1 (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)) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64))))) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* re (+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 (* (pow im 2) (pow (sqrt 2) 4))) (/ 1 (* (pow im 2) (pow (sqrt 2) 2))))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))))) (* (sqrt (/ 1 im)) (/ 1 (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)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 re #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (/.f64 (*.f64 re (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 4 binary64))) (/.f64 #s(literal -1 binary64) (*.f64 #s(literal 2 binary64) (*.f64 im im))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))))))
(* (sqrt (/ 1 im)) re)
(*.f64 re (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))
(* re (+ (sqrt (/ 1 im)) (* (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/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* (sqrt im) (/ 1 re)))))
(*.f64 re (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (/.f64 (sqrt.f64 im) re) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (-.f64 (*.f64 #s(literal 2 binary64) im) im)) (*.f64 re re)))))
(* re (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3)))) (+ (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* (sqrt im) (/ 1 re))))))
(*.f64 re (+.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (/.f64 (sqrt.f64 im) re) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (-.f64 (*.f64 #s(literal 2 binary64) im) im)) (*.f64 re re)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (-.f64 (*.f64 #s(literal 2 binary64) im) im))) (*.f64 re (*.f64 re re)))))
(* -1 (* (sqrt (/ 1 im)) re))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (neg.f64 re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* (sqrt im) (/ 1 re)))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) re)) (neg.f64 re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (* -1 (sqrt im)) (* -1/2 (* (sqrt im) (/ (- (* 2 im) im) re)))) re)))))
(*.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) im) re)) (sqrt.f64 im)) re)) (neg.f64 re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (* -1 (sqrt im)) (* -1 (/ (+ (* -1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re))) (* 1/2 (* (sqrt im) (- (* 2 im) im)))) re))) re)))))
(*.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 im)) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) im) im) re)) (sqrt.f64 (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (-.f64 (*.f64 #s(literal 2 binary64) im) im))) re)) re)) (neg.f64 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 im) (* 2 re))) (pow re 2)) im)
(/.f64 (+.f64 (*.f64 re re) (*.f64 (*.f64 #s(literal 2 binary64) im) (+.f64 im re))) im)
(/ (+ (* im (+ (* 2 im) (* 2 re))) (pow re 2)) im)
(/.f64 (+.f64 (*.f64 re re) (*.f64 (*.f64 #s(literal 2 binary64) im) (+.f64 im re))) im)
(* 2 im)
(*.f64 #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)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 re #s(literal 2 binary64)) im) (/.f64 (*.f64 re re) (*.f64 im im)))))
(* im (+ 2 (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 re #s(literal 2 binary64)) im) (/.f64 (*.f64 re re) (*.f64 im im)))))
(* 2 im)
(*.f64 #s(literal 2 binary64) im)
(* -1 (* im (- (* -2 (/ re im)) 2)))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) re) im) #s(literal -2 binary64))))
(* -1 (* im (- (* -1 (/ (+ (* 2 re) (/ (pow re 2) im)) im)) 2)))
(*.f64 (+.f64 (/.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (-.f64 #s(literal 0 binary64) im)) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (- (* -1 (/ (+ (* 2 re) (/ (pow re 2) im)) im)) 2)))
(*.f64 (+.f64 (/.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (-.f64 #s(literal 0 binary64) im)) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* 2 im)
(*.f64 #s(literal 2 binary64) im)
(+ (* 2 im) (* 2 re))
(*.f64 #s(literal 2 binary64) (+.f64 im re))
(+ (* 2 im) (* re (+ 2 (/ re im))))
(+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))
(+ (* 2 im) (* re (+ 2 (/ re im))))
(+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(* (pow re 2) (+ (/ 1 im) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 2 binary64) re)))
(* (pow re 2) (+ (* 2 (/ im (pow re 2))) (+ (/ 1 im) (* 2 (/ 1 re)))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 2 binary64) re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re re)))))
(* (pow re 2) (+ (* 2 (/ im (pow re 2))) (+ (/ 1 im) (* 2 (/ 1 re)))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 2 binary64) re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re 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 (/ im re)) 2) re)) (/ 1 im)))
(*.f64 (*.f64 re re) (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) im) re) #s(literal -2 binary64)) re)))
(* (pow re 2) (+ (* -1 (/ (- (* -2 (/ im re)) 2) re)) (/ 1 im)))
(*.f64 (*.f64 re re) (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) im) re) #s(literal -2 binary64)) re)))
(* 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 -2) (sqrt 1/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 -2) (sqrt 1/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 -2) (sqrt 1/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 -2) (sqrt 1/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 -2) (sqrt 1/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 -2) (sqrt 1/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 -2) (sqrt 1/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 -2) (sqrt 1/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) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (sqrt (/ (+ (* -1 (pow re 2)) (pow re 2)) re)) (sqrt -2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 (/.f64 #s(literal 0 binary64) re)))
(+ (* 1/4 (* (* (pow im 2) (* (sqrt -2) (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))))) (sqrt (/ re (+ (* -1 (pow re 2)) (pow re 2)))))) (* 1/2 (* (sqrt (/ (+ (* -1 (pow re 2)) (pow re 2)) re)) (sqrt -2))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 (/.f64 #s(literal 0 binary64) re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 (/.f64 re #s(literal 0 binary64))))))
(+ (* 1/2 (* (sqrt (/ (+ (* -1 (pow re 2)) (pow re 2)) re)) (sqrt -2))) (* (pow im 2) (+ (* -1/4 (* (* (pow im 2) (* (sqrt -2) (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 2))) (+ (* 1/4 (/ 1 (pow re 3))) (* 1/4 (/ (* re (pow (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) 2)) (+ (* -1 (pow re 2)) (pow re 2)))))))) (sqrt (/ re (+ (* -1 (pow re 2)) (pow re 2)))))) (* 1/4 (* (sqrt (/ re (+ (* -1 (pow re 2)) (pow re 2)))) (* (sqrt -2) (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3))))))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 (/.f64 #s(literal 0 binary64) re))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 (/.f64 re #s(literal 0 binary64))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 (/.f64 re #s(literal 0 binary64))) (sqrt.f64 #s(literal -2 binary64)))) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))) #s(literal 0 binary64)) (+.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) re)) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re)) (/.f64 #s(literal 1/4 binary64) (*.f64 re (*.f64 re re))))))))))
(+ (* 1/2 (* (sqrt (/ (+ (* -1 (pow re 2)) (pow re 2)) re)) (sqrt -2))) (* (pow im 2) (+ (* 1/4 (* (sqrt (/ re (+ (* -1 (pow re 2)) (pow re 2)))) (* (sqrt -2) (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3))))))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ re (+ (* -1 (pow re 2)) (pow re 2)))) (* (sqrt -2) (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 2))) (+ (* 1/4 (/ 1 (pow re 3))) (* 1/4 (/ (* re (pow (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) 2)) (+ (* -1 (pow re 2)) (pow re 2))))))))) (* -1/4 (* (* (pow im 2) (* (sqrt -2) (+ (* -1/2 (/ (* re (* (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 2))) (+ (* 1/4 (/ 1 (pow re 3))) (* 1/4 (/ (* re (pow (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) 2)) (+ (* -1 (pow re 2)) (pow re 2)))))) (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))))) (+ (* -1 (pow re 2)) (pow re 2)))) (* 1/2 (/ (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 2))) (* 1/4 (/ 1 (pow re 3)))) (pow re 2)))))) (sqrt (/ re (+ (* -1 (pow re 2)) (pow re 2)))))))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 (/.f64 #s(literal 0 binary64) re))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 (/.f64 re #s(literal 0 binary64))))) (*.f64 (*.f64 (*.f64 im im) #s(literal -1/4 binary64)) (*.f64 (sqrt.f64 (/.f64 re #s(literal 0 binary64))) (+.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))) #s(literal 0 binary64)) (+.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) re)) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re)) (/.f64 #s(literal 1/4 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (*.f64 (*.f64 im im) (sqrt.f64 #s(literal -2 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))) #s(literal 0 binary64)) (+.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) re)) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re)) (/.f64 #s(literal 1/4 binary64) (*.f64 re (*.f64 re re))))))) #s(literal 0 binary64)) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) re)) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re)) (/.f64 #s(literal 1/4 binary64) (*.f64 re (*.f64 re re))))) (*.f64 re re))))))))))
(* 1/2 (* (* im (* (sqrt -2) (sqrt 1/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)))
(* im (+ (* -1/2 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 4) (sqrt 1/2))) (sqrt (pow re 3)))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt 1/2))))))
(*.f64 im (+.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 0 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))
(* im (+ (* -1 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 6) (sqrt 1/2))) (sqrt (pow re 7)))) (+ (* -1/2 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 4) (sqrt 1/2))) (sqrt (pow re 3)))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt 1/2)))))))
(*.f64 im (-.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 0 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 0 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 im #s(literal 6 binary64))))))
(* im (+ (* -1 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 6) (sqrt 1/2))) (sqrt (pow re 7)))) (+ (* -1/2 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 4) (sqrt 1/2))) (sqrt (pow re 3)))) (+ (* -1/4 (* (/ (* (sqrt -2) (+ (* 8 (* (pow re 5) (+ (* -1 (pow re 2)) (pow re 2)))) (/ (* (pow re 3) (pow (+ (* -1 (pow re 2)) (pow re 2)) 2)) (pow (sqrt 1/2) 2)))) (* (pow im 8) (sqrt 1/2))) (sqrt re))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt 1/2))))))))
(*.f64 im (+.f64 (-.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 0 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 0 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 im #s(literal 6 binary64))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -2 binary64))) (/.f64 (+.f64 (*.f64 (pow.f64 re #s(literal 5 binary64)) #s(literal 0 binary64)) (*.f64 re #s(literal 0 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 im #s(literal 8 binary64))))))))
(* -1/2 (* (* im (* (sqrt -2) (sqrt 1/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 (* im (+ (* -1/2 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 4) (sqrt 1/2))) (sqrt (pow re 3)))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt 1/2)))))))
(*.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 0 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 6) (sqrt 1/2))) (sqrt (pow re 7)))) (+ (* -1/2 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 4) (sqrt 1/2))) (sqrt (pow re 3)))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt 1/2))))))))
(*.f64 (-.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 0 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 0 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 im #s(literal 6 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 6) (sqrt 1/2))) (sqrt (pow re 7)))) (+ (* -1/2 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 4) (sqrt 1/2))) (sqrt (pow re 3)))) (+ (* -1/4 (* (/ (* (sqrt -2) (+ (* 8 (* (pow re 5) (+ (* -1 (pow re 2)) (pow re 2)))) (/ (* (pow re 3) (pow (+ (* -1 (pow re 2)) (pow re 2)) 2)) (pow (sqrt 1/2) 2)))) (* (pow im 8) (sqrt 1/2))) (sqrt re))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt 1/2)))))))))
(*.f64 (+.f64 (-.f64 (+.f64 (*.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 0 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 0 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 im #s(literal 6 binary64))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -2 binary64))) (/.f64 (+.f64 (*.f64 (pow.f64 re #s(literal 5 binary64)) #s(literal 0 binary64)) (*.f64 re #s(literal 0 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 im #s(literal 8 binary64))))))) (-.f64 #s(literal 0 binary64) im))
(* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
(* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
(* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
(* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
(* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
(* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
(* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
(* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
(* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))
(*.f64 (*.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
(* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))
(*.f64 (*.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
(* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))
(*.f64 (*.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
(* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))
(*.f64 (*.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
(* (sqrt (/ (+ (* -1 (pow re 2)) (pow re 2)) re)) (sqrt -2))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 (/.f64 #s(literal 0 binary64) re)))
(+ (* 1/2 (* (* (pow im 2) (* (sqrt -2) (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))))) (sqrt (/ re (+ (* -1 (pow re 2)) (pow re 2)))))) (* (sqrt (/ (+ (* -1 (pow re 2)) (pow re 2)) re)) (sqrt -2)))
(+.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 (/.f64 #s(literal 0 binary64) re))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 (/.f64 re #s(literal 0 binary64))))))
(+ (* (sqrt (/ (+ (* -1 (pow re 2)) (pow re 2)) re)) (sqrt -2)) (* (pow im 2) (+ (* -1/2 (* (* (pow im 2) (* (sqrt -2) (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 2))) (+ (* 1/4 (/ 1 (pow re 3))) (* 1/4 (/ (* re (pow (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) 2)) (+ (* -1 (pow re 2)) (pow re 2)))))))) (sqrt (/ re (+ (* -1 (pow re 2)) (pow re 2)))))) (* 1/2 (* (sqrt (/ re (+ (* -1 (pow re 2)) (pow re 2)))) (* (sqrt -2) (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3))))))))))
(+.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 (/.f64 #s(literal 0 binary64) re))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 (/.f64 re #s(literal 0 binary64))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 (/.f64 re #s(literal 0 binary64))) (sqrt.f64 #s(literal -2 binary64)))) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))) #s(literal 0 binary64)) (+.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) re)) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re)) (/.f64 #s(literal 1/4 binary64) (*.f64 re (*.f64 re re))))))))))
(+ (* (sqrt (/ (+ (* -1 (pow re 2)) (pow re 2)) re)) (sqrt -2)) (* (pow im 2) (+ (* 1/2 (* (sqrt (/ re (+ (* -1 (pow re 2)) (pow re 2)))) (* (sqrt -2) (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3))))))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ re (+ (* -1 (pow re 2)) (pow re 2)))) (* (sqrt -2) (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 2))) (+ (* 1/4 (/ 1 (pow re 3))) (* 1/4 (/ (* re (pow (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) 2)) (+ (* -1 (pow re 2)) (pow re 2))))))))) (* -1/2 (* (* (pow im 2) (* (sqrt -2) (+ (* -1/2 (/ (* re (* (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 2))) (+ (* 1/4 (/ 1 (pow re 3))) (* 1/4 (/ (* re (pow (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) 2)) (+ (* -1 (pow re 2)) (pow re 2)))))) (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))))) (+ (* -1 (pow re 2)) (pow re 2)))) (* 1/2 (/ (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 2))) (* 1/4 (/ 1 (pow re 3)))) (pow re 2)))))) (sqrt (/ re (+ (* -1 (pow re 2)) (pow re 2)))))))))))
(+.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 (/.f64 #s(literal 0 binary64) re))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 (/.f64 re #s(literal 0 binary64))))) (*.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 re #s(literal 0 binary64))) (+.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))) #s(literal 0 binary64)) (+.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) re)) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re)) (/.f64 #s(literal 1/4 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (*.f64 (*.f64 im im) (sqrt.f64 #s(literal -2 binary64))) (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))) #s(literal 0 binary64)) (+.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) re)) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re)) (/.f64 #s(literal 1/4 binary64) (*.f64 re (*.f64 re re))))))) #s(literal 0 binary64)) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) re)) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re)) (/.f64 #s(literal 1/4 binary64) (*.f64 re (*.f64 re re))))) (*.f64 re re))))))))))
(* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
(* im (+ (* -1 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 4) (sqrt 1/2))) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt 1/2)))))
(*.f64 im (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 0 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 im #s(literal 4 binary64))))))
(* im (+ (* -2 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 6) (sqrt 1/2))) (sqrt (pow re 7)))) (+ (* -1 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 4) (sqrt 1/2))) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt 1/2))))))
(*.f64 im (+.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 0 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 im #s(literal 4 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 0 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 im #s(literal 6 binary64)))))))
(* im (+ (* -2 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 6) (sqrt 1/2))) (sqrt (pow re 7)))) (+ (* -1 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 4) (sqrt 1/2))) (sqrt (pow re 3)))) (+ (* -1/2 (* (/ (* (sqrt -2) (+ (* 8 (* (pow re 5) (+ (* -1 (pow re 2)) (pow re 2)))) (/ (* (pow re 3) (pow (+ (* -1 (pow re 2)) (pow re 2)) 2)) (pow (sqrt 1/2) 2)))) (* (pow im 8) (sqrt 1/2))) (sqrt re))) (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt 1/2)))))))
(*.f64 im (+.f64 (+.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 0 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 im #s(literal 4 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 0 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 im #s(literal 6 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -2 binary64))) (/.f64 (+.f64 (*.f64 (pow.f64 re #s(literal 5 binary64)) #s(literal 0 binary64)) (*.f64 re #s(literal 0 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 im #s(literal 8 binary64))))))))
(* -1 (* (* im (* (sqrt -2) (sqrt 1/2))) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (-.f64 #s(literal 0 binary64) im) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))
(* -1 (* im (+ (* -1 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 4) (sqrt 1/2))) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt 1/2))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 0 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 im #s(literal 4 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -2 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 6) (sqrt 1/2))) (sqrt (pow re 7)))) (+ (* -1 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 4) (sqrt 1/2))) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt 1/2)))))))
(*.f64 (+.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 0 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 im #s(literal 4 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 0 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 im #s(literal 6 binary64)))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -2 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 6) (sqrt 1/2))) (sqrt (pow re 7)))) (+ (* -1 (* (/ (* (sqrt -2) (+ (* -1 (pow re 2)) (pow re 2))) (* (pow im 4) (sqrt 1/2))) (sqrt (pow re 3)))) (+ (* -1/2 (* (/ (* (sqrt -2) (+ (* 8 (* (pow re 5) (+ (* -1 (pow re 2)) (pow re 2)))) (/ (* (pow re 3) (pow (+ (* -1 (pow re 2)) (pow re 2)) 2)) (pow (sqrt 1/2) 2)))) (* (pow im 8) (sqrt 1/2))) (sqrt re))) (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt 1/2))))))))
(*.f64 (+.f64 (+.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 0 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 im #s(literal 4 binary64))))) (*.f64 #s(literal -2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 0 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 im #s(literal 6 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -2 binary64))) (/.f64 (+.f64 (*.f64 (pow.f64 re #s(literal 5 binary64)) #s(literal 0 binary64)) (*.f64 re #s(literal 0 binary64))) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (pow.f64 im #s(literal 8 binary64))))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -2 (/ (+ (* -1 (pow re 2)) (pow re 2)) re))
(/.f64 #s(literal 0 binary64) re)
(+ (* -2 (* (pow im 2) (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))))) (* -2 (/ (+ (* -1 (pow re 2)) (pow re 2)) re)))
(+.f64 (/.f64 #s(literal 0 binary64) re) (*.f64 (*.f64 #s(literal -2 binary64) (*.f64 im im)) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))))
(+ (* -2 (/ (+ (* -1 (pow re 2)) (pow re 2)) re)) (* (pow im 2) (+ (* -2 (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3))))) (* 2 (* (pow im 2) (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 2))) (* 1/4 (/ 1 (pow re 3)))))))))
(+.f64 (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re))) (/.f64 #s(literal 1/2 binary64) (*.f64 re (*.f64 re re))))))) (/.f64 #s(literal 0 binary64) re))
(+ (* -2 (/ (+ (* -1 (pow re 2)) (pow re 2)) re)) (* (pow im 2) (+ (* -2 (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3))))) (* (pow im 2) (+ (* 2 (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 2))) (* 1/4 (/ 1 (pow re 3))))) (* (pow im 2) (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 4))) (* 1/4 (/ 1 (pow re 5))))))))))
(+.f64 (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -2 binary64) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 im im) (+.f64 (+.f64 (*.f64 #s(literal -1 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re))) (/.f64 #s(literal 1/2 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (+.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) re)) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (pow.f64 re #s(literal 4 binary64))) (/.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal 5 binary64))))))))) (/.f64 #s(literal 0 binary64) re))
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* (pow im 2) (- (* 4 (/ (* re (+ (* -1 (pow re 2)) (pow re 2))) (pow im 4))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 re #s(literal 0 binary64)) (pow.f64 im #s(literal 4 binary64))) (/.f64 #s(literal -1 binary64) re)))
(* (pow im 2) (- (+ (* 4 (/ (* re (+ (* -1 (pow re 2)) (pow re 2))) (pow im 4))) (* 8 (/ (* (pow re 3) (+ (* -1 (pow re 2)) (pow re 2))) (pow im 6)))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 re #s(literal 0 binary64)) (pow.f64 im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 re #s(literal 0 binary64)) (pow.f64 im #s(literal 6 binary64))) (/.f64 #s(literal -1 binary64) re))))
(* (pow im 2) (- (+ (* 4 (/ (* re (+ (* -1 (pow re 2)) (pow re 2))) (pow im 4))) (+ (* 8 (/ (* (pow re 3) (+ (* -1 (pow re 2)) (pow re 2))) (pow im 6))) (* 16 (/ (* (pow re 5) (+ (* -1 (pow re 2)) (pow re 2))) (pow im 8))))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (+.f64 (/.f64 (*.f64 re #s(literal 0 binary64)) (pow.f64 im #s(literal 4 binary64))) (/.f64 (*.f64 re #s(literal 0 binary64)) (pow.f64 im #s(literal 6 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 5 binary64)) #s(literal 0 binary64)) (pow.f64 im #s(literal 8 binary64))) (/.f64 #s(literal -1 binary64) re))))
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* (pow im 2) (- (* 4 (/ (* re (+ (* -1 (pow re 2)) (pow re 2))) (pow im 4))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 re #s(literal 0 binary64)) (pow.f64 im #s(literal 4 binary64))) (/.f64 #s(literal -1 binary64) re)))
(* (pow im 2) (- (+ (* 4 (/ (* re (+ (* -1 (pow re 2)) (pow re 2))) (pow im 4))) (* 8 (/ (* (pow re 3) (+ (* -1 (pow re 2)) (pow re 2))) (pow im 6)))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 re #s(literal 0 binary64)) (pow.f64 im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 re #s(literal 0 binary64)) (pow.f64 im #s(literal 6 binary64))) (/.f64 #s(literal -1 binary64) re))))
(* (pow im 2) (- (+ (* 4 (/ (* re (+ (* -1 (pow re 2)) (pow re 2))) (pow im 4))) (+ (* 8 (/ (* (pow re 3) (+ (* -1 (pow re 2)) (pow re 2))) (pow im 6))) (* 16 (/ (* (pow re 5) (+ (* -1 (pow re 2)) (pow re 2))) (pow im 8))))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (+.f64 (/.f64 (*.f64 re #s(literal 0 binary64)) (pow.f64 im #s(literal 4 binary64))) (/.f64 (*.f64 re #s(literal 0 binary64)) (pow.f64 im #s(literal 6 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 5 binary64)) #s(literal 0 binary64)) (pow.f64 im #s(literal 8 binary64))) (/.f64 #s(literal -1 binary64) re))))
(* -1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 im im)) re)
(* -1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 im im)) re)
(* -1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 im im)) re)
(* -1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 im im)) re)
(* -1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 im im)) re)
(* -1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 im im)) re)
(* -1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 im im)) re)
(* -1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 im im)) re)
(* -1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 im im)) re)
(* -1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 im im)) re)
(* -1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 im im)) re)
(* -1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 im im)) re)
(* -1 (/ (+ (* -1 (pow re 2)) (pow re 2)) re))
(/.f64 #s(literal 0 binary64) re)
(+ (* -1 (* (pow im 2) (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))))) (* -1 (/ (+ (* -1 (pow re 2)) (pow re 2)) re)))
(+.f64 (/.f64 #s(literal 0 binary64) re) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal -1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))))
(+ (* -1 (/ (+ (* -1 (pow re 2)) (pow re 2)) re)) (* (pow im 2) (+ (* -1 (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3))))) (* (pow im 2) (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 2))) (* 1/4 (/ 1 (pow re 3))))))))
(+.f64 (/.f64 #s(literal 0 binary64) re) (*.f64 (*.f64 im im) (+.f64 (*.f64 (*.f64 im im) (+.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) re)) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re)) (/.f64 #s(literal 1/4 binary64) (*.f64 re (*.f64 re re))))) (+.f64 (/.f64 #s(literal -1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))))
(+ (* -1 (/ (+ (* -1 (pow re 2)) (pow re 2)) re)) (* (pow im 2) (+ (* -1 (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3))))) (* (pow im 2) (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 2))) (+ (* 1/4 (/ 1 (pow re 3))) (* 1/2 (/ (* (pow im 2) (+ (* -1/2 (/ (- (* 1/2 (/ 1 re)) (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow re 3)))) (pow re 2))) (* 1/4 (/ 1 (pow re 3))))) (pow re 2)))))))))
(+.f64 (/.f64 #s(literal 0 binary64) re) (*.f64 (*.f64 im im) (+.f64 (+.f64 (/.f64 #s(literal -1/2 binary64) re) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 re (*.f64 re re))) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (+.f64 (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) re)) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re)) (/.f64 #s(literal 1/4 binary64) (*.f64 re (*.f64 re re))))) (*.f64 re re)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1/2 binary64) re)) (/.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re))))))))
(* -1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 im im)) re)
(* (pow im 2) (- (* 2 (/ (* re (+ (* -1 (pow re 2)) (pow re 2))) (pow im 4))) (* 1/2 (/ 1 re))))
(*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 re #s(literal 0 binary64)) (pow.f64 im #s(literal 4 binary64))) (/.f64 #s(literal -1/2 binary64) re)))
(* (pow im 2) (- (+ (* 2 (/ (* re (+ (* -1 (pow re 2)) (pow re 2))) (pow im 4))) (* 4 (/ (* (pow re 3) (+ (* -1 (pow re 2)) (pow re 2))) (pow im 6)))) (* 1/2 (/ 1 re))))
(*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 re #s(literal 0 binary64)) (pow.f64 im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 re #s(literal 0 binary64)) (pow.f64 im #s(literal 6 binary64))) (/.f64 #s(literal -1/2 binary64) re))))
(* (pow im 2) (- (+ (* 2 (/ (* re (+ (* -1 (pow re 2)) (pow re 2))) (pow im 4))) (+ (* 4 (/ (* (pow re 3) (+ (* -1 (pow re 2)) (pow re 2))) (pow im 6))) (* 8 (/ (* (pow re 5) (+ (* -1 (pow re 2)) (pow re 2))) (pow im 8))))) (* 1/2 (/ 1 re))))
(*.f64 (*.f64 im im) (+.f64 (+.f64 (/.f64 (*.f64 re #s(literal 0 binary64)) (pow.f64 im #s(literal 4 binary64))) (/.f64 (*.f64 re #s(literal 0 binary64)) (pow.f64 im #s(literal 6 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 5 binary64)) #s(literal 0 binary64)) (pow.f64 im #s(literal 8 binary64))) (/.f64 #s(literal -1/2 binary64) re))))
(* -1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 im im)) re)
(* (pow im 2) (- (* 2 (/ (* re (+ (* -1 (pow re 2)) (pow re 2))) (pow im 4))) (* 1/2 (/ 1 re))))
(*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 re #s(literal 0 binary64)) (pow.f64 im #s(literal 4 binary64))) (/.f64 #s(literal -1/2 binary64) re)))
(* (pow im 2) (- (+ (* 2 (/ (* re (+ (* -1 (pow re 2)) (pow re 2))) (pow im 4))) (* 4 (/ (* (pow re 3) (+ (* -1 (pow re 2)) (pow re 2))) (pow im 6)))) (* 1/2 (/ 1 re))))
(*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 re #s(literal 0 binary64)) (pow.f64 im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 re #s(literal 0 binary64)) (pow.f64 im #s(literal 6 binary64))) (/.f64 #s(literal -1/2 binary64) re))))
(* (pow im 2) (- (+ (* 2 (/ (* re (+ (* -1 (pow re 2)) (pow re 2))) (pow im 4))) (+ (* 4 (/ (* (pow re 3) (+ (* -1 (pow re 2)) (pow re 2))) (pow im 6))) (* 8 (/ (* (pow re 5) (+ (* -1 (pow re 2)) (pow re 2))) (pow im 8))))) (* 1/2 (/ 1 re))))
(*.f64 (*.f64 im im) (+.f64 (+.f64 (/.f64 (*.f64 re #s(literal 0 binary64)) (pow.f64 im #s(literal 4 binary64))) (/.f64 (*.f64 re #s(literal 0 binary64)) (pow.f64 im #s(literal 6 binary64)))) (+.f64 (/.f64 (*.f64 (pow.f64 re #s(literal 5 binary64)) #s(literal 0 binary64)) (pow.f64 im #s(literal 8 binary64))) (/.f64 #s(literal -1/2 binary64) re))))
(* 2 re)
(*.f64 re #s(literal 2 binary64))
(* 2 re)
(*.f64 re #s(literal 2 binary64))
(* 2 re)
(*.f64 re #s(literal 2 binary64))
(* 2 re)
(*.f64 re #s(literal 2 binary64))
(* 2 re)
(*.f64 re #s(literal 2 binary64))
(* 2 re)
(*.f64 re #s(literal 2 binary64))
(* 2 re)
(*.f64 re #s(literal 2 binary64))
(* 2 re)
(*.f64 re #s(literal 2 binary64))
(* 2 re)
(*.f64 re #s(literal 2 binary64))
(* 2 re)
(*.f64 re #s(literal 2 binary64))
(* 2 re)
(*.f64 re #s(literal 2 binary64))
(* 2 re)
(*.f64 re #s(literal 2 binary64))
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* -1 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) re)
(* 2 re)
(*.f64 re #s(literal 2 binary64))
(* re (+ 2 (/ re im)))
(*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))
(* re (+ 2 (/ re im)))
(*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))
(* re (+ 2 (/ re im)))
(*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(* (pow re 2) (+ (/ 1 im) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 2 binary64) re)))
(* (pow re 2) (+ (/ 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 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))
(+ (* 2 re) (/ (pow re 2) im))
(*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))
(+ (* 2 re) (/ (pow re 2) im))
(*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))
(* 2 re)
(*.f64 re #s(literal 2 binary64))
(+ (* 2 re) (/ (pow re 2) im))
(*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))
(+ (* 2 re) (/ (pow re 2) im))
(*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))
(+ (* 2 re) (/ (pow re 2) im))
(*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))
(* 1/4 (/ (pow im 4) (pow re 4)))
(/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))

eval106.0ms (1%)

Compiler

Compiled 28442 to 2593 computations (90.9% saved)

prune122.0ms (1.1%)

Pruning

22 alts after pruning (16 fresh and 6 done)

PrunedKeptTotal
New8675872
Fresh41115
Picked235
Done033
Total87322895
Accuracy
100.0%
Counts
895 → 22
Alt Table
Click to see full alt table
StatusAccuracyProgram
19.9%
(pow.f64 (*.f64 re re) #s(literal 1/4 binary64))
22.3%
(*.f64 (/.f64 im (sqrt.f64 (-.f64 #s(literal 0 binary64) re))) #s(literal 1/2 binary64))
▶51.9%
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
2.1%
(*.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))))) #s(literal 1/2 binary64))
20.5%
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 (neg.f64 (/.f64 im re)))))
22.3%
(*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 (neg.f64 (/.f64 #s(literal 1 binary64) re)))))
29.6%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 (*.f64 #s(literal 2 binary64) im) (+.f64 im re))) im)))
30.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 (/.f64 im re) im))))
▶25.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/4 binary64)) (*.f64 re (*.f64 re re))))))))
✓52.6%
(*.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))))))
41.6%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))))))))))
28.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (/.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im))))))
▶16.1%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (neg.f64 im) (/.f64 im re))))
✓54.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal 2 binary64)) im)))))
51.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
▶1.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)))) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)))) (*.f64 re re)))))))
1.5%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 re re)) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re))))))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))))
✓4.5%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) re))))
✓81.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
✓55.4%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re))))
▶4.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 0 binary64)))
✓29.9%
(sqrt.f64 re)
Compiler

Compiled 842 to 486 computations (42.3% saved)

simplify210.0ms (2%)

Algorithm
1×egg-herbie
Localize:

Found 18 expressions of interest:

NewMetricScoreProgram
✓cost-diff896
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)))) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)))) (*.f64 re re))))
✓cost-diff960
(*.f64 #s(literal 2 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)))) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)))) (*.f64 re re)))))
✓cost-diff960
(sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)))) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)))) (*.f64 re re))))))
✓cost-diff960
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)))) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)))) (*.f64 re re)))))))
✓cost-diff128
(*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/4 binary64)) (*.f64 re (*.f64 re re)))))
✓cost-diff128
(+.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/4 binary64)) (*.f64 re (*.f64 re re))))))
✓cost-diff128
(sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/4 binary64)) (*.f64 re (*.f64 re re)))))))
✓cost-diff128
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/4 binary64)) (*.f64 re (*.f64 re re))))))))
✓cost-diff-64
(*.f64 (neg.f64 im) (/.f64 im re))
✓cost-diff-64
(sqrt.f64 (*.f64 (neg.f64 im) (/.f64 im re)))
✓cost-diff-64
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (neg.f64 im) (/.f64 im re))))
✓cost-diff0
(/.f64 im re)
✓cost-diff0
(sqrt.f64 #s(literal 0 binary64))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 0 binary64)))
✓cost-diff0
(sqrt.f64 #s(literal 2 binary64))
✓cost-diff0
(sqrt.f64 im)
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 im))
✓cost-diff0
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
Rules
4466×*-lowering-*.f32
4466×*-lowering-*.f64
1860×+-lowering-+.f64
1860×+-lowering-+.f32
1740×/-lowering-/.f32
Iterations

Useful iterations: 3 (0.0ms)

IterNodesCost
052713
1157686
2553577
32590516
08628516
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(* (* 1/2 (sqrt im)) (sqrt 2))
(* 1/2 (sqrt im))
1/2
(sqrt im)
im
(sqrt 2)
2
(* 1/2 (sqrt 0))
1/2
(sqrt 0)
0
(* 1/2 (sqrt (* (neg im) (/ im re))))
1/2
(sqrt (* (neg im) (/ im re)))
(* (neg im) (/ im re))
(neg im)
im
(/ im re)
re
(* 1/2 (sqrt (+ (* re 4) (* (* im im) (+ (/ 1 re) (/ (* (* im im) -1/4) (* re (* re re))))))))
1/2
(sqrt (+ (* re 4) (* (* im im) (+ (/ 1 re) (/ (* (* im im) -1/4) (* re (* re re)))))))
(+ (* re 4) (* (* im im) (+ (/ 1 re) (/ (* (* im im) -1/4) (* re (* re re))))))
(* re 4)
re
4
(* (* im im) (+ (/ 1 re) (/ (* (* im im) -1/4) (* re (* re re)))))
(* im im)
im
(+ (/ 1 re) (/ (* (* im im) -1/4) (* re (* re re))))
(/ 1 re)
1
(/ (* (* im im) -1/4) (* re (* re re)))
(* (* im im) -1/4)
-1/4
(* re (* re re))
(* re re)
(* 1/2 (sqrt (* 2 (/ (+ (* (- 0 (* re re)) (* (- 1 (* (* im im) (/ 1/2 (* re re)))) (* re re))) (* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 (* re (* re re)))))) (* (- 0 re) (* (- 1 (* (* im im) (/ 1/2 (* re re)))) (* re re)))))))
1/2
(sqrt (* 2 (/ (+ (* (- 0 (* re re)) (* (- 1 (* (* im im) (/ 1/2 (* re re)))) (* re re))) (* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 (* re (* re re)))))) (* (- 0 re) (* (- 1 (* (* im im) (/ 1/2 (* re re)))) (* re re))))))
(* 2 (/ (+ (* (- 0 (* re re)) (* (- 1 (* (* im im) (/ 1/2 (* re re)))) (* re re))) (* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 (* re (* re re)))))) (* (- 0 re) (* (- 1 (* (* im im) (/ 1/2 (* re re)))) (* re re)))))
2
(/ (+ (* (- 0 (* re re)) (* (- 1 (* (* im im) (/ 1/2 (* re re)))) (* re re))) (* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 (* re (* re re)))))) (* (- 0 re) (* (- 1 (* (* im im) (/ 1/2 (* re re)))) (* re re))))
(+ (* (- 0 (* re re)) (* (- 1 (* (* im im) (/ 1/2 (* re re)))) (* re re))) (* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 (* re (* re re))))))
(* (- 0 (* re re)) (* (- 1 (* (* im im) (/ 1/2 (* re re)))) (* re re)))
(- 0 (* re re))
0
(* re re)
re
(* (- 1 (* (* im im) (/ 1/2 (* re re)))) (* re re))
(- 1 (* (* im im) (/ 1/2 (* re re))))
1
(* (* im im) (/ 1/2 (* re re)))
(* im im)
im
(/ 1/2 (* re re))
(* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 (* re (* re re)))))
(- 0 re)
(* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 (* re (* re re))))
(- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re)))))
(* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))
1/4
(* (/ (* im im) (* re re)) (/ (* im im) (* re re)))
(/ (* im im) (* re re))
(- 0 (* re (* re re)))
(* re (* re re))
(* (- 0 re) (* (- 1 (* (* im im) (/ 1/2 (* re re)))) (* re re)))
Outputs
(* (* 1/2 (sqrt im)) (sqrt 2))
(*.f64 (sqrt.f64 im) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(* 1/2 (sqrt im))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 im))
1/2
#s(literal 1/2 binary64)
(sqrt im)
(sqrt.f64 im)
im
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(* 1/2 (sqrt 0))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 0 binary64)))
1/2
#s(literal 1/2 binary64)
(sqrt 0)
(sqrt.f64 #s(literal 0 binary64))
0
#s(literal 0 binary64)
(* 1/2 (sqrt (* (neg im) (/ im re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (-.f64 #s(literal 0 binary64) (/.f64 im re)))))
1/2
#s(literal 1/2 binary64)
(sqrt (* (neg im) (/ im re)))
(sqrt.f64 (*.f64 im (-.f64 #s(literal 0 binary64) (/.f64 im re))))
(* (neg im) (/ im re))
(*.f64 im (-.f64 #s(literal 0 binary64) (/.f64 im re)))
(neg im)
(-.f64 #s(literal 0 binary64) im)
im
(/ im re)
(/.f64 im re)
re
(* 1/2 (sqrt (+ (* re 4) (* (* im im) (+ (/ 1 re) (/ (* (* im im) -1/4) (* re (* re re))))))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 im im) re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 im #s(literal -1/4 binary64))) (*.f64 re re)))))))
1/2
#s(literal 1/2 binary64)
(sqrt (+ (* re 4) (* (* im im) (+ (/ 1 re) (/ (* (* im im) -1/4) (* re (* re re)))))))
(sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 im im) re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 im #s(literal -1/4 binary64))) (*.f64 re re))))))
(+ (* re 4) (* (* im im) (+ (/ 1 re) (/ (* (* im im) -1/4) (* re (* re re))))))
(+.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 (/.f64 (*.f64 im im) re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 im #s(literal -1/4 binary64))) (*.f64 re re)))))
(* re 4)
(*.f64 re #s(literal 4 binary64))
re
4
#s(literal 4 binary64)
(* (* im im) (+ (/ 1 re) (/ (* (* im im) -1/4) (* re (* re re)))))
(*.f64 (/.f64 (*.f64 im im) re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 im #s(literal -1/4 binary64))) (*.f64 re re))))
(* im im)
(*.f64 im im)
im
(+ (/ 1 re) (/ (* (* im im) -1/4) (* re (* re re))))
(+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 im (*.f64 im #s(literal -1/4 binary64))) (*.f64 re (*.f64 re re))))
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
1
#s(literal 1 binary64)
(/ (* (* im im) -1/4) (* re (* re re)))
(/.f64 (*.f64 im (*.f64 im #s(literal -1/4 binary64))) (*.f64 re (*.f64 re re)))
(* (* im im) -1/4)
(*.f64 im (*.f64 im #s(literal -1/4 binary64)))
-1/4
#s(literal -1/4 binary64)
(* re (* re re))
(*.f64 re (*.f64 re re))
(* re re)
(*.f64 re re)
(* 1/2 (sqrt (* 2 (/ (+ (* (- 0 (* re re)) (* (- 1 (* (* im im) (/ 1/2 (* re re)))) (* re re))) (* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 (* re (* re re)))))) (* (- 0 re) (* (- 1 (* (* im im) (/ 1/2 (* re re)))) (* re re)))))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) re) (/.f64 (*.f64 (neg.f64 (*.f64 re (*.f64 re (*.f64 re re)))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 im #s(literal -1/4 binary64)) (*.f64 (/.f64 im re) (/.f64 (*.f64 im im) re))) (*.f64 re re))))) (*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re))))))))
1/2
#s(literal 1/2 binary64)
(sqrt (* 2 (/ (+ (* (- 0 (* re re)) (* (- 1 (* (* im im) (/ 1/2 (* re re)))) (* re re))) (* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 (* re (* re re)))))) (* (- 0 re) (* (- 1 (* (* im im) (/ 1/2 (* re re)))) (* re re))))))
(sqrt.f64 (*.f64 (/.f64 #s(literal -2 binary64) re) (/.f64 (*.f64 (neg.f64 (*.f64 re (*.f64 re (*.f64 re re)))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 im #s(literal -1/4 binary64)) (*.f64 (/.f64 im re) (/.f64 (*.f64 im im) re))) (*.f64 re re))))) (*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re)))))))
(* 2 (/ (+ (* (- 0 (* re re)) (* (- 1 (* (* im im) (/ 1/2 (* re re)))) (* re re))) (* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 (* re (* re re)))))) (* (- 0 re) (* (- 1 (* (* im im) (/ 1/2 (* re re)))) (* re re)))))
(*.f64 (/.f64 #s(literal -2 binary64) re) (/.f64 (*.f64 (neg.f64 (*.f64 re (*.f64 re (*.f64 re re)))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 im #s(literal -1/4 binary64)) (*.f64 (/.f64 im re) (/.f64 (*.f64 im im) re))) (*.f64 re re))))) (*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re))))))
2
#s(literal 2 binary64)
(/ (+ (* (- 0 (* re re)) (* (- 1 (* (* im im) (/ 1/2 (* re re)))) (* re re))) (* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 (* re (* re re)))))) (* (- 0 re) (* (- 1 (* (* im im) (/ 1/2 (* re re)))) (* re re))))
(/.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 im #s(literal -1/4 binary64)) (*.f64 (/.f64 im re) (/.f64 (*.f64 im im) re))) (*.f64 re re))))))) (*.f64 re (*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re))))))
(+ (* (- 0 (* re re)) (* (- 1 (* (* im im) (/ 1/2 (* re re)))) (* re re))) (* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 (* re (* re re))))))
(*.f64 (neg.f64 (*.f64 re (*.f64 re (*.f64 re re)))) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 im #s(literal -1/4 binary64)) (*.f64 (/.f64 im re) (/.f64 (*.f64 im im) re))) (*.f64 re re)))))
(* (- 0 (* re re)) (* (- 1 (* (* im im) (/ 1/2 (* re re)))) (* re re)))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re))))))
(- 0 (* re re))
(-.f64 #s(literal 0 binary64) (*.f64 re re))
0
#s(literal 0 binary64)
(* re re)
(*.f64 re re)
re
(* (- 1 (* (* im im) (/ 1/2 (* re re)))) (* re re))
(*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re))))
(- 1 (* (* im im) (/ 1/2 (* re re))))
(+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re)))
1
#s(literal 1 binary64)
(* (* im im) (/ 1/2 (* re re)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* im im)
(*.f64 im im)
im
(/ 1/2 (* re re))
(/.f64 #s(literal 1/2 binary64) (*.f64 re re))
(* (- 0 re) (* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 (* re (* re re)))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 im #s(literal -1/4 binary64)) (*.f64 (/.f64 im re) (/.f64 (*.f64 im im) re))) (*.f64 re re))) (*.f64 (*.f64 re re) (*.f64 re re)))
(- 0 re)
(-.f64 #s(literal 0 binary64) re)
(* (- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))) (- 0 (* re (* re re))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 re (*.f64 re re)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 im #s(literal -1/4 binary64)) (*.f64 (/.f64 im re) (/.f64 (*.f64 im im) re))) (*.f64 re re)))))
(- 1 (* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re)))))
(+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 im #s(literal -1/4 binary64)) (*.f64 (/.f64 im re) (/.f64 (*.f64 im im) re))) (*.f64 re re)))
(* 1/4 (* (/ (* im im) (* re re)) (/ (* im im) (* re re))))
(/.f64 (*.f64 (*.f64 im im) (/.f64 (*.f64 (*.f64 im im) #s(literal 1/4 binary64)) (*.f64 re re))) (*.f64 re re))
1/4
#s(literal 1/4 binary64)
(* (/ (* im im) (* re re)) (/ (* im im) (* re re)))
(*.f64 (/.f64 im (*.f64 re re)) (*.f64 (/.f64 im re) (/.f64 (*.f64 im im) re)))
(/ (* im im) (* re re))
(/.f64 (*.f64 im im) (*.f64 re re))
(- 0 (* re (* re re)))
(*.f64 re (-.f64 #s(literal 0 binary64) (*.f64 re re)))
(* re (* re re))
(*.f64 re (*.f64 re re))
(* (- 0 re) (* (- 1 (* (* im im) (/ 1/2 (* re re)))) (* re re)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re))) (*.f64 re (-.f64 #s(literal 0 binary64) (*.f64 re re))))

localize276.0ms (2.6%)

Localize:

Found 18 expressions of interest:

NewMetricScoreProgram
✓accuracy91.2%
(sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)))) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)))) (*.f64 re re))))))
✓accuracy90.0%
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)))) (*.f64 re re))
✓accuracy88.8%
(*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))
✓accuracy86.2%
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)))) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)))) (*.f64 re re))))
✓accuracy99.9%
(*.f64 re (*.f64 re re))
✓accuracy98.5%
(*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/4 binary64)) (*.f64 re (*.f64 re re)))))
✓accuracy94.0%
(/.f64 (*.f64 (*.f64 im im) #s(literal -1/4 binary64)) (*.f64 re (*.f64 re re)))
✓accuracy92.6%
(sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/4 binary64)) (*.f64 re (*.f64 re re)))))))
✓accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (neg.f64 im) (/.f64 im re))))
✓accuracy100.0%
(neg.f64 im)
✓accuracy99.9%
(*.f64 (neg.f64 im) (/.f64 im re))
✓accuracy91.2%
(sqrt.f64 (*.f64 (neg.f64 im) (/.f64 im re)))
✓accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 0 binary64)))
✓accuracy100.0%
(sqrt.f64 #s(literal 0 binary64))
✓accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 im))
✓accuracy100.0%
(sqrt.f64 im)
✓accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
✓accuracy99.8%
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
Results
98.0ms186×0invalid
86.0ms70×0valid
Compiler

Compiled 789 to 53 computations (93.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 86.0ms
ival-mult: 51.0ms (59.4% of total)
ival-div: 11.0ms (12.8% of total)
ival-sqrt: 11.0ms (12.8% of total)
ival-sub: 6.0ms (7% of total)
ival-add: 4.0ms (4.7% of total)
const: 1.0ms (1.2% of total)
ival-neg: 1.0ms (1.2% of total)
backward-pass: 0.0ms (0% of total)

series66.0ms (0.6%)

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

105 calls:

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

rewrite352.0ms (3.3%)

Algorithm
1×batch-egg-rewrite
Rules
3630×*-lowering-*.f32
3630×*-lowering-*.f64
2252×/-lowering-/.f32
2252×/-lowering-/.f64
2152×pow-lowering-pow.f64
Iterations

Useful iterations: 2 (0.0ms)

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

simplify357.0ms (3.4%)

Algorithm
1×egg-herbie
Rules
7844×*-lowering-*.f32
7844×*-lowering-*.f64
2770×+-lowering-+.f64
2770×+-lowering-+.f32
1448×associate-*r*
Iterations

Useful iterations: 1 (0.0ms)

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

eval153.0ms (1.4%)

Compiler

Compiled 37975 to 3004 computations (92.1% saved)

prune121.0ms (1.1%)

Pruning

24 alts after pruning (15 fresh and 9 done)

PrunedKeptTotal
New8814885
Fresh01111
Picked235
Done066
Total88324907
Accuracy
100.0%
Counts
907 → 24
Alt Table
Click to see full alt table
StatusAccuracyProgram
19.9%
(pow.f64 (*.f64 re re) #s(literal 1/4 binary64))
22.3%
(*.f64 (/.f64 im (sqrt.f64 (-.f64 #s(literal 0 binary64) re))) #s(literal 1/2 binary64))
51.8%
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 im #s(literal 1/4 binary64)) #s(literal 2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
✓51.9%
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
2.1%
(*.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (*.f64 im (/.f64 im (*.f64 re re))))))))) (neg.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))))) #s(literal 1/2 binary64))
20.5%
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 (neg.f64 (/.f64 im re)))))
22.3%
(*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 (neg.f64 (/.f64 #s(literal 1 binary64) re)))))
29.6%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 (*.f64 #s(literal 2 binary64) im) (+.f64 im re))) im)))
30.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 (/.f64 im re) im))))
✓25.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/4 binary64)) (*.f64 re (*.f64 re re))))))))
✓52.6%
(*.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))))))
41.6%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))))))))))
28.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (/.f64 #s(literal 2 binary64) (-.f64 re (hypot.f64 re im))))))
✓16.1%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (neg.f64 im) (/.f64 im re))))
✓54.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal 2 binary64)) im)))))
51.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
1.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 (*.f64 re re) (*.f64 #s(literal -1/2 binary64) (*.f64 im im)))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)))) (*.f64 re re)))))))
1.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)))) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/4 binary64) (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)))) (*.f64 re re)))))))
1.5%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 re re)) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re))))))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))))
✓4.5%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) re))))
✓81.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
✓55.4%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re))))
✓29.9%
(sqrt.f64 re)
4.7%
#s(literal 0 binary64)
Compiler

Compiled 1301 to 530 computations (59.3% saved)

regimes80.0ms (0.8%)

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

7 calls:

12.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))))
11.0ms
re
11.0ms
(*.f64 im im)
10.0ms
(*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
10.0ms
im
Results
AccuracySegmentsBranch
89.0%2re
81.7%1im
91.7%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))))
91.7%2(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
92.5%2(*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
92.5%2(+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
81.7%1(*.f64 im im)
Compiler

Compiled 69 to 45 computations (34.8% saved)

regimes28.0ms (0.3%)

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

3 calls:

9.0ms
(*.f64 im im)
9.0ms
re
8.0ms
im
Results
AccuracySegmentsBranch
67.7%3im
67.7%3(*.f64 im im)
79.0%3re
Compiler

Compiled 11 to 7 computations (36.4% saved)

regimes7.0ms (0.1%)

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

1 calls:

6.0ms
re
Results
AccuracySegmentsBranch
78.9%3re
Compiler

Compiled 3 to 2 computations (33.3% saved)

regimes5.0ms (0%)

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

1 calls:

4.0ms
re
Results
AccuracySegmentsBranch
78.9%3re
Compiler

Compiled 3 to 2 computations (33.3% saved)

regimes4.0ms (0%)

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

1 calls:

4.0ms
re
Results
AccuracySegmentsBranch
78.8%3re
Compiler

Compiled 3 to 2 computations (33.3% saved)

regimes4.0ms (0%)

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

1 calls:

3.0ms
re
Results
AccuracySegmentsBranch
69.4%2re
Compiler

Compiled 3 to 2 computations (33.3% saved)

regimes7.0ms (0.1%)

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

2 calls:

4.0ms
re
2.0ms
im
Results
AccuracySegmentsBranch
29.9%1im
33.1%2re
Compiler

Compiled 6 to 4 computations (33.3% saved)

regimes3.0ms (0%)

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
Calls
Call 1
Inputs
#s(literal 0 binary64)
Outputs
#s(literal 0 binary64)
Calls

2 calls:

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

Compiled 6 to 4 computations (33.3% saved)

bsearch0.0ms (0%)

Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
0.0
9.048534394447453e-301
Compiler

Compiled 22 to 16 computations (27.3% saved)

bsearch49.0ms (0.5%)

Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
22.0ms
7.967309348883408e-81
7.724696449839909e-56
23.0ms
-5.850607756331419e+35
-7.90424127263654e+33
Results
20.0ms233×0valid
10.0ms35×2valid
4.0ms20×1valid
Compiler

Compiled 541 to 405 computations (25.1% saved)

Precisions
Click to see histograms. Total time spent on operations: 23.0ms
ival-mult: 11.0ms (47.5% of total)
ival-sqrt: 6.0ms (25.9% of total)
ival-add: 5.0ms (21.6% of total)
backward-pass: 1.0ms (4.3% of total)
const: 1.0ms (4.3% of total)

bsearch55.0ms (0.5%)

Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
22.0ms
7.967309348883408e-81
7.724696449839909e-56
25.0ms
-5.850607756331419e+35
-7.90424127263654e+33
Results
21.0ms229×0valid
10.0ms39×2valid
3.0ms19×1valid
0.0ms1×3valid
Compiler

Compiled 431 to 328 computations (23.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 25.0ms
ival-mult: 13.0ms (52.9% of total)
ival-sqrt: 6.0ms (24.4% of total)
ival-add: 4.0ms (16.3% of total)
backward-pass: 1.0ms (4.1% of total)
const: 1.0ms (4.1% of total)

bsearch61.0ms (0.6%)

Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
31.0ms
7.967309348883408e-81
7.724696449839909e-56
25.0ms
-5.850607756331419e+35
-7.90424127263654e+33
Results
32.0ms229×0valid
11.0ms44×2valid
2.0ms14×1valid
0.0ms1×3valid
Compiler

Compiled 359 to 292 computations (18.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 36.0ms
ival-mult: 24.0ms (67.1% of total)
ival-sqrt: 6.0ms (16.8% of total)
ival-add: 4.0ms (11.2% of total)
backward-pass: 1.0ms (2.8% of total)
const: 1.0ms (2.8% of total)

bsearch53.0ms (0.5%)

Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
23.0ms
7.967309348883408e-81
7.724696449839909e-56
25.0ms
-5.850607756331419e+35
-7.90424127263654e+33
Results
21.0ms226×0valid
13.0ms38×2valid
4.0ms24×1valid
Compiler

Compiled 352 to 285 computations (19% saved)

Precisions
Click to see histograms. Total time spent on operations: 25.0ms
ival-mult: 13.0ms (51.9% of total)
ival-sqrt: 6.0ms (24% of total)
ival-add: 4.0ms (16% of total)
backward-pass: 1.0ms (4% of total)
const: 1.0ms (4% of total)

bsearch36.0ms (0.3%)

Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
34.0ms
7.967309348883408e-81
7.724696449839909e-56
Results
28.0ms176×0valid
Compiler

Compiled 176 to 148 computations (15.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 23.0ms
ival-mult: 18.0ms (78.5% of total)
ival-sqrt: 3.0ms (13.1% of total)
ival-add: 2.0ms (8.7% of total)
const: 0.0ms (0% of total)
backward-pass: 0.0ms (0% of total)

bsearch17.0ms (0.2%)

Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
16.0ms
-3.1863260514806756e-307
1.1698240081221119e-306
Results
12.0ms128×0valid
Compiler

Compiled 94 to 80 computations (14.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 8.0ms
ival-mult: 5.0ms (62.6% of total)
ival-sqrt: 2.0ms (25% of total)
ival-add: 1.0ms (12.5% of total)
const: 0.0ms (0% of total)
backward-pass: 0.0ms (0% of total)

simplify13.0ms (0.1%)

Algorithm
1×egg-herbie
Rules
36×*-commutative_binary64
18×+-commutative_binary64
16×neg-mul-1_binary64
10×unsub-neg_binary64
6×*-lft-identity_binary64
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
076176
1108176
2114172
3120172
4131172
5145172
Stop Event
1×saturated
Calls
Call 1
Inputs
(if (<=.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #s(literal 0 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 (neg.f64 (/.f64 #s(literal 1 binary64) re))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(if (<=.f64 re #s(literal -12499999999999999607920763489746944 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 (neg.f64 (/.f64 #s(literal 1 binary64) re))))) (if (<=.f64 re #s(literal 4196261778848663/55213970774324510299478046898216203619608871777363092441300193790394368 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 re im)))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 (/.f64 im re) im))))))
(if (<=.f64 re #s(literal -16999999999999999651239679083151360 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 (neg.f64 (/.f64 #s(literal 1 binary64) re))))) (if (<=.f64 re #s(literal 1696173182187249/28269553036454149273332760011886696253239742350009903329945699220681916416 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 re im)))))) (sqrt.f64 re)))
(if (<=.f64 re #s(literal -8199999999999999899593345475805184 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 (neg.f64 (/.f64 #s(literal 1 binary64) re))))) (if (<=.f64 re #s(literal 7729955908405431/110427941548649020598956093796432407239217743554726184882600387580788736 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re)))) (sqrt.f64 re)))
(if (<=.f64 re #s(literal -22999999999999998171769560398561280 binary64)) (*.f64 (/.f64 im (sqrt.f64 (-.f64 #s(literal 0 binary64) re))) #s(literal 1/2 binary64)) (if (<=.f64 re #s(literal 4196261778848663/55213970774324510299478046898216203619608871777363092441300193790394368 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re)))) (sqrt.f64 re)))
(if (<=.f64 re #s(literal 5094851926441913/115792089237316195423570985008687907853269984665640564039457584007913129639936 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 re))
(if (<=.f64 re #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) #s(literal 0 binary64) (sqrt.f64 re))
#s(literal 0 binary64)
Outputs
(if (<=.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #s(literal 0 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 (neg.f64 (/.f64 #s(literal 1 binary64) re))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(if (<=.f64 (+.f64 re (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))) #s(literal 0 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 (/.f64 #s(literal -1 binary64) re)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(if (<=.f64 re #s(literal -12499999999999999607920763489746944 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 (neg.f64 (/.f64 #s(literal 1 binary64) re))))) (if (<=.f64 re #s(literal 4196261778848663/55213970774324510299478046898216203619608871777363092441300193790394368 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 re im)))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 (/.f64 im re) im))))))
(if (<=.f64 re #s(literal -12499999999999999607920763489746944 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 (/.f64 #s(literal -1 binary64) re)))) (if (<=.f64 re #s(literal 4196261778848663/55213970774324510299478046898216203619608871777363092441300193790394368 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 re im)))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 im (/.f64 im re)))))))
(if (<=.f64 re #s(literal -16999999999999999651239679083151360 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 (neg.f64 (/.f64 #s(literal 1 binary64) re))))) (if (<=.f64 re #s(literal 1696173182187249/28269553036454149273332760011886696253239742350009903329945699220681916416 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 re im)))))) (sqrt.f64 re)))
(if (<=.f64 re #s(literal -16999999999999999651239679083151360 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 (/.f64 #s(literal -1 binary64) re)))) (if (<=.f64 re #s(literal 1696173182187249/28269553036454149273332760011886696253239742350009903329945699220681916416 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 re im)))))) (sqrt.f64 re)))
(if (<=.f64 re #s(literal -8199999999999999899593345475805184 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 (neg.f64 (/.f64 #s(literal 1 binary64) re))))) (if (<=.f64 re #s(literal 7729955908405431/110427941548649020598956093796432407239217743554726184882600387580788736 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re)))) (sqrt.f64 re)))
(if (<=.f64 re #s(literal -8199999999999999899593345475805184 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 (/.f64 #s(literal -1 binary64) re)))) (if (<=.f64 re #s(literal 7729955908405431/110427941548649020598956093796432407239217743554726184882600387580788736 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re im)))) (sqrt.f64 re)))
(if (<=.f64 re #s(literal -22999999999999998171769560398561280 binary64)) (*.f64 (/.f64 im (sqrt.f64 (-.f64 #s(literal 0 binary64) re))) #s(literal 1/2 binary64)) (if (<=.f64 re #s(literal 4196261778848663/55213970774324510299478046898216203619608871777363092441300193790394368 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re)))) (sqrt.f64 re)))
(if (<=.f64 re #s(literal -22999999999999998171769560398561280 binary64)) (*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 (-.f64 #s(literal 0 binary64) re)))) (if (<=.f64 re #s(literal 4196261778848663/55213970774324510299478046898216203619608871777363092441300193790394368 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re im)))) (sqrt.f64 re)))
(if (<=.f64 re #s(literal 5094851926441913/115792089237316195423570985008687907853269984665640564039457584007913129639936 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 re))
(if (<=.f64 re #s(literal -20240225330731/101201126653655309176247673359458653524778324882071059178450679013715169783997673445980191850718562247593538932158405955694904368692896738433506699970369254960758712138283180682233453871046608170619883839236372534281003741712346349309051677824579778170405028256179384776166707307615251266093163754323003131653853870546747392 binary64)) #s(literal 0 binary64) (sqrt.f64 re))
#s(literal 0 binary64)

soundness2.2s (20.8%)

Rules
8402×*-lowering-*.f32
8402×*-lowering-*.f64
7228×*-lowering-*.f32
7228×*-lowering-*.f64
4652×*-lowering-*.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
01210
12410
23110
33310
03310
06375664
122995328
085525328
052416
1303367
23155335
08283335
032162
1164158
21487146
08823146
045338
1269308
22533274
08480274
05005174
117764802
269034766
089844766
Stop Event
1×fuel
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×saturated
Compiler

Compiled 748 to 512 computations (31.6% saved)

preprocess67.0ms (0.6%)

Compiler

Compiled 532 to 260 computations (51.1% saved)

end0.0ms (0%)

Profiling

Loading profile data...