math.sqrt on complex, real part

Time bar (total: 10.7s)

analyze207.0ms (1.9%)

Algorithm
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: 104.0ms
ival-mult: 75.0ms (72.5% of total)
ival-sqrt: 16.0ms (15.5% of total)
ival-add: 11.0ms (10.6% of total)
const: 2.0ms (1.9% of total)
backward-pass: 0.0ms (0% of total)

sample1.6s (14.8%)

Results
664.0ms6198×0valid
389.0ms1244×2valid
121.0ms610×1valid
91.0ms204×3valid
Precisions
Click to see histograms. Total time spent on operations: 925.0ms
ival-mult: 468.0ms (50.6% of total)
ival-sqrt: 260.0ms (28.1% of total)
ival-add: 130.0ms (14.1% of total)
backward-pass: 51.0ms (5.5% of total)
const: 16.0ms (1.7% of total)
Bogosity

preprocess60.0ms (0.6%)

Algorithm
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
iter limit
saturated
saturated
Calls
Call 1
Inputs
(* 1/2 (sqrt (* 2 (+ (sqrt (+ (* re re) (* im im))) re))))
Outputs
(* 1/2 (sqrt (* 2 (+ (sqrt (+ (* re re) (* im im))) re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 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)

explain195.0ms (1.8%)

FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1140-3(2.1105916224843112e-231 1.679226755556502e-162)(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
310-0-(+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
260-2(-2.0009528905392502e-215 6.491316670196834e-268)(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
70.0ms394×0valid
32.0ms86×2valid
30.0ms24×1valid
4.0ms3valid
Compiler

Compiled 173 to 38 computations (78% saved)

Precisions
Click to see histograms. Total time spent on operations: 71.0ms
ival-mult: 46.0ms (64.4% of total)
ival-sqrt: 11.0ms (15.4% of total)
ival-add: 8.0ms (11.2% of total)
backward-pass: 5.0ms (7% 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.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))
80.2%
(*.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)

simplify5.0ms (0%)

Algorithm
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
iter limit
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

localize165.0ms (1.5%)

Localize:

Found 8 expressions of interest:

NewMetricScoreProgram
accuracy100.0%
(*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))
accuracy100.0%
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
accuracy68.1%
(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
accuracy100.0%
(+.f64 re (hypot.f64 re 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%
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))
Results
96.0ms60×5exit
40.0ms196×0valid
Compiler

Compiled 115 to 18 computations (84.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 102.0ms
ival-add: 33.0ms (32.3% of total)
ival-mult: 31.0ms (30.4% of total)
ival-sqrt: 14.0ms (13.7% of total)
compiled-spec: 13.0ms (12.7% of total)
backward-pass: 11.0ms (10.8% of total)
const: 1.0ms (1% of total)

series22.0ms (0.2%)

Counts
9 → 216
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)))>
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))))))))>
Calls

54 calls:

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

rewrite334.0ms (3.1%)

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

Useful iterations: 0 (0.0ms)

IterNodesCost
01663
17263
258063
3685163
0806663
Stop Event
iter limit
node limit
Counts
9 → 353
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)))
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)))

simplify291.0ms (2.7%)

Algorithm
egg-herbie
Rules
6768×*-lowering-*.f32
6768×*-lowering-*.f64
2488×+-lowering-+.f64
2488×+-lowering-+.f32
1616×sum3-define
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
04954958
117544592
268434556
086824556
Stop Event
iter limit
node limit
Counts
216 → 216
Calls
Call 1
Inputs
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/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))))))))
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 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/4 binary64) re)))
(+ (* 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 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (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 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 im (*.f64 im im))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 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 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (+.f64 (*.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 re) #s(literal -1/32 binary64))) (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (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 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (+.f64 (*.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 re) #s(literal -1/32 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (*.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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 im #s(literal 5 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 (*.f64 im im) #s(literal -1/4 binary64)) (+.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/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 im (*.f64 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal -1/4 binary64) (+.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) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (+.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))))) #s(literal 1/4 binary64))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (+.f64 (*.f64 (*.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 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/8 binary64))))))
(* im (+ (* -1/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 #s(literal 0 binary64) (*.f64 im (+.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))))))
(* -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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (*.f64 re (sqrt.f64 #s(literal -1 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 2 binary64)) (*.f64 re (*.f64 re (sqrt.f64 #s(literal -1 binary64))))) (*.f64 im im)) (/.f64 (*.f64 (sqrt.f64 im) #s(literal 3/16 binary64)) 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 re (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (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 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 im im))) (+.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/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 #s(literal -1/32 binary64) (/.f64 (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 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 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 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 im (*.f64 im im))) (/.f64 (*.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 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (+.f64 (*.f64 (sqrt.f64 re) (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 im (*.f64 im im))) (/.f64 (*.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 #s(literal 1/32 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (*.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 (/ (+ (* -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 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (+.f64 (*.f64 (sqrt.f64 re) (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 im (*.f64 im im))) (/.f64 (*.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) (pow.f64 im #s(literal 5 binary64))) (/.f64 (*.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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 im #s(literal 5 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (+.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) (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 #s(literal 1/2 binary64) (*.f64 im (*.f64 im (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (+.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)))))))))))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(*.f64 im (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/2 binary64)))))
(* im (+ (* 1/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)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/2 binary64)))) (*.f64 (*.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 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/8 binary64))) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/2 binary64))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1 binary64)))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(-.f64 #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 #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (*.f64 re (sqrt.f64 #s(literal -1 binary64))))) #s(literal -1/4 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (-.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 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (*.f64 re (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (sqrt.f64 im) #s(literal 3/8 binary64))) (*.f64 im (*.f64 im im))))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* 2 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 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (+.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 re #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))))))
(* -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 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (*.f64 re re)) (+.f64 (*.f64 im im) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) (-.f64 #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 #s(literal 0 binary64) (/.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (*.f64 re re)) (+.f64 (*.f64 im im) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (pow.f64 re #s(literal 6 binary64)))) re))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(+ (* 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 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.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 (*.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))))))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* 2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im)))
(* im (+ 2 (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) re) im) (+.f64 #s(literal 2 binary64) (/.f64 (/.f64 (*.f64 re re) 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 (*.f64 #s(literal 2 binary64) re) im) (/.f64 (/.f64 (*.f64 re re) 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 im) #s(literal -2 binary64))) (-.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 (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) re) (/.f64 (+.f64 (*.f64 re re) (/.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) im) im)) im)) im)) (-.f64 #s(literal 0 binary64) im))
im
(+ im re)
(+.f64 im re)
(+ im (* re (+ 1 (* 1/2 (/ re im)))))
(+.f64 im (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) re) 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 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re) re)))
(* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(*.f64 re (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re) re)) (/.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 #s(literal 2 binary64) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re) re)) (/.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 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal 8 binary64))) #s(literal 5/64 binary64)) (pow.f64 re #s(literal 6 binary64))))) (-.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 #s(literal -1/8 binary64) (*.f64 im (/.f64 im (*.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 im (*.f64 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 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) 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 (+.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) 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)
(-.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 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) 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 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/4 binary64) re)))
(+ (* 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 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (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 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 im (*.f64 im im))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 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 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (+.f64 (*.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 re) #s(literal -1/32 binary64))) (*.f64 #s(literal 1/64 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (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 #s(literal 1/2 binary64) (*.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (+.f64 (*.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 re) #s(literal -1/32 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 (*.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (*.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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 im #s(literal 5 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 (*.f64 im im) #s(literal -1/4 binary64)) (+.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/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 im (*.f64 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal -1/4 binary64) (+.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) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (+.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))))) #s(literal 1/4 binary64))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (+.f64 (*.f64 (*.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 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/8 binary64))))))
(* im (+ (* -1/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 #s(literal 0 binary64) (*.f64 im (+.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))))))
(* -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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (*.f64 re (sqrt.f64 #s(literal -1 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 2 binary64)) (*.f64 re (*.f64 re (sqrt.f64 #s(literal -1 binary64))))) (*.f64 im im)) (/.f64 (*.f64 (sqrt.f64 im) #s(literal 3/16 binary64)) 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 re (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (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 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 #s(literal 1/4 binary64) (*.f64 im im))) (+.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/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 #s(literal -1/32 binary64) (/.f64 (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 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 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 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 im (*.f64 im im))) (/.f64 (*.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 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (+.f64 (*.f64 (sqrt.f64 re) (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 im (*.f64 im im))) (/.f64 (*.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 #s(literal 1/32 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (*.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 (/ (+ (* -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 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (+.f64 (*.f64 (sqrt.f64 re) (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 im (*.f64 im im))) (/.f64 (*.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) (pow.f64 im #s(literal 5 binary64))) (/.f64 (*.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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 im #s(literal 5 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (+.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) (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 #s(literal 1/2 binary64) (*.f64 im (*.f64 im (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (+.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)))))))))))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(*.f64 im (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/2 binary64)))))
(* im (+ (* 1/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)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/2 binary64)))) (*.f64 (*.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 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/8 binary64))) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/2 binary64))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1 binary64)))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(-.f64 #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 #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (*.f64 re (sqrt.f64 #s(literal -1 binary64))))) #s(literal -1/4 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (-.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 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (*.f64 re (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (sqrt.f64 im) #s(literal 3/8 binary64))) (*.f64 im (*.f64 im im))))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* 2 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 #s(literal 4 binary64) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (+.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 re #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))))))
(* -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 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (*.f64 re re)) (+.f64 (*.f64 im im) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) (-.f64 #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 #s(literal 0 binary64) (/.f64 (-.f64 (+.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (*.f64 re re)) (+.f64 (*.f64 im im) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (pow.f64 re #s(literal 6 binary64)))) re))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(+ (* 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 #s(literal -1/4 binary64) (*.f64 im (/.f64 im (*.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 (*.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/4 binary64) (*.f64 re (*.f64 re re))))))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* 2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im)))
(* im (+ 2 (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) re) im) (+.f64 #s(literal 2 binary64) (/.f64 (/.f64 (*.f64 re re) 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 (*.f64 #s(literal 2 binary64) re) im) (/.f64 (/.f64 (*.f64 re re) 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 im) #s(literal -2 binary64))) (-.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 (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) re) (/.f64 (+.f64 (*.f64 re re) (/.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) im) im)) im)) im)) (-.f64 #s(literal 0 binary64) im))
im
(+ im re)
(+.f64 im re)
(+ im (* re (+ 1 (* 1/2 (/ re im)))))
(+.f64 im (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) re) 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 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re) re)))
(* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(*.f64 re (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re) re)) (/.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 #s(literal 2 binary64) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re) re)) (/.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 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal 8 binary64))) #s(literal 5/64 binary64)) (pow.f64 re #s(literal 6 binary64))))) (-.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 #s(literal -1/8 binary64) (*.f64 im (/.f64 im (*.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 im (*.f64 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 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) 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 (+.f64 (/.f64 re im) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) 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)
(-.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 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) 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 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im))
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+.f64 im (*.f64 (*.f64 re re) (+.f64 (/.f64 (*.f64 (*.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 re (*.f64 re (+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 re re)) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (*.f64 im (*.f64 im im)))))))))
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re) re)))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(*.f64 re (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re) re) (/.f64 (*.f64 (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 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) 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 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re) re)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re) re) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (pow.f64 re #s(literal 4 binary64))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (pow.f64 re #s(literal 4 binary64))) (+.f64 (/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) 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 #s(literal -1/8 binary64) (*.f64 im (/.f64 im (*.f64 re (*.f64 re re))))) (/.f64 #s(literal 1/2 binary64) re))))
(+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
(+.f64 re (*.f64 im (*.f64 im (+.f64 (/.f64 #s(literal 1/2 binary64) re) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) 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 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) 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 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) 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 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) 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 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) 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 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) 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)))))

eval76.0ms (0.7%)

Compiler

Compiled 19113 to 1654 computations (91.3% saved)

prune49.0ms (0.5%)

Pruning

9 alts after pruning (8 fresh and 1 done)

PrunedKeptTotal
New5618569
Fresh000
Picked112
Done000
Total5629571
Accuracy
90.0%
Counts
571 → 9
Alt Table
Click to see full alt table
StatusAccuracyProgram
79.7%
(*.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))))
25.1%
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
14.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))))
55.2%
(*.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))))))
44.5%
(*.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))))))))))
55.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
80.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
57.4%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re))))
74.7%
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))))
Compiler

Compiled 234 to 171 computations (26.9% saved)

simplify10.0ms (0.1%)

Algorithm
egg-herbie
Localize:

Found 18 expressions of interest:

NewMetricScoreProgram
cost-diff0
(log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))
cost-diff0
(*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
cost-diff6528
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
cost-diff6528
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))))
cost-diff0
(*.f64 im #s(literal 2 binary64))
cost-diff0
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))
cost-diff0
(sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))
cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))))
cost-diff0
(+.f64 im re)
cost-diff0
(*.f64 #s(literal 2 binary64) (+.f64 im re))
cost-diff0
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re)))
cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re))))
cost-diff0
(sqrt.f64 re)
cost-diff128
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
cost-diff0
(hypot.f64 re im)
cost-diff0
(+.f64 re (hypot.f64 re im))
cost-diff64
(pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64))
cost-diff64
(*.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))))
Rules
76×*-lowering-*.f32
76×*-lowering-*.f64
60×fma-define
56×fma-lowering-fma.f32
56×fma-lowering-fma.f64
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
032184
171180
2118178
3142178
4148178
0148178
Stop Event
iter limit
saturated
Calls
Call 1
Inputs
(* (pow (+ re (sqrt (+ (* re re) (* im im)))) 1/2) (* 1/2 (sqrt 2)))
(pow (+ re (sqrt (+ (* re re) (* im im)))) 1/2)
(+ re (sqrt (+ (* re re) (* im im))))
re
(sqrt (+ (* re re) (* im im)))
im
1/2
(* 1/2 (sqrt 2))
(sqrt 2)
2
(* 1 (sqrt re))
1
(sqrt re)
re
(* 1/2 (sqrt (* 2 (+ im re))))
1/2
(sqrt (* 2 (+ im re)))
(* 2 (+ im re))
2
(+ im re)
im
re
(* 1/2 (sqrt (+ (* im 2) (* re (+ 2 (/ re im))))))
1/2
(sqrt (+ (* im 2) (* re (+ 2 (/ re im)))))
(+ (* im 2) (* re (+ 2 (/ re im))))
(* im 2)
im
2
(* re (+ 2 (/ re im)))
re
(+ 2 (/ re im))
(/ re im)
(* 1/2 (exp (* 1/2 (log (* 2 (+ re (sqrt (+ (* re re) (* im im)))))))))
1/2
(exp (* 1/2 (log (* 2 (+ re (sqrt (+ (* re re) (* im im))))))))
(* 1/2 (log (* 2 (+ re (sqrt (+ (* re re) (* im im)))))))
(log (* 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
Outputs
(* (pow (+ re (sqrt (+ (* re re) (* im im)))) 1/2) (* 1/2 (sqrt 2)))
(*.f64 (sqrt.f64 (+.f64 re (hypot.f64 re im))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(pow (+ re (sqrt (+ (* re re) (* im im)))) 1/2)
(sqrt.f64 (+.f64 re (hypot.f64 re im)))
(+ 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
#s(literal 1/2 binary64)
(* 1/2 (sqrt 2))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(* 1 (sqrt re))
(sqrt.f64 re)
1
#s(literal 1 binary64)
(sqrt re)
(sqrt.f64 re)
re
(* 1/2 (sqrt (* 2 (+ im re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re im))))
1/2
#s(literal 1/2 binary64)
(sqrt (* 2 (+ im re)))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re im)))
(* 2 (+ im re))
(*.f64 #s(literal 2 binary64) (+.f64 re im))
2
#s(literal 2 binary64)
(+ im re)
(+.f64 re 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 (exp (* 1/2 (log (* 2 (+ re (sqrt (+ (* re re) (* im im)))))))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))))
1/2
#s(literal 1/2 binary64)
(exp (* 1/2 (log (* 2 (+ re (sqrt (+ (* re re) (* im im))))))))
(sqrt.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))
(* 1/2 (log (* 2 (+ re (sqrt (+ (* re re) (* im im)))))))
(*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))))
(log (* 2 (+ re (sqrt (+ (* re re) (* im im))))))
(log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))
(* 2 (+ re (sqrt (+ (* re re) (* im im)))))
(*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))
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

localize161.0ms (1.5%)

Localize:

Found 18 expressions of interest:

NewMetricScoreProgram
accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))))
accuracy100.0%
(log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))
accuracy96.1%
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.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%
(*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))
accuracy90.5%
(sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))
accuracy100.0%
(+.f64 im re)
accuracy100.0%
(*.f64 #s(literal 2 binary64) (+.f64 im re))
accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re))))
accuracy100.0%
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re)))
accuracy100.0%
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
accuracy100.0%
(sqrt.f64 re)
accuracy100.0%
(+.f64 re (hypot.f64 re im))
accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
accuracy99.6%
(*.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))))
Results
57.0ms139×0valid
40.0ms117×0invalid
Compiler

Compiled 194 to 30 computations (84.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 66.0ms
ival-mult: 25.0ms (37.8% of total)
ival-sqrt: 9.0ms (13.6% of total)
compiled-spec: 9.0ms (13.6% of total)
ival-pow: 8.0ms (12.1% of total)
ival-add: 6.0ms (9.1% of total)
ival-exp: 3.0ms (4.5% of total)
ival-log: 3.0ms (4.5% of total)
ival-div: 2.0ms (3% of total)
const: 1.0ms (1.5% of total)
backward-pass: 0.0ms (0% of total)

series52.0ms (0.5%)

Counts
21 → 420
Calls
Call 1
Inputs
#<alt (* (pow (+ re (sqrt (+ (* re re) (* im im)))) 1/2) (* 1/2 (sqrt 2)))>
#<alt (pow (+ re (sqrt (+ (* re re) (* im im)))) 1/2)>
#<alt (+ re (sqrt (+ (* re re) (* im im))))>
#<alt (sqrt (+ (* re re) (* im im)))>
#<alt (* 1 (sqrt re))>
#<alt (sqrt re)>
#<alt (* 1/2 (sqrt (* 2 (+ im re))))>
#<alt (sqrt (* 2 (+ im re)))>
#<alt (* 2 (+ im re))>
#<alt (+ im re)>
#<alt (* 1/2 (sqrt (+ (* im 2) (* re (+ 2 (/ re im))))))>
#<alt (sqrt (+ (* im 2) (* re (+ 2 (/ re im)))))>
#<alt (+ (* im 2) (* re (+ 2 (/ re im))))>
#<alt (* im 2)>
#<alt (* 1/2 (exp (* 1/2 (log (* 2 (+ re (sqrt (+ (* re re) (* im im)))))))))>
#<alt (exp (* 1/2 (log (* 2 (+ re (sqrt (+ (* re re) (* im im))))))))>
#<alt (* 1/2 (log (* 2 (+ re (sqrt (+ (* re re) (* im im)))))))>
#<alt (log (* 2 (+ re (sqrt (+ (* re re) (* im im))))))>
#<alt (sqrt 2)>
#<alt (* 1/2 (sqrt 2))>
#<alt (* re (+ 2 (/ re 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)>
#<alt (+ (sqrt im) (* 1/2 (* (sqrt (/ 1 im)) re)))>
#<alt (+ (sqrt im) (* re (+ (* 1/8 (* (sqrt (/ 1 (pow im 3))) re)) (* 1/2 (sqrt (/ 1 im))))))>
#<alt (+ (sqrt im) (* re (+ (* 1/2 (sqrt (/ 1 im))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) re)) (* 1/8 (sqrt (/ 1 (pow im 3)))))))))>
#<alt (* (sqrt re) (sqrt 2))>
#<alt (* re (+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 2))))>
#<alt (* re (+ (* -1/16 (* (/ (pow im 4) (sqrt 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 2)))))>
#<alt (* re (+ (* -1/16 (* (/ (pow im 4) (sqrt 2)) (sqrt (/ 1 (pow re 9))))) (+ (* -1/32 (* (/ (pow im 4) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 2))))))>
#<alt (* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re)))>
#<alt (+ (* 1/16 (* (/ (* (pow im 3) (sqrt -1)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re))))>
#<alt (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (sqrt -1)) (sqrt 1/2)) (sqrt re))) (* 1/32 (* (/ (* (pow im 5) (sqrt -1)) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re))))>
#<alt (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (sqrt -1)) (sqrt 1/2)) (sqrt re))) (+ (* 1/512 (* (/ (* (pow im 5) (sqrt -1)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/32 (* (/ (* (pow im 5) (sqrt -1)) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re))))>
#<alt (* (sqrt re) (sqrt 2))>
#<alt (+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt 2)))>
#<alt (+ (* (sqrt re) (sqrt 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 2)) (sqrt (/ 1 re)))) (* 1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt 2)))))))>
#<alt (+ (* (sqrt re) (sqrt 2)) (* (pow im 2) (+ (* 1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt 2)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 re)) (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (sqrt 2)))) (* 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 2)) (sqrt (/ 1 re)))))))))>
#<alt (sqrt im)>
#<alt (* im (+ (sqrt (/ 1 im)) (* 1/2 (* (sqrt (/ 1 (pow im 3))) re))))>
#<alt (* im (+ (sqrt (/ 1 im)) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) re)))))>
#<alt (* im (+ (sqrt (/ 1 im)) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) re))))))>
#<alt (* -1 (* (sqrt im) (sqrt -1)))>
#<alt (* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1)))))>
#<alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt -1)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))>
#<alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (sqrt -1)))) (* 1/4 (* (sqrt im) (* (pow re 2) (sqrt -1))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))>
#<alt 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 (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 (* (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 (* 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 (* (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 (+ (* (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 (* 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 (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (+ (* 1/8 (* (* (pow im 3) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (+ (* -1 (/ (+ (* -1/8 (* (* (pow im 3) (sqrt -1)) (sqrt re))) (* 1/16 (* (* (pow im 5) (sqrt -1)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (+ (* -1 (/ (+ (* -1/8 (* (* (pow im 3) (sqrt -1)) (sqrt re))) (+ (* 1/128 (* (* (pow im 5) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/16 (* (* (pow im 5) (sqrt -1)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<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)))) (* 21/512 (* (pow im 2) (sqrt (/ 1 (pow re 11))))))))))>
#<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 -1) (sqrt 2))))>
#<alt (* -1 (* im (+ (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))) (* (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 -1) (sqrt 2))) (* (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 -1) (sqrt 2))) (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))))))>
#<alt (* 1/2 (log (* 2 im)))>
#<alt (+ (* 1/2 (log (* 2 im))) (* 1/2 (/ re im)))>
#<alt (+ (* 1/2 (log (* 2 im))) (* re (+ (* -1/12 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))>
#<alt (+ (* 1/2 (log (* 2 im))) (* re (+ (* (pow re 2) (- (* 3/80 (/ (pow re 2) (pow im 5))) (* 1/12 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))>
#<alt (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))>
#<alt (+ (* 1/8 (/ (pow im 2) (pow re 2))) (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))>
#<alt (+ (* 1/48 (/ (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))) (pow re 4))) (+ (* 1/8 (/ (pow im 2) (pow re 2))) (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))))>
#<alt (+ (* 1/1440 (/ (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6)))) (pow re 6))) (+ (* 1/48 (/ (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))) (pow re 4))) (+ (* 1/8 (/ (pow im 2) (pow re 2))) (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))))>
#<alt (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))>
#<alt (+ (* -1/8 (/ (pow im 2) (pow re 2))) (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))>
#<alt (+ (* -1/8 (/ (pow im 2) (pow re 2))) (+ (* 1/48 (/ (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))) (pow re 4))) (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))))>
#<alt (+ (* -1/8 (/ (pow im 2) (pow re 2))) (+ (* 1/1440 (/ (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))) (pow re 6))) (+ (* 1/48 (/ (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))) (pow re 4))) (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))))>
#<alt (* 1/2 (log (* 4 re)))>
#<alt (+ (* 1/8 (/ (pow im 2) (pow re 2))) (* 1/2 (log (* 4 re))))>
#<alt (+ (* 1/2 (log (* 4 re))) (* (pow im 2) (+ (* -3/64 (/ (pow im 2) (pow re 4))) (* 1/8 (/ 1 (pow re 2))))))>
#<alt (+ (* 1/2 (log (* 4 re))) (* (pow im 2) (+ (* (pow im 2) (- (* 5/192 (/ (pow im 2) (pow re 6))) (* 3/64 (/ 1 (pow re 4))))) (* 1/8 (/ 1 (pow re 2))))))>
#<alt (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))>
#<alt (+ (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))) (* 1/2 (/ re im)))>
#<alt (+ (* 1/4 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow im 2))) (+ (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))) (* 1/2 (/ re im))))>
#<alt (+ (* 1/12 (/ (+ (* -3 (pow re 3)) (* 2 (pow re 3))) (pow im 3))) (+ (* 1/4 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow im 2))) (+ (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))) (* 1/2 (/ re im)))))>
#<alt (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))>
#<alt (+ (* -1/2 (/ re im)) (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))>
#<alt (+ (* -1 (/ (+ (* -1/4 (/ (+ (* -1 (pow re 2)) (pow re 2)) im)) (* 1/2 re)) im)) (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))>
#<alt (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (/ (+ (* -3 (pow re 3)) (* 2 (pow re 3))) im)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2)))) im)) (* 1/2 re)) im)) (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))>
#<alt (log (* 2 im))>
#<alt (+ (log (* 2 im)) (/ re im))>
#<alt (+ (log (* 2 im)) (* re (+ (* -1/6 (/ (pow re 2) (pow im 3))) (/ 1 im))))>
#<alt (+ (log (* 2 im)) (* re (+ (* (pow re 2) (- (* 3/40 (/ (pow re 2) (pow im 5))) (* 1/6 (/ 1 (pow im 3))))) (/ 1 im))))>
#<alt (+ (log 4) (* -1 (log (/ 1 re))))>
#<alt (+ (log 4) (+ (* -1 (log (/ 1 re))) (* 1/4 (/ (pow im 2) (pow re 2)))))>
#<alt (+ (log 4) (+ (* -1 (log (/ 1 re))) (+ (* 1/24 (/ (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))) (pow re 4))) (* 1/4 (/ (pow im 2) (pow re 2))))))>
#<alt (+ (log 4) (+ (* -1 (log (/ 1 re))) (+ (* 1/720 (/ (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6)))) (pow re 6))) (+ (* 1/24 (/ (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))) (pow re 4))) (* 1/4 (/ (pow im 2) (pow re 2)))))))>
#<alt (+ (log (/ -1 re)) (log (pow im 2)))>
#<alt (+ (log (/ -1 re)) (+ (log (pow im 2)) (* -1/4 (/ (pow im 2) (pow re 2)))))>
#<alt (+ (log (/ -1 re)) (+ (log (pow im 2)) (+ (* -1/4 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))) (pow re 4))))))>
#<alt (+ (log (/ -1 re)) (+ (log (pow im 2)) (+ (* -1/4 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))) (pow re 6))) (* 1/24 (/ (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))) (pow re 4)))))))>
#<alt (log (* 4 re))>
#<alt (+ (log (* 4 re)) (* 1/4 (/ (pow im 2) (pow re 2))))>
#<alt (+ (log (* 4 re)) (* (pow im 2) (+ (* -3/32 (/ (pow im 2) (pow re 4))) (* 1/4 (/ 1 (pow re 2))))))>
#<alt (+ (log (* 4 re)) (* (pow im 2) (+ (* (pow im 2) (- (* 5/96 (/ (pow im 2) (pow re 6))) (* 3/32 (/ 1 (pow re 4))))) (* 1/4 (/ 1 (pow re 2))))))>
#<alt (+ (log 2) (* -1 (log (/ 1 im))))>
#<alt (+ (log 2) (+ (* -1 (log (/ 1 im))) (/ re im)))>
#<alt (+ (log 2) (+ (* -1 (log (/ 1 im))) (+ (* 1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow im 2))) (/ re im))))>
#<alt (+ (log 2) (+ (* -1 (log (/ 1 im))) (+ (* 1/6 (/ (+ (* -3 (pow re 3)) (* 2 (pow re 3))) (pow im 3))) (+ (* 1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow im 2))) (/ re im)))))>
#<alt (+ (log 2) (* -1 (log (/ -1 im))))>
#<alt (+ (log 2) (+ (* -1 (log (/ -1 im))) (* -1 (/ re im))))>
#<alt (+ (log 2) (+ (* -1 (log (/ -1 im))) (* -1 (/ (+ re (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) im))) im))))>
#<alt (+ (log 2) (+ (* -1 (log (/ -1 im))) (* -1 (/ (+ re (* -1 (/ (+ (* -1/6 (/ (+ (* -3 (pow re 3)) (* 2 (pow re 3))) im)) (* 1/2 (+ (* -1 (pow re 2)) (pow re 2)))) im))) im))))>
#<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))>
Calls

105 calls:

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

rewrite340.0ms (3.2%)

Algorithm
batch-egg-rewrite
Rules
3120×/-lowering-/.f32
3120×/-lowering-/.f64
2972×*-lowering-*.f32
2972×*-lowering-*.f64
2030×+-lowering-+.f64
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
032141
1155139
21197136
08229136
Stop Event
iter limit
node limit
Counts
21 → 405
Calls
Call 1
Inputs
(* (pow (+ re (sqrt (+ (* re re) (* im im)))) 1/2) (* 1/2 (sqrt 2)))
(pow (+ re (sqrt (+ (* re re) (* im im)))) 1/2)
(+ re (sqrt (+ (* re re) (* im im))))
(sqrt (+ (* re re) (* im im)))
(* 1 (sqrt re))
(sqrt re)
(* 1/2 (sqrt (* 2 (+ im re))))
(sqrt (* 2 (+ im re)))
(* 2 (+ im re))
(+ im re)
(* 1/2 (sqrt (+ (* im 2) (* re (+ 2 (/ re im))))))
(sqrt (+ (* im 2) (* re (+ 2 (/ re im)))))
(+ (* im 2) (* re (+ 2 (/ re im))))
(* im 2)
(* 1/2 (exp (* 1/2 (log (* 2 (+ re (sqrt (+ (* re re) (* im im)))))))))
(exp (* 1/2 (log (* 2 (+ re (sqrt (+ (* re re) (* im im))))))))
(* 1/2 (log (* 2 (+ re (sqrt (+ (* re re) (* im im)))))))
(log (* 2 (+ re (sqrt (+ (* re re) (* im im))))))
(sqrt 2)
(* 1/2 (sqrt 2))
(* re (+ 2 (/ re im)))
Outputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 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 (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 (*.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 (sqrt.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/4 binary64))) (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 re (hypot.f64 re im)))))
(exp.f64 (*.f64 (log.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (+.f64 (*.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64)) (*.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64))))
(sqrt.f64 (+.f64 re (hypot.f64 re im)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (hypot.f64 re im))))) (sqrt.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 (sqrt.f64 (-.f64 re (hypot.f64 re im))) (sqrt.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))))
(/.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 (+.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (hypot.f64 re im))))))
(/.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 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re re) (*.f64 re (hypot.f64 re im))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (sqrt.f64 (-.f64 re (hypot.f64 re im))))
(/.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (hypot.f64 re im)))))))
(/.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (-.f64 re (hypot.f64 re im)))))
(/.f64 (sqrt.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))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (hypot.f64 re im)))))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (-.f64 re (hypot.f64 re im)))))
(/.f64 (sqrt.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re))) (sqrt.f64 (-.f64 (hypot.f64 re im) re)))
(/.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (hypot.f64 re im)))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))) (neg.f64 (sqrt.f64 (-.f64 re (hypot.f64 re im)))))
(pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 re (hypot.f64 re im))))
(pow.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(*.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/4 binary64)) (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (hypot.f64 re im))))) #s(literal 1/2 binary64)))
(*.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 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (hypot.f64 re im)))))))
(*.f64 (sqrt.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) (sqrt.f64 (+.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (hypot.f64 re im)))))))
(*.f64 (sqrt.f64 (-.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/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 re (hypot.f64 re im)))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 re (hypot.f64 re im)))))
(*.f64 (pow.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64))))
(+.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)))))
(exp.f64 (log.f64 (+.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 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)
(/.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 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re 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 #s(literal 1 binary64) (/.f64 (-.f64 (hypot.f64 re im) re) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re))))
(/.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 (*.f64 re re) (*.f64 im im)) (*.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 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re 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 #s(literal -1 binary64) (neg.f64 (/.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 0 binary64) (+.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.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)))) (neg.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re re) (*.f64 re (hypot.f64 re im))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (-.f64 #s(literal 0 binary64) (-.f64 re (hypot.f64 re im))))
(/.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)) (-.f64 (hypot.f64 re im) re))
(/.f64 (exp.f64 (log.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))) (exp.f64 (log.f64 (+.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (hypot.f64 re im)))))))
(/.f64 (exp.f64 (log.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))) (exp.f64 (log.f64 (-.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 (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 (*.f64 re re) (*.f64 im im)) (*.f64 re (hypot.f64 re im)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 re (hypot.f64 re im)))))
(/.f64 (neg.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re))) (neg.f64 (-.f64 (hypot.f64 re im) re)))
(/.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 (*.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)))))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (+.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 #s(literal 1 binary64) (+.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.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 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re 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 #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 (*.f64 re re) (*.f64 im im)) (*.f64 re (hypot.f64 re im)))))))
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 re (hypot.f64 re im)))))
(*.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re re)) (/.f64 #s(literal 1 binary64) (-.f64 (hypot.f64 re im) re)))
(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 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im)))))))
(/.f64 (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))))
(/.f64 (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (sqrt.f64 (+.f64 (*.f64 im (*.f64 im (*.f64 im im))) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 im im)))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 im (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re (*.f64 re re))))) (sqrt.f64 (-.f64 (*.f64 im im) (*.f64 re re))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 im (*.f64 im im)))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im)))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (neg.f64 (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im)))))) (neg.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))))
(pow.f64 (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 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) #s(literal 1/2 binary64)))
(*.f64 (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(*.f64 (hypot.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re re) (*.f64 im im))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re re) (*.f64 im im)))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))))
(*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (hypot.f64 re im)) (sqrt.f64 (hypot.f64 re im)))
(exp.f64 (*.f64 (log.f64 re) #s(literal 1/2 binary64)))
(sqrt.f64 re)
(pow.f64 re #s(literal 1/2 binary64))
(pow.f64 (*.f64 re re) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 re #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 re)) #s(literal 1/2 binary64))
(*.f64 #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)
(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 #s(literal 2 binary64) (+.f64 re im))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (pow.f64 (+.f64 re im) #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 re im) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re im))) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re im))) #s(literal 1/2 binary64)))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re im)))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64)))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64)))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))))) (sqrt.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im)))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 im im) (*.f64 re re)))) (pow.f64 (-.f64 im re) #s(literal 1/2 binary64)))
(/.f64 (sqrt.f64 (*.f64 (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) #s(literal 2 binary64))) (sqrt.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 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 re im)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re im)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (+.f64 re im)) (*.f64 #s(literal 2 binary64) (+.f64 re im))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re im)))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 (+.f64 re im) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (+.f64 re im) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re im)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re im)) #s(literal 1/4 binary64)))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64)))
(+.f64 (*.f64 re #s(literal 2 binary64)) (*.f64 im #s(literal 2 binary64)))
(-.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64)))))
(fma.f64 re #s(literal 2 binary64) (*.f64 im #s(literal 2 binary64)))
(fma.f64 im #s(literal 2 binary64) (*.f64 re #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) re (*.f64 im #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) im (*.f64 re #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (+.f64 re im)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64))) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im re) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 im im) (*.f64 re re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im))) (*.f64 (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im re) (*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) #s(literal 2 binary64))))
(/.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 im im) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) #s(literal 4 binary64))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im))))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 im im) (*.f64 re re))) (-.f64 im re))
(/.f64 (*.f64 (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) #s(literal 2 binary64)) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im))))
(/.f64 (*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) #s(literal 2 binary64)) (-.f64 im re))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)))) (neg.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) #s(literal 4 binary64)))) (neg.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64)))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im)))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 im im) (*.f64 re re)))) (-.f64 #s(literal 0 binary64) (-.f64 im re)))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 im re)))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64))) (+.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re #s(literal 2 binary64)) (*.f64 im #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (*.f64 im im) #s(literal 4 binary64))) (-.f64 (*.f64 re #s(literal 2 binary64)) (*.f64 im #s(literal 2 binary64))))
(*.f64 #s(literal 2 binary64) (+.f64 re im))
(*.f64 (+.f64 re im) #s(literal 2 binary64))
(*.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64)))))))
(*.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64)))))
(*.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im)))))
(*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 im im) (*.f64 re re))) (/.f64 #s(literal 1 binary64) (-.f64 im re)))
(*.f64 (*.f64 (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im)))))
(*.f64 (*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 im re)))
(+.f64 re im)
(+.f64 im re)
(+.f64 (/.f64 (*.f64 im im) (-.f64 im re)) (neg.f64 (/.f64 (*.f64 re re) (-.f64 im re))))
(-.f64 (/.f64 (*.f64 im im) (-.f64 im re)) (/.f64 (*.f64 re re) (-.f64 im re)))
(-.f64 (/.f64 (*.f64 re re) (-.f64 re im)) (/.f64 (*.f64 im im) (-.f64 re im)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 re im)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 re im) (-.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 re im)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re im))) (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))))
(/.f64 (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im))))
(/.f64 (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re im))))
(/.f64 (-.f64 (*.f64 im im) (*.f64 re re)) (-.f64 im re))
(/.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (-.f64 re im))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 re im))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im)))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))) (neg.f64 (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re im)))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) (-.f64 im re)))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 re re) (*.f64 im im))) (neg.f64 (-.f64 re im)))
(/.f64 (-.f64 (*.f64 (*.f64 im im) (-.f64 im re)) (*.f64 (-.f64 im re) (*.f64 re re))) (*.f64 (-.f64 im re) (-.f64 im re)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 im im) (*.f64 re re)))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 im re))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 im im) (-.f64 im re)) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 re re) (-.f64 im re)) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 im im) (-.f64 im re)) (/.f64 (*.f64 im im) (-.f64 im re))) (+.f64 (*.f64 (/.f64 (*.f64 re re) (-.f64 im re)) (/.f64 (*.f64 re re) (-.f64 im re))) (*.f64 (/.f64 (*.f64 im im) (-.f64 im re)) (/.f64 (*.f64 re re) (-.f64 im re))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 im im) (-.f64 im re)) (/.f64 (*.f64 im im) (-.f64 im re))) (*.f64 (/.f64 (*.f64 re re) (-.f64 im re)) (/.f64 (*.f64 re re) (-.f64 im re)))) (+.f64 (/.f64 (*.f64 im im) (-.f64 im re)) (/.f64 (*.f64 re re) (-.f64 im re))))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 re im)) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (+.f64 re im))
(*.f64 (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im)))))
(*.f64 (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (-.f64 (*.f64 im im) (*.f64 re im)))))
(*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) (/.f64 #s(literal 1 binary64) (-.f64 im re)))
(*.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (/.f64 #s(literal 1 binary64) (-.f64 re im)))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im))))))
(*.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 im im) (*.f64 re re))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 im re))))
(*.f64 #s(literal 1/2 binary64) (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 #s(literal 1 binary64) (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (*.f64 (*.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)))))) (sqrt.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))))) (sqrt.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 im #s(literal 2 binary64)))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))))) (sqrt.f64 (+.f64 (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.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 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.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 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))))))) (sqrt.f64 (-.f64 #s(literal 0 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 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) (*.f64 (*.f64 im im) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 im #s(literal 2 binary64)))))
(/.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))))))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 im #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))))) (neg.f64 (sqrt.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))))
(pow.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))) (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 im #s(literal 2 binary64)))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.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 (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 im #s(literal 2 binary64))))))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.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 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.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 (sqrt.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))))
(*.f64 (pow.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))) #s(literal 1/4 binary64)))
(+.f64 (*.f64 #s(literal 2 binary64) (+.f64 re im)) (/.f64 re (/.f64 im re)))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))
(+.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 im #s(literal 2 binary64)))
(+.f64 (*.f64 re #s(literal 2 binary64)) (+.f64 (/.f64 re (/.f64 im re)) (*.f64 im #s(literal 2 binary64))))
(+.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) (neg.f64 (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))))
(-.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))))
(-.f64 (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) (-.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 im #s(literal 2 binary64)))) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 im #s(literal 2 binary64)))))
(fma.f64 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 im #s(literal 2 binary64) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))
(fma.f64 #s(literal 2 binary64) re (+.f64 (/.f64 re (/.f64 im re)) (*.f64 im #s(literal 2 binary64))))
(fma.f64 #s(literal 2 binary64) im (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))
(fma.f64 #s(literal 2 binary64) (+.f64 re im) (/.f64 re (/.f64 im re)))
(fma.f64 (+.f64 re im) #s(literal 2 binary64) (/.f64 re (/.f64 im re)))
(fma.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) re (*.f64 im #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.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 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 im #s(literal 2 binary64))) (-.f64 (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) (*.f64 (*.f64 im im) #s(literal 4 binary64)))))
(/.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))))) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (-.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 im #s(literal 2 binary64))))))
(/.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))))) (+.f64 (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.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 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))))) (-.f64 #s(literal 0 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 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))))) (neg.f64 (+.f64 (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.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 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))))) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))))
(/.f64 (-.f64 (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) (*.f64 (*.f64 im im) #s(literal 4 binary64))) (-.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 im #s(literal 2 binary64))))
(/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64))) (/.f64 im re)) (*.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64))))) re)) (*.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64))))) (/.f64 im re)))
(/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64))) im) (*.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64))))) (*.f64 re re))) (*.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64))))) im))
(/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64))) (-.f64 #s(literal 0 binary64) im)) (*.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64))))) (*.f64 re (-.f64 #s(literal 0 binary64) re)))) (*.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64))) (-.f64 #s(literal 0 binary64) im)) (*.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64))))) (*.f64 (-.f64 #s(literal 0 binary64) re) re))) (*.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) #s(literal 4 binary64))) (/.f64 im re)) (*.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64))) re)) (*.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64))) (/.f64 im re)))
(/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) #s(literal 4 binary64))) im) (*.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64))) (*.f64 re re))) (*.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64))) im))
(/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) #s(literal 4 binary64))) (-.f64 #s(literal 0 binary64) im)) (*.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64))) (*.f64 re (-.f64 #s(literal 0 binary64) re)))) (*.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) #s(literal 4 binary64))) (-.f64 #s(literal 0 binary64) im)) (*.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) re) re))) (*.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))) (/.f64 im re)) (*.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im))) re)) (*.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im))) (/.f64 im re)))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))) im) (*.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im))) (*.f64 re re))) (*.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im))) im))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) im)) (*.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im))) (*.f64 re (-.f64 #s(literal 0 binary64) re)))) (*.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im))) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) im)) (*.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im))) (*.f64 (-.f64 #s(literal 0 binary64) re) re))) (*.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im))) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 im im) (*.f64 re re))) (/.f64 im re)) (*.f64 (-.f64 im re) re)) (*.f64 (-.f64 im re) (/.f64 im re)))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 im im) (*.f64 re re))) im) (*.f64 (-.f64 im re) (*.f64 re re))) (*.f64 (-.f64 im re) im))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) im)) (*.f64 (-.f64 im re) (*.f64 re (-.f64 #s(literal 0 binary64) re)))) (*.f64 (-.f64 im re) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) im)) (*.f64 (-.f64 im re) (*.f64 (-.f64 #s(literal 0 binary64) re) re))) (*.f64 (-.f64 im re) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) #s(literal 2 binary64)) (/.f64 im re)) (*.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im))) re)) (*.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im))) (/.f64 im re)))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) #s(literal 2 binary64)) im) (*.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im))) (*.f64 re re))) (*.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im))) im))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) im)) (*.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im))) (*.f64 re (-.f64 #s(literal 0 binary64) re)))) (*.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im))) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) im)) (*.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im))) (*.f64 (-.f64 #s(literal 0 binary64) re) re))) (*.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im))) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) #s(literal 2 binary64)) (/.f64 im re)) (*.f64 (-.f64 im re) re)) (*.f64 (-.f64 im re) (/.f64 im re)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) #s(literal 2 binary64)) im) (*.f64 (-.f64 im re) (*.f64 re re))) (*.f64 (-.f64 im re) im))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) im)) (*.f64 (-.f64 im re) (*.f64 re (-.f64 #s(literal 0 binary64) re)))) (*.f64 (-.f64 im re) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) im)) (*.f64 (-.f64 im re) (*.f64 (-.f64 #s(literal 0 binary64) re) re))) (*.f64 (-.f64 im re) (-.f64 #s(literal 0 binary64) im)))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) (*.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))))) (*.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))))))) (neg.f64 (-.f64 #s(literal 0 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 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) (*.f64 (*.f64 im im) #s(literal 4 binary64)))) (neg.f64 (-.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 im #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re im)) #s(literal 3 binary64)) (/.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im im)))) (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (+.f64 re im)) (*.f64 #s(literal 2 binary64) (+.f64 re im))) (-.f64 (*.f64 (*.f64 re re) (/.f64 (/.f64 re (/.f64 im re)) im)) (*.f64 (*.f64 #s(literal 2 binary64) (+.f64 re im)) (/.f64 re (/.f64 im re))))))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (pow.f64 (+.f64 (/.f64 re (/.f64 im re)) (*.f64 im #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (-.f64 (*.f64 (+.f64 (/.f64 re (/.f64 im re)) (*.f64 im #s(literal 2 binary64))) (+.f64 (/.f64 re (/.f64 im re)) (*.f64 im #s(literal 2 binary64)))) (*.f64 (*.f64 re #s(literal 2 binary64)) (+.f64 (/.f64 re (/.f64 im re)) (*.f64 im #s(literal 2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))) (+.f64 (*.f64 (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))) (*.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) (+.f64 re im)) (*.f64 #s(literal 2 binary64) (+.f64 re im))) (*.f64 (*.f64 re re) (/.f64 (/.f64 re (/.f64 im re)) im))) (-.f64 (*.f64 #s(literal 2 binary64) (+.f64 re im)) (/.f64 re (/.f64 im re))))
(/.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (+.f64 (/.f64 re (/.f64 im re)) (*.f64 im #s(literal 2 binary64))) (+.f64 (/.f64 re (/.f64 im re)) (*.f64 im #s(literal 2 binary64))))) (-.f64 (*.f64 re #s(literal 2 binary64)) (+.f64 (/.f64 re (/.f64 im re)) (*.f64 im #s(literal 2 binary64)))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))) (*.f64 (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))))) (+.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) (/.f64 (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) #s(literal -1 binary64))
(*.f64 #s(literal 1 binary64) (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))
(*.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.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 (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.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 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 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 #s(literal 0 binary64) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))))
(*.f64 (-.f64 (*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))) (*.f64 (*.f64 im im) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))) (*.f64 im #s(literal 2 binary64)))))
(*.f64 im #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) im)
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 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 (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 (*.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 (sqrt.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/4 binary64))) (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/4 binary64)))
(exp.f64 (/.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(exp.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 re (hypot.f64 re im)))) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(sqrt.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (+.f64 (/.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 2 binary64))))
(pow.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64))
(pow.f64 (*.f64 (exp.f64 #s(literal 1/2 binary64)) (exp.f64 #s(literal 1/2 binary64))) (/.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 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 re (hypot.f64 re im)) #s(literal 1/2 binary64)) (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)))
(*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)))
(*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 2 binary64)))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(*.f64 (pow.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)) #s(literal 1/4 binary64)))
(+.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 re (hypot.f64 re im)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 re (hypot.f64 re im)))))
(fma.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 re (hypot.f64 re im)))))
(fma.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 re (hypot.f64 re im)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))))
(/.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 2 binary64))
(/.f64 (neg.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))) #s(literal -2 binary64))
(/.f64 (+.f64 (pow.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 re (hypot.f64 re im)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 re (hypot.f64 re im)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 re (hypot.f64 re im))))) (*.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 re (hypot.f64 re im))))))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 re (hypot.f64 re im)))) #s(literal 3 binary64))) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 re (hypot.f64 re im)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 re (hypot.f64 re im))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 re (hypot.f64 re im))))))))
(/.f64 (-.f64 (*.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 re (hypot.f64 re im)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 re (hypot.f64 re im)))))) (-.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 re (hypot.f64 re im))))))
(/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 re (hypot.f64 re im)))) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 re (hypot.f64 re im)))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 re (hypot.f64 re im))))))
(*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))))
(*.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))
(+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (+.f64 re (hypot.f64 re im))))
(+.f64 (log.f64 (+.f64 re (hypot.f64 re im))) (log.f64 #s(literal 2 binary64)))
(-.f64 (log.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (*.f64 #s(literal 8 binary64) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))) (log.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (-.f64 (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (*.f64 re #s(literal 2 binary64)) (*.f64 (hypot.f64 re im) #s(literal 2 binary64)))))))
(-.f64 (log.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 #s(literal 4 binary64) (+.f64 (*.f64 re re) (*.f64 im im))))) (log.f64 (-.f64 (*.f64 re #s(literal 2 binary64)) (*.f64 (hypot.f64 re im) #s(literal 2 binary64)))))
(-.f64 (log.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))))) (log.f64 (+.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (hypot.f64 re im))))))
(-.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))) (log.f64 (-.f64 re (hypot.f64 re im))))
(-.f64 (log.f64 (*.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) #s(literal 2 binary64))) (log.f64 (+.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (hypot.f64 re im))))))
(-.f64 (log.f64 (*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) #s(literal 2 binary64))) (log.f64 (-.f64 re (hypot.f64 re im))))
(-.f64 (/.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))) (/.f64 (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (+.f64 re (hypot.f64 re im)))))) (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) (-.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 3 binary64))) (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (+.f64 re (hypot.f64 re im)))))))
(/.f64 (-.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (+.f64 re (hypot.f64 re im))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)))) (neg.f64 (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(/.f64 (+.f64 (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 3 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (-.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 (+.f64 re (hypot.f64 re im))) (log.f64 #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (-.f64 (log.f64 (+.f64 re (hypot.f64 re im))) (log.f64 #s(literal 2 binary64))))
(*.f64 (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (+.f64 re (hypot.f64 re im))))))))
(*.f64 (-.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))
(+.f64 (*.f64 re #s(literal 2 binary64)) (/.f64 re (/.f64 im re)))
(+.f64 (/.f64 re (/.f64 im re)) (*.f64 re #s(literal 2 binary64)))
(-.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (-.f64 (*.f64 re #s(literal 2 binary64)) (/.f64 re (/.f64 im re)))) (/.f64 (*.f64 (*.f64 re re) (/.f64 (/.f64 re (/.f64 im re)) im)) (-.f64 (*.f64 re #s(literal 2 binary64)) (/.f64 re (/.f64 im re)))))
(fma.f64 re #s(literal 2 binary64) (/.f64 re (/.f64 im re)))
(fma.f64 re (/.f64 re im) (*.f64 re #s(literal 2 binary64)))
(fma.f64 (*.f64 re re) (/.f64 #s(literal 1 binary64) im) (*.f64 re #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) re (/.f64 re (/.f64 im re)))
(fma.f64 (/.f64 re im) re (*.f64 re #s(literal 2 binary64)))
(/.f64 re (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 2 binary64) (/.f64 re im))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 re re) (/.f64 (/.f64 re (/.f64 im re)) im)) (*.f64 (*.f64 re #s(literal 2 binary64)) (/.f64 re (/.f64 im re))))) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (/.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im im))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 re #s(literal 2 binary64)) (/.f64 re (/.f64 im re))) (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (/.f64 (/.f64 re (/.f64 im re)) im)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 4 binary64) (/.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (/.f64 im re))) (*.f64 re (+.f64 #s(literal 8 binary64) (/.f64 (/.f64 re im) (/.f64 (/.f64 im re) (/.f64 re im)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 re (-.f64 #s(literal 4 binary64) (/.f64 (/.f64 re (/.f64 im re)) im)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 4 binary64) (/.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (/.f64 im re))) (*.f64 (+.f64 #s(literal 8 binary64) (/.f64 (/.f64 re im) (/.f64 (/.f64 im re) (/.f64 re im)))) re)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 2 binary64) (/.f64 re im)) (*.f64 (-.f64 #s(literal 4 binary64) (/.f64 (/.f64 re (/.f64 im re)) im)) re)))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (/.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im im)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 re re) (/.f64 (/.f64 re (/.f64 im re)) im)) (*.f64 (*.f64 re #s(literal 2 binary64)) (/.f64 re (/.f64 im re))))))
(/.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (/.f64 (/.f64 re (/.f64 im re)) im))) (-.f64 (*.f64 re #s(literal 2 binary64)) (/.f64 re (/.f64 im re))))
(/.f64 (*.f64 re (+.f64 #s(literal 8 binary64) (/.f64 (/.f64 re im) (/.f64 (/.f64 im re) (/.f64 re im))))) (+.f64 #s(literal 4 binary64) (/.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (/.f64 im re))))
(/.f64 (*.f64 re (-.f64 #s(literal 4 binary64) (/.f64 (/.f64 re (/.f64 im re)) im))) (-.f64 #s(literal 2 binary64) (/.f64 re im)))
(/.f64 (*.f64 (+.f64 #s(literal 8 binary64) (/.f64 (/.f64 re im) (/.f64 (/.f64 im re) (/.f64 re im)))) re) (+.f64 #s(literal 4 binary64) (/.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (/.f64 im re))))
(/.f64 (*.f64 (-.f64 #s(literal 4 binary64) (/.f64 (/.f64 re (/.f64 im re)) im)) re) (-.f64 #s(literal 2 binary64) (/.f64 re im)))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (/.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im im))))) (neg.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 re re) (/.f64 (/.f64 re (/.f64 im re)) im)) (*.f64 (*.f64 re #s(literal 2 binary64)) (/.f64 re (/.f64 im re)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (/.f64 (/.f64 re (/.f64 im re)) im)))) (neg.f64 (-.f64 (*.f64 re #s(literal 2 binary64)) (/.f64 re (/.f64 im re)))))
(/.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 8 binary64) (/.f64 (/.f64 re im) (/.f64 (/.f64 im re) (/.f64 re im)))))) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 4 binary64) (/.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (/.f64 im re)))))
(/.f64 (neg.f64 (*.f64 re (-.f64 #s(literal 4 binary64) (/.f64 (/.f64 re (/.f64 im re)) im)))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 2 binary64) (/.f64 re im))))
(/.f64 (neg.f64 (*.f64 (+.f64 #s(literal 8 binary64) (/.f64 (/.f64 re im) (/.f64 (/.f64 im re) (/.f64 re im)))) re)) (-.f64 #s(literal 0 binary64) (+.f64 #s(literal 4 binary64) (/.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (/.f64 im re)))))
(/.f64 (neg.f64 (*.f64 (-.f64 #s(literal 4 binary64) (/.f64 (/.f64 re (/.f64 im re)) im)) re)) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 2 binary64) (/.f64 re im))))
(/.f64 (+.f64 (/.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im im))) (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64))) (+.f64 (*.f64 (*.f64 re re) (/.f64 (/.f64 re (/.f64 im re)) im)) (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (/.f64 re (/.f64 im re)) (*.f64 re #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 re re) (/.f64 (/.f64 re (/.f64 im re)) im)) (*.f64 (*.f64 re re) #s(literal 4 binary64))) (-.f64 (/.f64 re (/.f64 im re)) (*.f64 re #s(literal 2 binary64))))
(*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))
(*.f64 (+.f64 #s(literal 2 binary64) (/.f64 re im)) re)
(*.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (/.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im im)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 re re) (/.f64 (/.f64 re (/.f64 im re)) im)) (*.f64 (*.f64 re #s(literal 2 binary64)) (/.f64 re (/.f64 im re)))))))
(*.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (*.f64 re re) (/.f64 (/.f64 re (/.f64 im re)) im))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re #s(literal 2 binary64)) (/.f64 re (/.f64 im re)))))
(*.f64 (*.f64 re (+.f64 #s(literal 8 binary64) (/.f64 (/.f64 re im) (/.f64 (/.f64 im re) (/.f64 re im))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 4 binary64) (/.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (/.f64 im re)))))
(*.f64 (*.f64 re (-.f64 #s(literal 4 binary64) (/.f64 (/.f64 re (/.f64 im re)) im))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 2 binary64) (/.f64 re im))))
(*.f64 (*.f64 (+.f64 #s(literal 8 binary64) (/.f64 (/.f64 re im) (/.f64 (/.f64 im re) (/.f64 re im)))) re) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 4 binary64) (/.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (/.f64 im re)))))
(*.f64 (*.f64 (-.f64 #s(literal 4 binary64) (/.f64 (/.f64 re (/.f64 im re)) im)) re) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 2 binary64) (/.f64 re im))))

simplify416.0ms (3.9%)

Algorithm
egg-herbie
Rules
6858×*-lowering-*.f32
6858×*-lowering-*.f64
5042×+-lowering-+.f64
5042×+-lowering-+.f32
1576×distribute-lft-in
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
012038142
142587766
083807766
Stop Event
iter limit
node limit
Counts
420 → 420
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 im) (* 1/2 (* (sqrt (/ 1 im)) re)))
(+ (sqrt im) (* re (+ (* 1/8 (* (sqrt (/ 1 (pow im 3))) re)) (* 1/2 (sqrt (/ 1 im))))))
(+ (sqrt im) (* re (+ (* 1/2 (sqrt (/ 1 im))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) re)) (* 1/8 (sqrt (/ 1 (pow im 3)))))))))
(* (sqrt re) (sqrt 2))
(* re (+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 2))))
(* re (+ (* -1/16 (* (/ (pow im 4) (sqrt 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 2)))))
(* re (+ (* -1/16 (* (/ (pow im 4) (sqrt 2)) (sqrt (/ 1 (pow re 9))))) (+ (* -1/32 (* (/ (pow im 4) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 2))))))
(* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re)))
(+ (* 1/16 (* (/ (* (pow im 3) (sqrt -1)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re))))
(+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (sqrt -1)) (sqrt 1/2)) (sqrt re))) (* 1/32 (* (/ (* (pow im 5) (sqrt -1)) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re))))
(+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (sqrt -1)) (sqrt 1/2)) (sqrt re))) (+ (* 1/512 (* (/ (* (pow im 5) (sqrt -1)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/32 (* (/ (* (pow im 5) (sqrt -1)) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re))))
(* (sqrt re) (sqrt 2))
(+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt 2)))
(+ (* (sqrt re) (sqrt 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 2)) (sqrt (/ 1 re)))) (* 1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt 2)))))))
(+ (* (sqrt re) (sqrt 2)) (* (pow im 2) (+ (* 1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt 2)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 re)) (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (sqrt 2)))) (* 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 2)) (sqrt (/ 1 re)))))))))
(sqrt im)
(* im (+ (sqrt (/ 1 im)) (* 1/2 (* (sqrt (/ 1 (pow im 3))) re))))
(* im (+ (sqrt (/ 1 im)) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) re)))))
(* im (+ (sqrt (/ 1 im)) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) re))))))
(* -1 (* (sqrt im) (sqrt -1)))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1)))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt -1)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (sqrt -1)))) (* 1/4 (* (sqrt im) (* (pow re 2) (sqrt -1))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))
im
(+ im 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))))))))
(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 (* (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)))
(* 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 (* (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))
(+ (* (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)))
(* 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)))))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(+ (* 1/8 (* (* (pow im 3) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(+ (* -1 (/ (+ (* -1/8 (* (* (pow im 3) (sqrt -1)) (sqrt re))) (* 1/16 (* (* (pow im 5) (sqrt -1)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(+ (* -1 (/ (+ (* -1/8 (* (* (pow im 3) (sqrt -1)) (sqrt re))) (+ (* 1/128 (* (* (pow im 5) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/16 (* (* (pow im 5) (sqrt -1)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 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)))) (* 21/512 (* (pow im 2) (sqrt (/ 1 (pow re 11))))))))))
(* (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 -1) (sqrt 2))))
(* -1 (* im (+ (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))) (* (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 -1) (sqrt 2))) (* (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 -1) (sqrt 2))) (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))))))
(* 1/2 (log (* 2 im)))
(+ (* 1/2 (log (* 2 im))) (* 1/2 (/ re im)))
(+ (* 1/2 (log (* 2 im))) (* re (+ (* -1/12 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+ (* 1/2 (log (* 2 im))) (* re (+ (* (pow re 2) (- (* 3/80 (/ (pow re 2) (pow im 5))) (* 1/12 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))
(* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))
(+ (* 1/8 (/ (pow im 2) (pow re 2))) (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))
(+ (* 1/48 (/ (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))) (pow re 4))) (+ (* 1/8 (/ (pow im 2) (pow re 2))) (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))))
(+ (* 1/1440 (/ (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6)))) (pow re 6))) (+ (* 1/48 (/ (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))) (pow re 4))) (+ (* 1/8 (/ (pow im 2) (pow re 2))) (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))))
(* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))
(+ (* -1/8 (/ (pow im 2) (pow re 2))) (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))
(+ (* -1/8 (/ (pow im 2) (pow re 2))) (+ (* 1/48 (/ (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))) (pow re 4))) (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))))
(+ (* -1/8 (/ (pow im 2) (pow re 2))) (+ (* 1/1440 (/ (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))) (pow re 6))) (+ (* 1/48 (/ (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))) (pow re 4))) (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))))
(* 1/2 (log (* 4 re)))
(+ (* 1/8 (/ (pow im 2) (pow re 2))) (* 1/2 (log (* 4 re))))
(+ (* 1/2 (log (* 4 re))) (* (pow im 2) (+ (* -3/64 (/ (pow im 2) (pow re 4))) (* 1/8 (/ 1 (pow re 2))))))
(+ (* 1/2 (log (* 4 re))) (* (pow im 2) (+ (* (pow im 2) (- (* 5/192 (/ (pow im 2) (pow re 6))) (* 3/64 (/ 1 (pow re 4))))) (* 1/8 (/ 1 (pow re 2))))))
(* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))
(+ (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))) (* 1/2 (/ re im)))
(+ (* 1/4 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow im 2))) (+ (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))) (* 1/2 (/ re im))))
(+ (* 1/12 (/ (+ (* -3 (pow re 3)) (* 2 (pow re 3))) (pow im 3))) (+ (* 1/4 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow im 2))) (+ (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))) (* 1/2 (/ re im)))))
(* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))
(+ (* -1/2 (/ re im)) (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))
(+ (* -1 (/ (+ (* -1/4 (/ (+ (* -1 (pow re 2)) (pow re 2)) im)) (* 1/2 re)) im)) (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (/ (+ (* -3 (pow re 3)) (* 2 (pow re 3))) im)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2)))) im)) (* 1/2 re)) im)) (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))
(log (* 2 im))
(+ (log (* 2 im)) (/ re im))
(+ (log (* 2 im)) (* re (+ (* -1/6 (/ (pow re 2) (pow im 3))) (/ 1 im))))
(+ (log (* 2 im)) (* re (+ (* (pow re 2) (- (* 3/40 (/ (pow re 2) (pow im 5))) (* 1/6 (/ 1 (pow im 3))))) (/ 1 im))))
(+ (log 4) (* -1 (log (/ 1 re))))
(+ (log 4) (+ (* -1 (log (/ 1 re))) (* 1/4 (/ (pow im 2) (pow re 2)))))
(+ (log 4) (+ (* -1 (log (/ 1 re))) (+ (* 1/24 (/ (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))) (pow re 4))) (* 1/4 (/ (pow im 2) (pow re 2))))))
(+ (log 4) (+ (* -1 (log (/ 1 re))) (+ (* 1/720 (/ (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6)))) (pow re 6))) (+ (* 1/24 (/ (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))) (pow re 4))) (* 1/4 (/ (pow im 2) (pow re 2)))))))
(+ (log (/ -1 re)) (log (pow im 2)))
(+ (log (/ -1 re)) (+ (log (pow im 2)) (* -1/4 (/ (pow im 2) (pow re 2)))))
(+ (log (/ -1 re)) (+ (log (pow im 2)) (+ (* -1/4 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))) (pow re 4))))))
(+ (log (/ -1 re)) (+ (log (pow im 2)) (+ (* -1/4 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))) (pow re 6))) (* 1/24 (/ (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))) (pow re 4)))))))
(log (* 4 re))
(+ (log (* 4 re)) (* 1/4 (/ (pow im 2) (pow re 2))))
(+ (log (* 4 re)) (* (pow im 2) (+ (* -3/32 (/ (pow im 2) (pow re 4))) (* 1/4 (/ 1 (pow re 2))))))
(+ (log (* 4 re)) (* (pow im 2) (+ (* (pow im 2) (- (* 5/96 (/ (pow im 2) (pow re 6))) (* 3/32 (/ 1 (pow re 4))))) (* 1/4 (/ 1 (pow re 2))))))
(+ (log 2) (* -1 (log (/ 1 im))))
(+ (log 2) (+ (* -1 (log (/ 1 im))) (/ re im)))
(+ (log 2) (+ (* -1 (log (/ 1 im))) (+ (* 1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow im 2))) (/ re im))))
(+ (log 2) (+ (* -1 (log (/ 1 im))) (+ (* 1/6 (/ (+ (* -3 (pow re 3)) (* 2 (pow re 3))) (pow im 3))) (+ (* 1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow im 2))) (/ re im)))))
(+ (log 2) (* -1 (log (/ -1 im))))
(+ (log 2) (+ (* -1 (log (/ -1 im))) (* -1 (/ re im))))
(+ (log 2) (+ (* -1 (log (/ -1 im))) (* -1 (/ (+ re (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) im))) im))))
(+ (log 2) (+ (* -1 (log (/ -1 im))) (* -1 (/ (+ re (* -1 (/ (+ (* -1/6 (/ (+ (* -3 (pow re 3)) (* 2 (pow re 3))) im)) (* 1/2 (+ (* -1 (pow re 2)) (pow re 2)))) im))) im))))
(* 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))
Outputs
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (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/16 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 re (+.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))))))))
(* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))
(*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 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 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))) (*.f64 (*.f64 #s(literal -1/32 binary64) (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 #s(literal -1/32 binary64) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))) (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))) (*.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))))))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 im (*.f64 (*.f64 (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/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 #s(literal 1/2 binary64) (*.f64 im (*.f64 (*.f64 (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))))) (*.f64 #s(literal 1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.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))))))
(+ (* -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 #s(literal 1/2 binary64) (*.f64 im (*.f64 (*.f64 (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))))) (/.f64 (+.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))))) (*.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 #s(literal 1/2 binary64) (*.f64 im (*.f64 (*.f64 (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))))) (/.f64 (+.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 #s(literal 1/1024 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 (*.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 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/2 binary64) (*.f64 #s(literal 2 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/2 binary64) (*.f64 #s(literal 2 binary64) (sqrt.f64 re))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))))
(+ (* 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/2 binary64) (*.f64 #s(literal 2 binary64) (sqrt.f64 re))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (+.f64 (/.f64 #s(literal 1/16 binary64) (*.f64 #s(literal 2 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1/8 binary64) (*.f64 re (*.f64 re re))))))) (*.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/2 binary64) (*.f64 #s(literal 2 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 (*.f64 im im) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (+.f64 (/.f64 #s(literal 1/16 binary64) (*.f64 #s(literal 2 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1/8 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 im im) (*.f64 (-.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/16 binary64) (*.f64 #s(literal 2 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1/8 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(* im (+ (* 1/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 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re))))))
(* 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 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))))
(* -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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 (*.f64 (sqrt.f64 im) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 re re))) #s(literal 3/16 binary64)) (*.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(sqrt im)
(sqrt.f64 im)
(+ (sqrt im) (* 1/2 (* (sqrt (/ 1 im)) re)))
(+.f64 (sqrt.f64 im) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re)))
(+ (sqrt im) (* re (+ (* 1/8 (* (sqrt (/ 1 (pow im 3))) re)) (* 1/2 (sqrt (/ 1 im))))))
(+.f64 (sqrt.f64 im) (*.f64 re (+.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 re (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(+ (sqrt im) (* re (+ (* 1/2 (sqrt (/ 1 im))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) re)) (* 1/8 (sqrt (/ 1 (pow im 3)))))))))
(+.f64 (sqrt.f64 im) (*.f64 re (+.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 re (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 re (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)))))))
(* (sqrt re) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 re))
(* re (+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 2))))
(*.f64 re (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 im im) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* re (+ (* -1/16 (* (/ (pow im 4) (sqrt 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 2)))))
(*.f64 re (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 im im) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(* re (+ (* -1/16 (* (/ (pow im 4) (sqrt 2)) (sqrt (/ 1 (pow re 9))))) (+ (* -1/32 (* (/ (pow im 4) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 2))))))
(*.f64 re (+.f64 (*.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))) (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 im im) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))))))
(* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))
(+ (* 1/16 (* (/ (* (pow im 3) (sqrt -1)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re))))
(+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 im (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))
(+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (sqrt -1)) (sqrt 1/2)) (sqrt re))) (* 1/32 (* (/ (* (pow im 5) (sqrt -1)) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re))))
(-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 re))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (*.f64 (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 1/2)) (sqrt re))) (+ (* 1/512 (* (/ (* (pow im 5) (sqrt -1)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/32 (* (/ (* (pow im 5) (sqrt -1)) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re))))
(-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 re))) (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 -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (*.f64 (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))))
(* (sqrt re) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 re))
(+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 im im) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (sqrt re) (sqrt 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 2)) (sqrt (/ 1 re)))) (* 1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt 2)))))))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (+.f64 (/.f64 #s(literal 1/16 binary64) (*.f64 #s(literal 2 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1/8 binary64) (*.f64 re (*.f64 re re)))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (sqrt.f64 #s(literal 2 binary64)))))))
(+ (* (sqrt re) (sqrt 2)) (* (pow im 2) (+ (* 1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt 2)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 re)) (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (sqrt 2)))) (* 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 2)) (sqrt (/ 1 re)))))))))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (+.f64 (/.f64 #s(literal 1/16 binary64) (*.f64 #s(literal 2 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1/8 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 (-.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/16 binary64) (*.f64 #s(literal 2 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1/8 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (sqrt.f64 #s(literal 2 binary64)))))))))
(sqrt im)
(sqrt.f64 im)
(* im (+ (sqrt (/ 1 im)) (* 1/2 (* (sqrt (/ 1 (pow im 3))) re))))
(*.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal 1/2 binary64) (*.f64 re (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))))
(* im (+ (sqrt (/ 1 im)) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) re)))))
(*.f64 im (+.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 re (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))))
(* im (+ (sqrt (/ 1 im)) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) re))))))
(*.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)))) (*.f64 #s(literal 1/2 binary64) (*.f64 re (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))))))
(* -1 (* (sqrt im) (sqrt -1)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 im)))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1)))))
(*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt -1)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))
(*.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (sqrt -1)))) (* 1/4 (* (sqrt im) (* (pow re 2) (sqrt -1))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))
(*.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (/.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re))) (*.f64 im im)) (/.f64 #s(literal 3/8 binary64) im))) (-.f64 #s(literal 0 binary64) im))
im
(+ im re)
(+.f64 im re)
(+ im (* re (+ 1 (* 1/2 (/ re im)))))
(+.f64 im (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) re) 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 #s(literal -1/8 binary64) (*.f64 re re)) (*.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 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))))
(* re (+ 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 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))))))
(* -1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 im im)) re)
(* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re))
(/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (-.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 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) (-.f64 #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 (*.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 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) (-.f64 #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 #s(literal -1/8 binary64) (*.f64 im im)) (*.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 re im) (/.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)
(-.f64 #s(literal 0 binary64) im)
(* -1 (* im (+ 1 (* -1 (/ re im)))))
(-.f64 #s(literal 0 binary64) (*.f64 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 1 binary64) (/.f64 (+.f64 re (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) im))) im)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 1 (* -1 (/ (+ re (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im))) im)))))
(*.f64 (-.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)) (-.f64 #s(literal 0 binary64) im))
im
(+ im (* 1/2 (/ (pow re 2) im)))
(+.f64 im (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) im))
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+.f64 im (*.f64 (*.f64 re re) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))) (/.f64 #s(literal 1/2 binary64) im))))
(+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))
(+.f64 im (*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1/2 binary64) im) (*.f64 (*.f64 re re) (+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 re re)) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (*.f64 im (*.f64 im im))))))))
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(*.f64 re (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(*.f64 re (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))))))
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(*.f64 (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.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/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))))) (-.f64 #s(literal 0 binary64) re))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(+.f64 re (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re))
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+.f64 re (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/2 binary64) re))))
(+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
(+.f64 re (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (*.f64 re (*.f64 re re))))))))
im
(* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))
(*.f64 im (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(*.f64 im (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64)))))))
(* -1 im)
(-.f64 #s(literal 0 binary64) im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
(*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64)))))) (-.f64 #s(literal 0 binary64) im))
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(* 1/2 (* (sqrt re) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* 1/4 (* (* im (sqrt 2)) (sqrt (/ 1 re)))) (* 1/2 (* (sqrt re) (sqrt 2))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(+ (* 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 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 im (+.f64 (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))))
(+ (* 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 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 im (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.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 (*.f64 #s(literal 1/32 binary64) (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(* im (+ (* -1/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 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re))) #s(literal -1/16 binary64))))
(* 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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (*.f64 re re)))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))))
(* -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/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2)))))))
(*.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -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 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 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)))))) (-.f64 #s(literal 0 binary64) 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 (+.f64 (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re re) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64)))) (/.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 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)))))) (-.f64 #s(literal 0 binary64) im))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) #s(literal -1/16 binary64)))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))) (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 re (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) #s(literal -1/16 binary64)) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) #s(literal 1/32 binary64)))))))
(* 1/2 (* (sqrt re) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))
(* re (+ (* 1/4 (* (* im (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (sqrt 2)))))
(*.f64 re (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))))
(* 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 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))) (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 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 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))) (+.f64 (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))))
(* -1/2 (* (sqrt re) (* (pow (sqrt -1) 2) (sqrt 2))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)))
(* -1 (* re (+ (* 1/4 (* (* im (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))))))
(* -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 #s(literal 0 binary64) re) (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 im im) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)))))))
(* -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 #s(literal 0 binary64) re) (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 im im) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))))) (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (*.f64 im im))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 4 binary64))))))))
(* (sqrt re) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 re))
(+ (* 1/2 (* (* im (sqrt 2)) (sqrt (/ 1 re)))) (* (sqrt re) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 re)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(+ (* 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 #s(literal 2 binary64)) (sqrt.f64 re)) (*.f64 im (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))))))
(+ (* 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 #s(literal 2 binary64)) (sqrt.f64 re)) (*.f64 im (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.f64 im (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(*.f64 im (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))))
(* 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 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re))) #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 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re))) #s(literal -1/8 binary64)) (+.f64 (+.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (*.f64 re re))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(* -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 #s(literal 0 binary64) (*.f64 im (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im 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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re re) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)))))) (-.f64 #s(literal 0 binary64) 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 (+.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re re) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64)))) (/.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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))))) (-.f64 #s(literal 0 binary64) im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* 1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 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 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) #s(literal -1/8 binary64)))))
(+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 re (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) #s(literal -1/8 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))))))))))
(* (sqrt re) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 re))
(* 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 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))))
(* 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 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (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 #s(literal -1/8 binary64) (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))) (+.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64))))))))))
(* -1 (* (sqrt re) (* (pow (sqrt -1) 2) (sqrt 2))))
(*.f64 (*.f64 #s(literal 1 binary64) (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 #s(literal 0 binary64) re) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re 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 #s(literal 0 binary64) re) (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 im im) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)))))))
(* -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 (-.f64 #s(literal 0 binary64) re) (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 im im) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))))) (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (*.f64 im im))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 4 binary64))))))))
(* 2 re)
(*.f64 #s(literal 2 binary64) 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) (* 2 re))
(*.f64 #s(literal 2 binary64) (+.f64 im re))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* 2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im)))
(* im (+ 2 (* 2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im)))
(* im (+ 2 (* 2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im)))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* -1 (* im (- (* -2 (/ re im)) 2)))
(*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) re) im) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (- (* -2 (/ re im)) 2)))
(*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) re) im) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (- (* -2 (/ re im)) 2)))
(*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) re) im) #s(literal -2 binary64)) (-.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) (* 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 #s(literal 2 binary64) re)
(* re (+ 2 (* 2 (/ im re))))
(*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 im #s(literal 2 binary64)) re)))
(* re (+ 2 (* 2 (/ im re))))
(*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 im #s(literal 2 binary64)) re)))
(* re (+ 2 (* 2 (/ im re))))
(*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 im #s(literal 2 binary64)) re)))
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
(* -1 (* re (- (* -2 (/ im re)) 2)))
(-.f64 #s(literal 0 binary64) (*.f64 re (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 im re)) #s(literal -2 binary64))))
(* -1 (* re (- (* -2 (/ im re)) 2)))
(-.f64 #s(literal 0 binary64) (*.f64 re (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 im re)) #s(literal -2 binary64))))
(* -1 (* re (- (* -2 (/ im re)) 2)))
(-.f64 #s(literal 0 binary64) (*.f64 re (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 im re)) #s(literal -2 binary64))))
re
(+ im re)
(+.f64 im re)
(+ im re)
(+.f64 im re)
(+ im re)
(+.f64 im 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 (/ 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 im re)
(+ im re)
(+.f64 im re)
(+ im re)
(+.f64 im re)
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 #s(literal 0 binary64) (*.f64 re (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) #s(literal -1 binary64))))
(* -1 (* re (- (* -1 (/ im re)) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 re (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) #s(literal -1 binary64))))
(* -1 (* re (- (* -1 (/ im re)) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 re (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) #s(literal -1 binary64))))
(* 1/2 (* (sqrt (/ 1 im)) re))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re))
(/ (+ (* 1/2 (sqrt (pow im 3))) (* 1/2 (* (sqrt im) re))) im)
(/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 (sqrt.f64 im) re))) im)
(/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* 1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re)))))) im)
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) re)) (*.f64 (*.f64 im im) (*.f64 #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 (sqrt.f64 im) re)) (*.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 im (*.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)))))))
(* 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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 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 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/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))))))))
(* -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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64)))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64)))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal -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 #s(literal 0 binary64) (*.f64 im (-.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64)))))) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re))) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re))) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64)))))) (*.f64 im (*.f64 im im))))))
(* 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 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/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/4 binary64) (/.f64 (*.f64 (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)))) (*.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 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 #s(literal 1/4 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
(* 1/2 (* (sqrt (/ 1 im)) re))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re))
(* re (+ (* 1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re)))))
(*.f64 re (*.f64 #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 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 im) (-.f64 (*.f64 im #s(literal 2 binary64)) 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 (*.f64 #s(literal 1/2 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) re))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 im) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) (*.f64 re re)))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (/.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) im) (*.f64 re (*.f64 re re)))))))
(* -1/2 (* (sqrt (/ 1 im)) re))
(*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re))
(* -1 (* re (+ (* 1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re))))))
(*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 #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 (-.f64 #s(literal 0 binary64) 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 im #s(literal 2 binary64)) 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 #s(literal 0 binary64) 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 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (/.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) im) re))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 im)) (-.f64 (*.f64 im #s(literal 2 binary64)) im))) re)) re)))
(* (sqrt (/ 1 im)) re)
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re)
(/ (+ (sqrt (pow im 3)) (* (sqrt im) re)) im)
(/.f64 (+.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 (sqrt.f64 im) re)) im)
(/ (+ (* (sqrt im) re) (* (pow im 2) (+ (sqrt (/ 1 im)) (* (sqrt im) (/ 1 re))))) im)
(/.f64 (+.f64 (*.f64 (sqrt.f64 im) re) (*.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 (sqrt.f64 im) re) (*.f64 (*.f64 im im) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 im (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re)))))) im)
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* 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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 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 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (-.f64 #s(literal 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal -1 binary64))) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64))))) (/.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re))) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64)))))) (*.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* (sqrt im) (sqrt 2)) (* (sqrt (/ 1 im)) (/ re (sqrt 2))))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))
(+ (* re (+ (* 1/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 im) (sqrt.f64 #s(literal 2 binary64))) (*.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) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))))
(+ (* 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 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
(* (sqrt (/ 1 im)) re)
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re)
(* 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 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 im) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) (*.f64 re re))))))
(* re (+ (sqrt (/ 1 im)) (+ (* -1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (+.f64 (/.f64 (sqrt.f64 im) re) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 im) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) (*.f64 re re)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (/.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) im) (*.f64 re (*.f64 re re))))))))
(* -1 (* (sqrt (/ 1 im)) re))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* (sqrt im) (/ 1 re)))))
(*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) re)))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (* -1 (sqrt im)) (* -1/2 (* (sqrt im) (/ (- (* 2 im) im) re)))) re)))))
(*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 im) (/.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) im) re))) (sqrt.f64 im)) 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 #s(literal 0 binary64) re) (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 im)) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (/.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) im) re))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (-.f64 (*.f64 im #s(literal 2 binary64)) im))) re)) re)))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(/ (+ (* 2 (* im re)) (pow re 2)) im)
(/.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im re))) im)
(/ (+ (* im (+ (* 2 im) (* 2 re))) (pow re 2)) im)
(/.f64 (+.f64 (*.f64 re re) (*.f64 im (*.f64 #s(literal 2 binary64) (+.f64 im re)))) im)
(/ (+ (* im (+ (* 2 im) (* 2 re))) (pow re 2)) im)
(/.f64 (+.f64 (*.f64 re re) (*.f64 im (*.f64 #s(literal 2 binary64) (+.f64 im re)))) im)
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* 2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im)))
(* im (+ 2 (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im)) (/.f64 (*.f64 re re) (*.f64 im im))))
(* im (+ 2 (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im)) (/.f64 (*.f64 re re) (*.f64 im im))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* -1 (* im (- (* -2 (/ re im)) 2)))
(*.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) re) im) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (- (* -1 (/ (+ (* 2 re) (/ (pow re 2) im)) im)) 2)))
(*.f64 (+.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) re) (/.f64 (*.f64 re re) im)) (-.f64 #s(literal 0 binary64) im)) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (- (* -1 (/ (+ (* 2 re) (/ (pow re 2) im)) im)) 2)))
(*.f64 (+.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) re) (/.f64 (*.f64 re re) im)) (-.f64 #s(literal 0 binary64) im)) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* 2 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 im))))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(* (pow re 2) (+ (/ 1 im) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 2 binary64) re)))
(* (pow re 2) (+ (* 2 (/ im (pow re 2))) (+ (/ 1 im) (* 2 (/ 1 re)))))
(*.f64 (*.f64 re re) (+.f64 (+.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re)) (/.f64 #s(literal 1 binary64) im)) (/.f64 #s(literal 2 binary64) re)))
(* (pow re 2) (+ (* 2 (/ im (pow re 2))) (+ (/ 1 im) (* 2 (/ 1 re)))))
(*.f64 (*.f64 re re) (+.f64 (+.f64 (/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re)) (/.f64 #s(literal 1 binary64) im)) (/.f64 #s(literal 2 binary64) re)))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(* (pow re 2) (+ (/ 1 im) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 2 binary64) re)))
(* (pow re 2) (+ (* -1 (/ (- (* -2 (/ im re)) 2) re)) (/ 1 im)))
(*.f64 (*.f64 re re) (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 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 #s(literal -2 binary64) (/.f64 im re)) #s(literal -2 binary64)) re)))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (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/16 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 re (+.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))))) (*.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))))))))
(* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))
(*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 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 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 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 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))) (*.f64 (*.f64 #s(literal -1/32 binary64) (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 #s(literal -1/32 binary64) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))) (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))) (*.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))))))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 im (*.f64 (*.f64 (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/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 #s(literal 1/2 binary64) (*.f64 im (*.f64 (*.f64 (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))))) (*.f64 #s(literal 1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.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))))))
(+ (* -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 #s(literal 1/2 binary64) (*.f64 im (*.f64 (*.f64 (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))))) (/.f64 (+.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))))) (*.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 #s(literal 1/2 binary64) (*.f64 im (*.f64 (*.f64 (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))))) (/.f64 (+.f64 (*.f64 #s(literal -1/32 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal 1/64 binary64) (*.f64 (/.f64 (*.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 #s(literal 1/1024 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 (*.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 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/2 binary64) (*.f64 #s(literal 2 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/2 binary64) (*.f64 #s(literal 2 binary64) (sqrt.f64 re))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))))
(+ (* 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/2 binary64) (*.f64 #s(literal 2 binary64) (sqrt.f64 re))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (+.f64 (/.f64 #s(literal 1/16 binary64) (*.f64 #s(literal 2 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1/8 binary64) (*.f64 re (*.f64 re re))))))) (*.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/2 binary64) (*.f64 #s(literal 2 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 (*.f64 im im) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (+.f64 (/.f64 #s(literal 1/16 binary64) (*.f64 #s(literal 2 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1/8 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 im im) (*.f64 (-.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/16 binary64) (*.f64 #s(literal 2 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1/8 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(* im (+ (* 1/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 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))) (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re))))))
(* 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 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re))) #s(literal -1/16 binary64)) (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))))
(* -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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (*.f64 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (*.f64 (*.f64 (sqrt.f64 im) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 re re))) #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)))
(+ (* (sqrt im) (sqrt 2)) (* (sqrt (/ 1 im)) (/ re (sqrt 2))))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))
(+ (* re (+ (* 1/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 im) (sqrt.f64 #s(literal 2 binary64))) (*.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) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))))
(+ (* 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 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
(* 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 (*.f64 #s(literal 1/4 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 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 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.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 #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))))) (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.f64 (*.f64 #s(literal -1/64 binary64) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 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/8 (* (* (pow im 3) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))))
(+ (* -1 (/ (+ (* -1/8 (* (* (pow im 3) (sqrt -1)) (sqrt re))) (* 1/16 (* (* (pow im 5) (sqrt -1)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 re)))) (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 im #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))))) (*.f64 re (*.f64 re re))))
(+ (* -1 (/ (+ (* -1/8 (* (* (pow im 3) (sqrt -1)) (sqrt re))) (+ (* 1/128 (* (* (pow im 5) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/16 (* (* (pow im 5) (sqrt -1)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 im (*.f64 im im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 re)))) (*.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))) #s(literal 9/128 binary64))) (*.f64 re (*.f64 re 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 (*.f64 #s(literal 1/4 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))))
(+ (* 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 (*.f64 im im) (+.f64 (*.f64 (*.f64 #s(literal -5/64 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64))))) (*.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) (+ (* -5/64 (sqrt (/ 1 (pow re 7)))) (* 21/512 (* (pow im 2) (sqrt (/ 1 (pow re 11))))))))))
(+.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (*.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 (*.f64 #s(literal 21/512 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 11 binary64))))))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* 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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 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 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 im)))
(* -1 (* im (+ (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))) (* (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 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (+ (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))) (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))))))
(*.f64 (+.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt 2) 3))))) (pow im 3))) (+ (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))) (* (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 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(* 1/2 (log (* 2 im)))
(*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 im #s(literal 2 binary64))))
(+ (* 1/2 (log (* 2 im))) (* 1/2 (/ re im)))
(*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 re im) (log.f64 (*.f64 im #s(literal 2 binary64)))))
(+ (* 1/2 (log (* 2 im))) (* re (+ (* -1/12 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 im #s(literal 2 binary64)))) (*.f64 re (+.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))))))
(+ (* 1/2 (log (* 2 im))) (* re (+ (* (pow re 2) (- (* 3/80 (/ (pow re 2) (pow im 5))) (* 1/12 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 im #s(literal 2 binary64)))) (*.f64 re (+.f64 (/.f64 #s(literal 1/2 binary64) im) (*.f64 (*.f64 re re) (+.f64 (/.f64 (*.f64 #s(literal 3/80 binary64) (*.f64 re re)) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal -1/12 binary64) (*.f64 im (*.f64 im im))))))))
(* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))
(+ (* 1/8 (/ (pow im 2) (pow re 2))) (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re))) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (*.f64 re re)))
(+ (* 1/48 (/ (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))) (pow re 4))) (+ (* 1/8 (/ (pow im 2) (pow re 2))) (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))))
(+.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (*.f64 re re))) (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re))))
(+ (* 1/1440 (/ (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6)))) (pow re 6))) (+ (* 1/48 (/ (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))) (pow re 4))) (+ (* 1/8 (/ (pow im 2) (pow re 2))) (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))))
(+.f64 (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (*.f64 re re))) (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (*.f64 #s(literal 1/1440 binary64) (/.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 15/4 binary64)) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 135/4 binary64))) (pow.f64 re #s(literal 6 binary64)))))
(* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))
(+ (* -1/8 (/ (pow im 2) (pow re 2))) (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im)))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (*.f64 re re)))
(+ (* -1/8 (/ (pow im 2) (pow re 2))) (+ (* 1/48 (/ (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))) (pow re 4))) (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))))
(+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im)))))
(+ (* -1/8 (/ (pow im 2) (pow re 2))) (+ (* 1/1440 (/ (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))) (pow re 6))) (+ (* 1/48 (/ (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))) (pow re 4))) (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))))
(+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (*.f64 re re)) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/1440 binary64) (+.f64 (/.f64 (*.f64 #s(literal -720 binary64) (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64))) (*.f64 im im)) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 75/4 binary64)))) (pow.f64 re #s(literal 6 binary64))) (/.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))))
(* 1/2 (log (* 4 re)))
(*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 re #s(literal 4 binary64))))
(+ (* 1/8 (/ (pow im 2) (pow re 2))) (* 1/2 (log (* 4 re))))
(+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (*.f64 re re)) (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 re #s(literal 4 binary64)))))
(+ (* 1/2 (log (* 4 re))) (* (pow im 2) (+ (* -3/64 (/ (pow im 2) (pow re 4))) (* 1/8 (/ 1 (pow re 2))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 re #s(literal 4 binary64)))) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -3/64 binary64) (*.f64 im im)) (pow.f64 re #s(literal 4 binary64))) (/.f64 #s(literal 1/8 binary64) (*.f64 re re)))))
(+ (* 1/2 (log (* 4 re))) (* (pow im 2) (+ (* (pow im 2) (- (* 5/192 (/ (pow im 2) (pow re 6))) (* 3/64 (/ 1 (pow re 4))))) (* 1/8 (/ 1 (pow re 2))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 re #s(literal 4 binary64)))) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1/8 binary64) (*.f64 re re)) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal 5/192 binary64) (*.f64 im im)) (pow.f64 re #s(literal 6 binary64))) (/.f64 #s(literal -3/64 binary64) (pow.f64 re #s(literal 4 binary64))))))))
(* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))
(+ (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))) (* 1/2 (/ re im)))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (+.f64 (/.f64 re im) (log.f64 im))))
(+ (* 1/4 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow im 2))) (+ (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))) (* 1/2 (/ re im))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (+.f64 (/.f64 re im) (log.f64 im)))) (/.f64 #s(literal 0 binary64) (*.f64 im im)))
(+ (* 1/12 (/ (+ (* -3 (pow re 3)) (* 2 (pow re 3))) (pow im 3))) (+ (* 1/4 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow im 2))) (+ (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))) (* 1/2 (/ re im)))))
(+.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (+.f64 (/.f64 re im) (log.f64 im)))) (/.f64 #s(literal 0 binary64) (*.f64 im im))) (*.f64 #s(literal 1/12 binary64) (/.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1 binary64)) (*.f64 im (*.f64 im im)))))
(* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))
(+ (* -1/2 (/ re im)) (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))) (*.f64 #s(literal -1/2 binary64) (/.f64 re im)))
(+ (* -1 (/ (+ (* -1/4 (/ (+ (* -1 (pow re 2)) (pow re 2)) im)) (* 1/2 re)) im)) (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))) (/.f64 (+.f64 (/.f64 #s(literal 0 binary64) im) (*.f64 #s(literal 1/2 binary64) re)) im))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -1/12 (/ (+ (* -3 (pow re 3)) (* 2 (pow re 3))) im)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2)))) im)) (* 1/2 re)) im)) (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) re) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/12 binary64) (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1 binary64))) im) #s(literal 0 binary64)) im)) im))
(log (* 2 im))
(log.f64 (*.f64 im #s(literal 2 binary64)))
(+ (log (* 2 im)) (/ re im))
(+.f64 (/.f64 re im) (log.f64 (*.f64 im #s(literal 2 binary64))))
(+ (log (* 2 im)) (* re (+ (* -1/6 (/ (pow re 2) (pow im 3))) (/ 1 im))))
(+.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))))))
(+ (log (* 2 im)) (* re (+ (* (pow re 2) (- (* 3/40 (/ (pow re 2) (pow im 5))) (* 1/6 (/ 1 (pow im 3))))) (/ 1 im))))
(+.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (*.f64 (*.f64 re re) (+.f64 (/.f64 (*.f64 #s(literal 3/40 binary64) (*.f64 re re)) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal -1/6 binary64) (*.f64 im (*.f64 im im))))))))
(+ (log 4) (* -1 (log (/ 1 re))))
(+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re))
(+ (log 4) (+ (* -1 (log (/ 1 re))) (* 1/4 (/ (pow im 2) (pow re 2)))))
(+.f64 (log.f64 #s(literal 4 binary64)) (+.f64 (log.f64 re) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im im)) (*.f64 re re))))
(+ (log 4) (+ (* -1 (log (/ 1 re))) (+ (* 1/24 (/ (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))) (pow re 4))) (* 1/4 (/ (pow im 2) (pow re 2))))))
(+.f64 (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im im)) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64))) (pow.f64 re #s(literal 4 binary64)))))
(+ (log 4) (+ (* -1 (log (/ 1 re))) (+ (* 1/720 (/ (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6)))) (pow re 6))) (+ (* 1/24 (/ (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))) (pow re 4))) (* 1/4 (/ (pow im 2) (pow re 2)))))))
(+.f64 (log.f64 #s(literal 4 binary64)) (+.f64 (log.f64 re) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im im)) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (*.f64 (/.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 15/4 binary64)) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 135/4 binary64))) (pow.f64 re #s(literal 6 binary64))) #s(literal 1/720 binary64)))))
(+ (log (/ -1 re)) (log (pow im 2)))
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im)))
(+ (log (/ -1 re)) (+ (log (pow im 2)) (* -1/4 (/ (pow im 2) (pow re 2)))))
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (+.f64 (log.f64 (*.f64 im im)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (*.f64 re re))))
(+ (log (/ -1 re)) (+ (log (pow im 2)) (+ (* -1/4 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))) (pow re 4))))))
(+.f64 (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64))) (pow.f64 re #s(literal 4 binary64)))))
(+ (log (/ -1 re)) (+ (log (pow im 2)) (+ (* -1/4 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))) (pow re 6))) (* 1/24 (/ (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))) (pow re 4)))))))
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (+.f64 (+.f64 (log.f64 (*.f64 im im)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (*.f64 re re))) (+.f64 (/.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 1/720 binary64) (+.f64 (/.f64 (*.f64 #s(literal -720 binary64) (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64))) (*.f64 im im)) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 75/4 binary64)))) (pow.f64 re #s(literal 6 binary64))))))
(log (* 4 re))
(log.f64 (*.f64 re #s(literal 4 binary64)))
(+ (log (* 4 re)) (* 1/4 (/ (pow im 2) (pow re 2))))
(+.f64 (log.f64 (*.f64 re #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im im)) (*.f64 re re)))
(+ (log (* 4 re)) (* (pow im 2) (+ (* -3/32 (/ (pow im 2) (pow re 4))) (* 1/4 (/ 1 (pow re 2))))))
(+.f64 (log.f64 (*.f64 re #s(literal 4 binary64))) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -3/32 binary64) (*.f64 im im)) (pow.f64 re #s(literal 4 binary64))) (/.f64 #s(literal 1/4 binary64) (*.f64 re re)))))
(+ (log (* 4 re)) (* (pow im 2) (+ (* (pow im 2) (- (* 5/96 (/ (pow im 2) (pow re 6))) (* 3/32 (/ 1 (pow re 4))))) (* 1/4 (/ 1 (pow re 2))))))
(+.f64 (log.f64 (*.f64 re #s(literal 4 binary64))) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 re re)) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal 5/96 binary64) (*.f64 im im)) (pow.f64 re #s(literal 6 binary64))) (/.f64 #s(literal -3/32 binary64) (pow.f64 re #s(literal 4 binary64))))))))
(+ (log 2) (* -1 (log (/ 1 im))))
(+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))
(+ (log 2) (+ (* -1 (log (/ 1 im))) (/ re im)))
(+.f64 (log.f64 #s(literal 2 binary64)) (+.f64 (/.f64 re im) (log.f64 im)))
(+ (log 2) (+ (* -1 (log (/ 1 im))) (+ (* 1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow im 2))) (/ re im))))
(+.f64 (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)) (+.f64 (/.f64 re im) (/.f64 #s(literal 0 binary64) (*.f64 im im))))
(+ (log 2) (+ (* -1 (log (/ 1 im))) (+ (* 1/6 (/ (+ (* -3 (pow re 3)) (* 2 (pow re 3))) (pow im 3))) (+ (* 1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow im 2))) (/ re im)))))
(+.f64 (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)) (+.f64 (+.f64 (/.f64 re im) (/.f64 #s(literal 0 binary64) (*.f64 im im))) (*.f64 (/.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1 binary64)) (*.f64 im (*.f64 im im))) #s(literal 1/6 binary64))))
(+ (log 2) (* -1 (log (/ -1 im))))
(-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))
(+ (log 2) (+ (* -1 (log (/ -1 im))) (* -1 (/ re im))))
(-.f64 (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))) (/.f64 re im))
(+ (log 2) (+ (* -1 (log (/ -1 im))) (* -1 (/ (+ re (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) im))) im))))
(-.f64 (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))) (/.f64 (+.f64 re (/.f64 #s(literal 0 binary64) im)) im))
(+ (log 2) (+ (* -1 (log (/ -1 im))) (* -1 (/ (+ re (* -1 (/ (+ (* -1/6 (/ (+ (* -3 (pow re 3)) (* 2 (pow re 3))) im)) (* 1/2 (+ (* -1 (pow re 2)) (pow re 2)))) im))) im))))
(-.f64 (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))) (/.f64 (-.f64 re (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1 binary64))) im) #s(literal 0 binary64)) im)) im))
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
(* 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 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im re))) im)
(/ (+ (* 2 (* im re)) (pow re 2)) im)
(/.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im re))) im)
(/ (+ (* 2 (* im re)) (pow re 2)) im)
(/.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im re))) im)
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
(+ (* 2 re) (/ (pow re 2) im))
(+.f64 (*.f64 #s(literal 2 binary64) re) (/.f64 (*.f64 re re) im))
(+ (* 2 re) (/ (pow re 2) im))
(+.f64 (*.f64 #s(literal 2 binary64) re) (/.f64 (*.f64 re re) im))
(+ (* 2 re) (/ (pow re 2) im))
(+.f64 (*.f64 #s(literal 2 binary64) re) (/.f64 (*.f64 re re) im))
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
(+ (* 2 re) (/ (pow re 2) im))
(+.f64 (*.f64 #s(literal 2 binary64) re) (/.f64 (*.f64 re re) im))
(+ (* 2 re) (/ (pow re 2) im))
(+.f64 (*.f64 #s(literal 2 binary64) re) (/.f64 (*.f64 re re) im))
(+ (* 2 re) (/ (pow re 2) im))
(+.f64 (*.f64 #s(literal 2 binary64) re) (/.f64 (*.f64 re re) im))

eval156.0ms (1.5%)

Compiler

Compiled 25285 to 3652 computations (85.6% saved)

prune124.0ms (1.2%)

Pruning

19 alts after pruning (15 fresh and 4 done)

PrunedKeptTotal
New92412936
Fresh033
Picked235
Done011
Total92619945
Accuracy
92.6%
Counts
945 → 19
Alt Table
Click to see full alt table
StatusAccuracyProgram
14.7%
(pow.f64 (*.f64 re re) #s(literal 1/4 binary64))
15.4%
(*.f64 (pow.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 im im)) re) #s(literal 1/2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
79.7%
(*.f64 (sqrt.f64 (+.f64 re (hypot.f64 re im))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
72.9%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (exp.f64 #s(literal 1/2 binary64)) (exp.f64 #s(literal 1/2 binary64))) (/.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 2 binary64))))
74.7%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 2 binary64)))) #s(literal 2 binary64)))
74.2%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))))
34.1%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im (*.f64 #s(literal 2 binary64) (+.f64 im re)))) im)))
14.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))))
55.2%
(*.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))))))
44.5%
(*.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))))))))))
55.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
80.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
57.4%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re))))
70.3%
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 3 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (-.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 (+.f64 re (hypot.f64 re im))) (log.f64 #s(literal 2 binary64)))))))))
16.1%
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))))
51.5%
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))
51.7%
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 im #s(literal 2 binary64))))))
74.7%
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))))
25.1%
(sqrt.f64 re)
Compiler

Compiled 543 to 373 computations (31.3% saved)

simplify205.0ms (1.9%)

Algorithm
egg-herbie
Localize:

Found 17 expressions of interest:

NewMetricScoreProgram
cost-diff0
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im)))
cost-diff0
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))
cost-diff12864
(exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im)))))
cost-diff12864
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))))
cost-diff0
(log.f64 (*.f64 im #s(literal 2 binary64)))
cost-diff0
(*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 im #s(literal 2 binary64))))
cost-diff6464
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 im #s(literal 2 binary64)))))
cost-diff6464
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 im #s(literal 2 binary64))))))
cost-diff-64
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))))
cost-diff0
(*.f64 im im)
cost-diff0
(/.f64 (*.f64 im im) re)
cost-diff0
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
cost-diff0
(sqrt.f64 re)
cost-diff0
(hypot.f64 re im)
cost-diff0
(+.f64 re (hypot.f64 re im))
cost-diff0
(sqrt.f64 (+.f64 re (hypot.f64 re im)))
cost-diff0
(*.f64 (sqrt.f64 (+.f64 re (hypot.f64 re im))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
Rules
1528×fnmadd-define
1220×fmsub-define
1186×sum3-define
1162×fnmsub-define
1136×fma-define
Iterations

Useful iterations: 17 (0.0ms)

IterNodesCost
032158
161154
2100152
3147152
4193152
5229152
6299152
7321152
8386152
9785152
10881152
111021152
121420152
131975152
142491150
152540150
162595150
172657146
182742146
192947146
203649146
214785146
225607146
236295146
246551146
256607146
266638146
276638146
06638146
Stop Event
iter limit
saturated
Calls
Call 1
Inputs
(* (sqrt (+ re (sqrt (+ (* re re) (* im im))))) (* 1/2 (sqrt 2)))
(sqrt (+ re (sqrt (+ (* re re) (* im im)))))
(+ re (sqrt (+ (* re re) (* im im))))
re
(sqrt (+ (* re re) (* im im)))
im
(* 1/2 (sqrt 2))
1/2
(sqrt 2)
2
(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 (exp (* 1/2 (log (* im 2)))))
1/2
(exp (* 1/2 (log (* im 2))))
(* 1/2 (log (* im 2)))
(log (* im 2))
(* im 2)
im
2
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (log (* im im))))))
1/2
(exp (* 1/2 (+ (log (/ -1 re)) (log (* im im)))))
(* 1/2 (+ (log (/ -1 re)) (log (* im im))))
(+ (log (/ -1 re)) (log (* im im)))
(log (/ -1 re))
(/ -1 re)
-1
re
(log (* im im))
(* im im)
im
Outputs
(* (sqrt (+ re (sqrt (+ (* re re) (* im im))))) (* 1/2 (sqrt 2)))
(*.f64 (sqrt.f64 (+.f64 re (hypot.f64 re im))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(sqrt (+ re (sqrt (+ (* re re) (* im im)))))
(sqrt.f64 (+.f64 re (hypot.f64 re im)))
(+ 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))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
1/2
#s(literal 1/2 binary64)
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(sqrt re)
(sqrt.f64 re)
re
(* 1/2 (sqrt (- 0 (/ (* im im) re))))
(/.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 re (*.f64 im im))) #s(literal 1/2 binary64)))
1/2
#s(literal 1/2 binary64)
(sqrt (- 0 (/ (* im im) re)))
(pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 re (*.f64 im im))) #s(literal -1/2 binary64))
(- 0 (/ (* im im) re))
(/.f64 im (/.f64 re (-.f64 #s(literal 0 binary64) im)))
0
#s(literal 0 binary64)
(/ (* im im) re)
(/.f64 im (/.f64 re im))
(* im im)
(*.f64 im im)
im
re
(* 1/2 (exp (* 1/2 (log (* im 2)))))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/2 binary64)))
1/2
#s(literal 1/2 binary64)
(exp (* 1/2 (log (* im 2))))
(pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/2 binary64))
(* 1/2 (log (* im 2)))
(*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 im #s(literal 2 binary64))))
(log (* im 2))
(log.f64 (*.f64 im #s(literal 2 binary64)))
(* im 2)
(*.f64 im #s(literal 2 binary64))
im
2
#s(literal 2 binary64)
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (log (* im im))))))
(/.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 re (*.f64 im im))) #s(literal 1/2 binary64)))
1/2
#s(literal 1/2 binary64)
(exp (* 1/2 (+ (log (/ -1 re)) (log (* im im)))))
(pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 re (*.f64 im im))) #s(literal -1/2 binary64))
(* 1/2 (+ (log (/ -1 re)) (log (* im im))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))
(+ (log (/ -1 re)) (log (* im im)))
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im)))
(log (/ -1 re))
(log.f64 (/.f64 #s(literal -1 binary64) re))
(/ -1 re)
(/.f64 #s(literal -1 binary64) re)
-1
#s(literal -1 binary64)
re
(log (* im im))
(log.f64 (*.f64 im im))
(* im im)
(*.f64 im im)
im

localize180.0ms (1.7%)

Localize:

Found 17 expressions of interest:

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

Compiled 174 to 31 computations (82.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 61.0ms
ival-mult: 19.0ms (31% of total)
ival-sqrt: 10.0ms (16.3% of total)
ival-log: 9.0ms (14.7% of total)
compiled-spec: 9.0ms (14.7% of total)
ival-exp: 5.0ms (8.2% of total)
ival-div: 4.0ms (6.5% of total)
ival-add: 4.0ms (6.5% of total)
ival-sub: 1.0ms (1.6% of total)
const: 1.0ms (1.6% of total)
backward-pass: 0.0ms (0% of total)

series231.0ms (2.2%)

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

96 calls:

TimeVariablePointExpression
80.0ms
im
@0
(* 1/2 (log (* im 2)))
44.0ms
re
@0
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (log (* im im))))))
35.0ms
im
@0
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (log (* im im))))))
17.0ms
im
@-inf
(* 1/2 (log (* im 2)))
12.0ms
re
@-inf
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (log (* im im))))))

rewrite257.0ms (2.4%)

Algorithm
batch-egg-rewrite
Rules
2208×*-lowering-*.f32
2208×*-lowering-*.f64
1834×/-lowering-/.f32
1834×/-lowering-/.f64
1270×+-lowering-+.f64
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
032153
1138134
2102084
01085484
Stop Event
iter limit
node limit
Counts
22 → 515
Calls
Call 1
Inputs
(* (sqrt (+ re (sqrt (+ (* re re) (* im im))))) (* 1/2 (sqrt 2)))
(sqrt (+ re (sqrt (+ (* re re) (* im im)))))
(+ re (sqrt (+ (* re re) (* im im))))
(sqrt (+ (* re re) (* im im)))
(sqrt re)
(- 0 (/ (* im im) re))
(/ (* im im) re)
(* im im)
(* 1/2 (sqrt (- 0 (/ (* im im) re))))
(* 1/2 (exp (* 1/2 (log (* im 2)))))
(exp (* 1/2 (log (* im 2))))
(* 1/2 (log (* im 2)))
(log (* im 2))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (log (* im im))))))
(exp (* 1/2 (+ (log (/ -1 re)) (log (* im im)))))
(* 1/2 (+ (log (/ -1 re)) (log (* im im))))
(+ (log (/ -1 re)) (log (* im im)))
(sqrt 2)
(* 1/2 (sqrt 2))
(sqrt (- 0 (/ (* im im) re)))
(log (* im im))
(log (/ -1 re))
Outputs
(*.f64 (sqrt.f64 (+.f64 re (hypot.f64 re #s(literal 1 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (+.f64 re (hypot.f64 re #s(literal 1 binary64))) #s(literal 2 binary64))))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (+.f64 re (hypot.f64 re #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (+.f64 re (hypot.f64 re #s(literal 1 binary64)))))
(*.f64 (*.f64 (sqrt.f64 (+.f64 re (hypot.f64 re #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (sqrt.f64 (+.f64 re (hypot.f64 re #s(literal 1 binary64)))) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (+.f64 re (hypot.f64 re #s(literal 1 binary64))) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (+.f64 re (hypot.f64 re #s(literal 1 binary64))) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(*.f64 (sqrt.f64 (*.f64 (+.f64 re (hypot.f64 re #s(literal 1 binary64))) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re #s(literal 1 binary64)))) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 re (hypot.f64 re #s(literal 1 binary64))) #s(literal 1/4 binary64))) (pow.f64 (+.f64 re (hypot.f64 re #s(literal 1 binary64))) #s(literal 1/4 binary64)))
(*.f64 (*.f64 (*.f64 (sqrt.f64 (+.f64 re (hypot.f64 re #s(literal 1 binary64)))) #s(literal 1/2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (+.f64 re (hypot.f64 re #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(sqrt.f64 (+.f64 re (hypot.f64 re #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re #s(literal 1 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (*.f64 re (-.f64 re (hypot.f64 re #s(literal 1 binary64)))))) (sqrt.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) #s(literal 3/2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (-.f64 re (hypot.f64 re #s(literal 1 binary64)))) (sqrt.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) #s(literal 1 binary64))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) #s(literal 3/2 binary64)))) (sqrt.f64 (+.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (*.f64 re (-.f64 re (hypot.f64 re #s(literal 1 binary64)))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) #s(literal 1 binary64)))) (sqrt.f64 (-.f64 re (hypot.f64 re #s(literal 1 binary64)))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) #s(literal 3/2 binary64))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (*.f64 re (-.f64 re (hypot.f64 re #s(literal 1 binary64))))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 re (-.f64 #s(literal 0 binary64) re)) (+.f64 (*.f64 re re) #s(literal 1 binary64)))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (-.f64 re (hypot.f64 re #s(literal 1 binary64))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 re re) (-.f64 #s(literal 1 binary64) (*.f64 re re)))) (sqrt.f64 (-.f64 (hypot.f64 re #s(literal 1 binary64)) re)))
(/.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) #s(literal 3/2 binary64))))) (neg.f64 (sqrt.f64 (+.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (*.f64 re (-.f64 re (hypot.f64 re #s(literal 1 binary64))))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) #s(literal 1 binary64))))) (neg.f64 (sqrt.f64 (-.f64 re (hypot.f64 re #s(literal 1 binary64))))))
(pow.f64 (+.f64 re (hypot.f64 re #s(literal 1 binary64))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 re (hypot.f64 re #s(literal 1 binary64))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (+.f64 re (hypot.f64 re #s(literal 1 binary64))) (+.f64 re (hypot.f64 re #s(literal 1 binary64)))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 re (hypot.f64 re #s(literal 1 binary64))))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) #s(literal 3/2 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (*.f64 re (-.f64 re (hypot.f64 re #s(literal 1 binary64)))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) #s(literal 3/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (*.f64 re (-.f64 re (hypot.f64 re #s(literal 1 binary64))))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) #s(literal 3/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (*.f64 re (-.f64 re (hypot.f64 re #s(literal 1 binary64))))))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) #s(literal 1 binary64)))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 re (hypot.f64 re #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) #s(literal 1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 re (hypot.f64 re #s(literal 1 binary64))))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) #s(literal 1 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 re (hypot.f64 re #s(literal 1 binary64))))))
(*.f64 (pow.f64 (+.f64 re (hypot.f64 re #s(literal 1 binary64))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 re (hypot.f64 re #s(literal 1 binary64))) #s(literal 1/4 binary64)))
(+.f64 re (hypot.f64 re #s(literal 1 binary64)))
(+.f64 (hypot.f64 re #s(literal 1 binary64)) re)
(+.f64 (/.f64 (*.f64 re re) (-.f64 re (hypot.f64 re #s(literal 1 binary64)))) (neg.f64 (/.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (-.f64 re (hypot.f64 re #s(literal 1 binary64))))))
(-.f64 (/.f64 (*.f64 re re) (-.f64 re (hypot.f64 re #s(literal 1 binary64)))) (/.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (-.f64 re (hypot.f64 re #s(literal 1 binary64)))))
(-.f64 (/.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (-.f64 (hypot.f64 re #s(literal 1 binary64)) re)) (/.f64 (*.f64 re re) (-.f64 (hypot.f64 re #s(literal 1 binary64)) re)))
(fma.f64 (pow.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) #s(literal 1/4 binary64)) re)
(neg.f64 (/.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) #s(literal 3/2 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (*.f64 re (-.f64 re (hypot.f64 re #s(literal 1 binary64))))))))
(neg.f64 (/.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 re (hypot.f64 re #s(literal 1 binary64))))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) #s(literal 3/2 binary64)))) (+.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (*.f64 re (-.f64 re (hypot.f64 re #s(literal 1 binary64)))))))
(neg.f64 (/.f64 (+.f64 (*.f64 re (-.f64 #s(literal 0 binary64) re)) (+.f64 (*.f64 re re) #s(literal 1 binary64))) (-.f64 re (hypot.f64 re #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re #s(literal 1 binary64)))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (hypot.f64 re #s(literal 1 binary64)) re) (+.f64 (*.f64 re re) (-.f64 #s(literal 1 binary64) (*.f64 re re)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re #s(literal 1 binary64))))))
(/.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) #s(literal 3/2 binary64))) (+.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (*.f64 re (-.f64 re (hypot.f64 re #s(literal 1 binary64))))))
(/.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) #s(literal 1 binary64))) (-.f64 re (hypot.f64 re #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) #s(literal 3/2 binary64)))) (-.f64 #s(literal 0 binary64) (+.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (*.f64 re (-.f64 re (hypot.f64 re #s(literal 1 binary64)))))))
(/.f64 (+.f64 (*.f64 re (-.f64 #s(literal 0 binary64) re)) (+.f64 (*.f64 re re) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 re (hypot.f64 re #s(literal 1 binary64)))))
(/.f64 (+.f64 (*.f64 re re) (-.f64 #s(literal 1 binary64) (*.f64 re re))) (-.f64 (hypot.f64 re #s(literal 1 binary64)) re))
(/.f64 (-.f64 (*.f64 (*.f64 re re) (-.f64 re (hypot.f64 re #s(literal 1 binary64)))) (*.f64 (-.f64 re (hypot.f64 re #s(literal 1 binary64))) (+.f64 (*.f64 re re) #s(literal 1 binary64)))) (*.f64 (-.f64 re (hypot.f64 re #s(literal 1 binary64))) (-.f64 re (hypot.f64 re #s(literal 1 binary64)))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) #s(literal 3/2 binary64))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (*.f64 re (-.f64 re (hypot.f64 re #s(literal 1 binary64))))))))
(/.f64 (neg.f64 (+.f64 (*.f64 re (-.f64 #s(literal 0 binary64) re)) (+.f64 (*.f64 re re) #s(literal 1 binary64)))) (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 re (hypot.f64 re #s(literal 1 binary64))))))
(/.f64 (neg.f64 (+.f64 (*.f64 re re) (-.f64 #s(literal 1 binary64) (*.f64 re re)))) (neg.f64 (-.f64 (hypot.f64 re #s(literal 1 binary64)) re)))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 re re) (-.f64 re (hypot.f64 re #s(literal 1 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (-.f64 re (hypot.f64 re #s(literal 1 binary64)))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 re re) (-.f64 re (hypot.f64 re #s(literal 1 binary64)))) (/.f64 (*.f64 re re) (-.f64 re (hypot.f64 re #s(literal 1 binary64))))) (+.f64 (*.f64 (/.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (-.f64 re (hypot.f64 re #s(literal 1 binary64)))) (/.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (-.f64 re (hypot.f64 re #s(literal 1 binary64))))) (*.f64 (/.f64 (*.f64 re re) (-.f64 re (hypot.f64 re #s(literal 1 binary64)))) (/.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (-.f64 re (hypot.f64 re #s(literal 1 binary64))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 re re) (-.f64 re (hypot.f64 re #s(literal 1 binary64)))) (/.f64 (*.f64 re re) (-.f64 re (hypot.f64 re #s(literal 1 binary64))))) (*.f64 (/.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (-.f64 re (hypot.f64 re #s(literal 1 binary64)))) (/.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (-.f64 re (hypot.f64 re #s(literal 1 binary64)))))) (+.f64 (/.f64 (*.f64 re re) (-.f64 re (hypot.f64 re #s(literal 1 binary64)))) (/.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (-.f64 re (hypot.f64 re #s(literal 1 binary64))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re #s(literal 1 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 re (hypot.f64 re #s(literal 1 binary64))) (*.f64 (-.f64 re (hypot.f64 re #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 re (hypot.f64 re #s(literal 1 binary64))))))
(*.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re #s(literal 1 binary64))))
(*.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) #s(literal 3/2 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (*.f64 re (-.f64 re (hypot.f64 re #s(literal 1 binary64)))))))
(*.f64 (+.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (*.f64 re (-.f64 re (hypot.f64 re #s(literal 1 binary64))))) (*.f64 (+.f64 re (hypot.f64 re #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (*.f64 re (-.f64 re (hypot.f64 re #s(literal 1 binary64))))))))
(*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 re (hypot.f64 re #s(literal 1 binary64)))))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) #s(literal 3/2 binary64)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (*.f64 re (-.f64 re (hypot.f64 re #s(literal 1 binary64))))))))
(*.f64 (+.f64 (*.f64 re (-.f64 #s(literal 0 binary64) re)) (+.f64 (*.f64 re re) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (-.f64 re (hypot.f64 re #s(literal 1 binary64))))))
(*.f64 (+.f64 (*.f64 re re) (-.f64 #s(literal 1 binary64) (*.f64 re re))) (/.f64 #s(literal 1 binary64) (-.f64 (hypot.f64 re #s(literal 1 binary64)) re)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)))))
(hypot.f64 re #s(literal 1 binary64))
(hypot.f64 #s(literal 1 binary64) re)
(fabs.f64 (hypot.f64 re #s(literal 1 binary64)))
(sqrt.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) #s(literal 1 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (-.f64 #s(literal 1 binary64) (*.f64 re re)))) (hypot.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (*.f64 re re) #s(literal -1 binary64))) (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) #s(literal -1 binary64)))))
(/.f64 (hypot.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))) (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (-.f64 #s(literal 1 binary64) (*.f64 re re)))))
(/.f64 (hypot.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))) (sqrt.f64 (+.f64 #s(literal 1 binary64) (*.f64 (*.f64 re re) (+.f64 (*.f64 re re) #s(literal -1 binary64))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) #s(literal -1 binary64))) (sqrt.f64 (+.f64 (*.f64 re re) #s(literal -1 binary64))))
(/.f64 (sqrt.f64 (+.f64 #s(literal -1 binary64) (neg.f64 (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 re re)))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (-.f64 #s(literal 1 binary64) (*.f64 re re))))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) #s(literal -1 binary64)))) (sqrt.f64 (+.f64 (*.f64 re (-.f64 #s(literal 0 binary64) re)) #s(literal 1 binary64))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 (*.f64 re re) (*.f64 re re)))) (sqrt.f64 (-.f64 #s(literal 1 binary64) (*.f64 re re))))
(/.f64 (neg.f64 (hypot.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (-.f64 #s(literal 1 binary64) (*.f64 re re))))))
(/.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) #s(literal -1 binary64)))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 re re) #s(literal -1 binary64)))))
(pow.f64 (hypot.f64 re #s(literal 1 binary64)) #s(literal 1 binary64))
(pow.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) (+.f64 (*.f64 re re) #s(literal 1 binary64))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(*.f64 (hypot.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (-.f64 #s(literal 1 binary64) (*.f64 re re)))) #s(literal 1/2 binary64)))
(*.f64 (hypot.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (-.f64 #s(literal 1 binary64) (*.f64 re re))))))
(*.f64 (hypot.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) (-.f64 #s(literal 1 binary64) (*.f64 re re))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) #s(literal -1 binary64))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) #s(literal -1 binary64)))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re re)) #s(literal -1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (*.f64 re re) #s(literal -1 binary64)))))
(*.f64 (pow.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 re re) #s(literal 1 binary64)) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (hypot.f64 re #s(literal 1 binary64))) (sqrt.f64 (hypot.f64 re #s(literal 1 binary64))))
(exp.f64 (*.f64 (log.f64 re) #s(literal 1/2 binary64)))
(sqrt.f64 re)
(pow.f64 re #s(literal 1/2 binary64))
(pow.f64 (*.f64 re re) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 re #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 re)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 re #s(literal 1/4 binary64)) (pow.f64 re #s(literal 1/4 binary64)))
(+.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) re))
(+.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 0 binary64))
(exp.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)))
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 0 binary64) re)) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) re))
(-.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 0 binary64))
(fma.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1 binary64) #s(literal 0 binary64))
(fma.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) re) #s(literal 0 binary64))
(fma.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) re) #s(literal 0 binary64))
(fma.f64 (/.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re))) (*.f64 re re) #s(literal 0 binary64))
(fma.f64 (/.f64 (/.f64 #s(literal -1 binary64) re) re) re #s(literal 0 binary64))
(neg.f64 (/.f64 #s(literal 1 binary64) re))
(neg.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 1 binary64)))
(/.f64 (/.f64 #s(literal 1 binary64) re) #s(literal -1 binary64))
(/.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1 binary64))
(/.f64 (/.f64 #s(literal -1 binary64) re) (exp.f64 (/.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))))
(/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re))
(/.f64 #s(literal -1 binary64) re)
(/.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) re) (/.f64 (/.f64 #s(literal -1 binary64) re) re))
(/.f64 (/.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re))) (/.f64 (/.f64 #s(literal 1 binary64) re) re))
(/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) (/.f64 #s(literal -1 binary64) re))
(/.f64 (/.f64 (/.f64 #s(literal -1 binary64) re) re) (/.f64 #s(literal 1 binary64) re))
(/.f64 (exp.f64 (log.f64 #s(literal -1 binary64))) (exp.f64 (log.f64 re)))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) re))) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) (*.f64 re re)))
(/.f64 (+.f64 (/.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re))) #s(literal 0 binary64)) (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) (-.f64 #s(literal 0 binary64) (*.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 0 binary64)))))
(pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal -1 binary64))
(pow.f64 (exp.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))
(pow.f64 (exp.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal -1 binary64))
(*.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) re))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) re))
(*.f64 #s(literal -1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 1 binary64)))
(*.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) re) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -1 binary64) re) re)))
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re))) (*.f64 re re))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) (-.f64 #s(literal 0 binary64) re))
(*.f64 (/.f64 (/.f64 #s(literal -1 binary64) re) re) re)
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal -1/2 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal -1/2 binary64)))
(+.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) re))
(+.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 0 binary64))
(exp.f64 (*.f64 (log.f64 re) #s(literal -1 binary64)))
(fabs.f64 (/.f64 #s(literal 1 binary64) re))
(-.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) re))
(-.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 0 binary64))
(sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re))
(fma.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 1 binary64) #s(literal 0 binary64))
(fma.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) re) #s(literal 0 binary64))
(fma.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) re) #s(literal 0 binary64))
(neg.f64 (/.f64 #s(literal -1 binary64) re))
(/.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 #s(literal 0 binary64) re)))
(/.f64 #s(literal 1 binary64) re)
(/.f64 #s(literal 1 binary64) (sqrt.f64 (*.f64 re re)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -1 binary64) re) (/.f64 (/.f64 #s(literal -1 binary64) re) re)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (/.f64 #s(literal 1 binary64) re) re)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) re)))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) re))
(/.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) re) (/.f64 (/.f64 #s(literal 1 binary64) re) re))
(/.f64 (/.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re))) (/.f64 (/.f64 #s(literal -1 binary64) re) re))
(/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) (/.f64 #s(literal 1 binary64) re))
(/.f64 (/.f64 (/.f64 #s(literal -1 binary64) re) re) (/.f64 #s(literal -1 binary64) re))
(/.f64 (pow.f64 re #s(literal -1/2 binary64)) (sqrt.f64 re))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (*.f64 re (-.f64 #s(literal 0 binary64) re))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) (*.f64 re re)))) (pow.f64 (/.f64 (/.f64 #s(literal -1 binary64) re) re) #s(literal 1/2 binary64)))
(/.f64 (sqrt.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) (*.f64 re re))) (/.f64 #s(literal 1 binary64) re))
(/.f64 (sqrt.f64 (/.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) re) (*.f64 re (*.f64 re re)))) (sqrt.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) (*.f64 re re))))
(pow.f64 re #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 1 binary64))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) #s(literal 1/2 binary64))
(*.f64 re (/.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) re) (/.f64 #s(literal 1 binary64) re)))
(*.f64 re (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) #s(literal 1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 1 binary64))
(*.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 #s(literal 1 binary64) re)))
(*.f64 (/.f64 #s(literal -1 binary64) re) #s(literal -1 binary64))
(*.f64 (/.f64 #s(literal -1 binary64) re) (/.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 #s(literal -1 binary64) re)))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) re))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) re))
(*.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) re) (*.f64 re re))
(*.f64 (/.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re))) (*.f64 re (-.f64 #s(literal 0 binary64) re)))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) re)
(*.f64 (/.f64 (/.f64 #s(literal -1 binary64) re) re) (-.f64 #s(literal 0 binary64) re))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 #s(literal 1 binary64) re)) (/.f64 #s(literal 1 binary64) re))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 #s(literal 1 binary64) re)) (/.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 1 binary64)))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 #s(literal 1 binary64) re)))
(*.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 1 binary64)) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) (/.f64 (/.f64 #s(literal 1 binary64) re) re)))
(*.f64 (/.f64 (pow.f64 re #s(literal -3/2 binary64)) #s(literal 1 binary64)) (/.f64 (pow.f64 re #s(literal -3/2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) re) re)))
(*.f64 (/.f64 (pow.f64 re #s(literal -3/2 binary64)) (/.f64 #s(literal 1 binary64) re)) (/.f64 (pow.f64 re #s(literal -3/2 binary64)) (/.f64 #s(literal 1 binary64) re)))
(*.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (/.f64 #s(literal 1 binary64) re) re)))
#s(literal 1 binary64)
im
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(exp.f64 (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (+.f64 (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) #s(literal 2 binary64))
(pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (exp.f64 #s(literal 1/2 binary64)) (exp.f64 #s(literal 1/2 binary64))) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(+.f64 #s(literal 0 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(+.f64 (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 0 binary64))
(fma.f64 #s(literal 1/2 binary64) #s(literal 0 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(fma.f64 #s(literal 0 binary64) #s(literal 1/2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (log.f64 #s(literal 2 binary64))))
(/.f64 (neg.f64 (log.f64 #s(literal 2 binary64))) #s(literal -2 binary64))
(/.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 #s(literal 0 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))
(*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))
(*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))
(log.f64 #s(literal 2 binary64))
(+.f64 #s(literal 0 binary64) (log.f64 #s(literal 2 binary64)))
(+.f64 (log.f64 #s(literal 2 binary64)) #s(literal 0 binary64))
(-.f64 (/.f64 #s(literal 0 binary64) (log.f64 #s(literal 1/2 binary64))) (/.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 0 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (-.f64 (log.f64 #s(literal 2 binary64)) #s(literal 0 binary64)))) (+.f64 #s(literal 0 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (log.f64 #s(literal 1/2 binary64)) (-.f64 #s(literal 0 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))
(/.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (-.f64 (log.f64 #s(literal 2 binary64)) #s(literal 0 binary64)))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (log.f64 #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 #s(literal 0 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (-.f64 (log.f64 #s(literal 2 binary64)) #s(literal 0 binary64))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (neg.f64 (log.f64 #s(literal 1/2 binary64))))
(/.f64 (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) #s(literal 0 binary64)) (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 0 binary64)))))
(/.f64 (-.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 0 binary64)) (-.f64 (log.f64 #s(literal 2 binary64)) #s(literal 0 binary64)))
(*.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 0 binary64) (*.f64 (log.f64 #s(literal 2 binary64)) (-.f64 (log.f64 #s(literal 2 binary64)) #s(literal 0 binary64))))))
(*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (log.f64 #s(literal 1/2 binary64))))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64))) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64))) #s(literal 1 binary64))
(exp.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))
(sqrt.f64 (/.f64 #s(literal -1 binary64) re))
(/.f64 (/.f64 #s(literal 1 binary64) re) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)))
(/.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))))
(/.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (-.f64 #s(literal 0 binary64) re))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 0 binary64) re)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) re) (sqrt.f64 (/.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re))))))
(/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 re #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal -1 binary64) re) re) #s(literal 1/2 binary64))))
(/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) re))
(/.f64 (pow.f64 (/.f64 (/.f64 #s(literal -1 binary64) re) re) #s(literal 1/2 binary64)) (pow.f64 re #s(literal -1/2 binary64)))
(/.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal -1 binary64))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 re)))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 re))
(/.f64 (sqrt.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) re)) (pow.f64 (/.f64 (/.f64 #s(literal -1 binary64) re) re) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re))))) (/.f64 #s(literal -1 binary64) re))
(/.f64 (neg.f64 (pow.f64 (/.f64 (/.f64 #s(literal -1 binary64) re) re) #s(literal 1/2 binary64))) (neg.f64 (pow.f64 re #s(literal -1/2 binary64))))
(pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (+.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))
(pow.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(pow.f64 (*.f64 (exp.f64 #s(literal 1/2 binary64)) (exp.f64 #s(literal 1/2 binary64))) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re)))) re)
(*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re)))) (pow.f64 (*.f64 re re) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re)))) (sqrt.f64 (*.f64 re re)))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal -1 binary64) re) re) #s(literal 1/2 binary64)) (sqrt.f64 re))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal -1 binary64) re) re) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal -1/2 binary64))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64)))
(*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))
(*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal -1 binary64))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) re))))
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 1/2 binary64)) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 re #s(literal -1/2 binary64)))
(+.f64 #s(literal 0 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))
(+.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal 0 binary64))
(+.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) #s(literal 0 binary64) #s(literal 0 binary64)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 #s(literal 1 binary64) re))))
(+.f64 (*.f64 (log.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 1/2 binary64)))
(-.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal 0 binary64))
(-.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (/.f64 (/.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))) #s(literal 2 binary64)))
(-.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (/.f64 #s(literal 0 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))
(-.f64 (/.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (/.f64 (log.f64 re) #s(literal 2 binary64)))
(fma.f64 #s(literal 1/2 binary64) #s(literal 0 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 0 binary64))
(fma.f64 #s(literal 0 binary64) #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))
(fma.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 1/2 binary64) #s(literal 0 binary64))
(neg.f64 (*.f64 (log.f64 (-.f64 #s(literal 0 binary64) re)) #s(literal 1/2 binary64)))
(neg.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (-.f64 #s(literal 0 binary64) re))))
(/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))) (+.f64 (pow.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal 3 binary64)) #s(literal 0 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (pow.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 3 binary64)) #s(literal 1/2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(/.f64 (log.f64 (-.f64 #s(literal 0 binary64) re)) #s(literal -2 binary64))
(/.f64 (+.f64 (pow.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal 3 binary64)) #s(literal 0 binary64)) (+.f64 (pow.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))))
(/.f64 (pow.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 3 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) re)))
(/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))
(/.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal 3 binary64)) #s(literal 0 binary64))) (neg.f64 (+.f64 (pow.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))))
(/.f64 (neg.f64 (pow.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal 2 binary64))) (neg.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 3 binary64)))) (-.f64 #s(literal 0 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (log.f64 (-.f64 #s(literal 0 binary64) re)))
(/.f64 (neg.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 3 binary64)) #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal 1/2 binary64))) (log.f64 (-.f64 #s(literal 0 binary64) re)))
(/.f64 (+.f64 #s(literal 0 binary64) (pow.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal 3 binary64)) #s(literal 0 binary64)) (+.f64 (pow.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))
(*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))
(*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 3 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))) #s(literal 1/2 binary64)))
(*.f64 (+.f64 (pow.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal 3 binary64)) #s(literal 0 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))))
(*.f64 (pow.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(*.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 3 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))
(*.f64 (*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(log.f64 (/.f64 #s(literal -1 binary64) re))
(+.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 0 binary64))
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (neg.f64 (/.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))))
(+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) re)))
(+.f64 (log.f64 #s(literal -1 binary64)) (-.f64 (log.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 0 binary64)))
(+.f64 (log.f64 (/.f64 #s(literal 1 binary64) re)) (log.f64 #s(literal -1 binary64)))
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 #s(literal 2 binary64) (log.f64 re)))
(+.f64 (log.f64 (/.f64 (/.f64 #s(literal -1 binary64) re) re)) (log.f64 re))
(-.f64 #s(literal 0 binary64) (log.f64 (-.f64 #s(literal 0 binary64) re)))
(-.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 0 binary64))
(-.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (/.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(-.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (/.f64 #s(literal 0 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))
(-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re))
(-.f64 (/.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))) (log.f64 (-.f64 #s(literal 0 binary64) re)))
(-.f64 (log.f64 (/.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re)))) (log.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re)))
(-.f64 (log.f64 (/.f64 (/.f64 #s(literal -1 binary64) re) re)) (log.f64 (/.f64 #s(literal 1 binary64) re)))
(-.f64 (log.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re)) (log.f64 (/.f64 #s(literal -1 binary64) re)))
(-.f64 (log.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) re)) (log.f64 (/.f64 (/.f64 #s(literal -1 binary64) re) re)))
(-.f64 (/.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 3 binary64)) (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 re) (log.f64 (-.f64 #s(literal 0 binary64) re))))) (/.f64 (pow.f64 (log.f64 re) #s(literal 3 binary64)) (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 re) (log.f64 (-.f64 #s(literal 0 binary64) re))))))
(-.f64 (/.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 0 binary64) re))) (/.f64 (pow.f64 (log.f64 re) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 0 binary64) re))))
(fma.f64 #s(literal 2 binary64) #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))
(neg.f64 (log.f64 (-.f64 #s(literal 0 binary64) re)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 re) (log.f64 (-.f64 #s(literal 0 binary64) re)))) (-.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 re) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))))
(/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))
(/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re)))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 3 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 re) #s(literal 3 binary64))) (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 re) (log.f64 (-.f64 #s(literal 0 binary64) re)))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 0 binary64) re)))
(/.f64 (+.f64 (*.f64 (-.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 re) #s(literal 3 binary64))) #s(literal 0 binary64)) (*.f64 (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 re) (log.f64 (-.f64 #s(literal 0 binary64) re)))) #s(literal 0 binary64))) (*.f64 (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 re) (log.f64 (-.f64 #s(literal 0 binary64) re)))) #s(literal 0 binary64)))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))) (*.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(/.f64 (+.f64 (*.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 re) (log.f64 (-.f64 #s(literal 0 binary64) re))))) (*.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 re) #s(literal 3 binary64))))) (*.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 re) (log.f64 (-.f64 #s(literal 0 binary64) re))))))
(/.f64 (+.f64 (*.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))) (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 re) #s(literal 3 binary64))) #s(literal 0 binary64)) (*.f64 (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 re) (log.f64 (-.f64 #s(literal 0 binary64) re)))) #s(literal 0 binary64))) (*.f64 (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 re) (log.f64 (-.f64 #s(literal 0 binary64) re)))) #s(literal 0 binary64)))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))) (*.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(/.f64 (-.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 3 binary64)) (*.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 re) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 re) (log.f64 (-.f64 #s(literal 0 binary64) re))))))
(/.f64 (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 3 binary64))) (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) re)) (log.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) re))))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 0 binary64) re)) #s(literal 3 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))) #s(literal 3 binary64))) (+.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (+.f64 (*.f64 (/.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))) (/.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (/.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))))))
(/.f64 (-.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) re)) (log.f64 (/.f64 #s(literal 1 binary64) re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) re))))
(/.f64 (-.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))) (/.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (/.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))))
(pow.f64 (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))) #s(literal -1 binary64))
(*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))))
(*.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))
(*.f64 #s(literal -1 binary64) (log.f64 (-.f64 #s(literal 0 binary64) re)))
(*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 3 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))
(*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 re) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 re) (log.f64 (-.f64 #s(literal 0 binary64) re))))))
(*.f64 (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))))
(*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (log.f64 (-.f64 #s(literal 0 binary64) re))))
(*.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 3 binary64))) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (/.f64 #s(literal 1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))
(exp.f64 (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (+.f64 (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) #s(literal 2 binary64))
(pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (exp.f64 #s(literal 1/2 binary64)) (exp.f64 #s(literal 1/2 binary64))) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))
(*.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(exp.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))
(sqrt.f64 (/.f64 #s(literal -1 binary64) re))
(/.f64 (/.f64 #s(literal 1 binary64) re) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)))
(/.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))))
(/.f64 #s(literal 1 binary64) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (-.f64 #s(literal 0 binary64) re))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 0 binary64) re)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) re) (sqrt.f64 (/.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re))))))
(/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 re #s(literal -1/2 binary64)) (pow.f64 (/.f64 (/.f64 #s(literal -1 binary64) re) re) #s(literal 1/2 binary64))))
(/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) re))
(/.f64 (pow.f64 (/.f64 (/.f64 #s(literal -1 binary64) re) re) #s(literal 1/2 binary64)) (pow.f64 re #s(literal -1/2 binary64)))
(/.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal -1 binary64))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 re)))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 re))
(/.f64 (sqrt.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) re)) (pow.f64 (/.f64 (/.f64 #s(literal -1 binary64) re) re) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re))))) (/.f64 #s(literal -1 binary64) re))
(/.f64 (neg.f64 (pow.f64 (/.f64 (/.f64 #s(literal -1 binary64) re) re) #s(literal 1/2 binary64))) (neg.f64 (pow.f64 re #s(literal -1/2 binary64))))
(pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (+.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))
(pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) #s(literal 2 binary64))
(pow.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))
(pow.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(pow.f64 (*.f64 (exp.f64 #s(literal 1/2 binary64)) (exp.f64 #s(literal 1/2 binary64))) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re)))) re)
(*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re)))) (pow.f64 (*.f64 re re) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re)))) (sqrt.f64 (*.f64 re re)))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal -1 binary64) re) re) #s(literal 1/2 binary64)) (sqrt.f64 re))
(*.f64 (pow.f64 (/.f64 (/.f64 #s(literal -1 binary64) re) re) #s(literal 1/2 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal -1/2 binary64))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64)))
(*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))
(*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal -1 binary64))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) re))))
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 1/2 binary64)) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 re #s(literal -1/2 binary64)))
#s(literal 0 binary64)
(log.f64 (/.f64 #s(literal -1 binary64) re))
(+.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 0 binary64))
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (neg.f64 (/.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))))
(+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) re)))
(+.f64 (log.f64 #s(literal -1 binary64)) (-.f64 (log.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 0 binary64)))
(+.f64 (log.f64 (/.f64 #s(literal 1 binary64) re)) (log.f64 #s(literal -1 binary64)))
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 #s(literal 2 binary64) (log.f64 re)))
(+.f64 (log.f64 (/.f64 (/.f64 #s(literal -1 binary64) re) re)) (log.f64 re))
(-.f64 #s(literal 0 binary64) (log.f64 (-.f64 #s(literal 0 binary64) re)))
(-.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 0 binary64))
(-.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (/.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(-.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (/.f64 #s(literal 0 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))
(-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re))
(-.f64 (/.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))) (log.f64 (-.f64 #s(literal 0 binary64) re)))
(-.f64 (log.f64 (/.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re)))) (log.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re)))
(-.f64 (log.f64 (/.f64 (/.f64 #s(literal -1 binary64) re) re)) (log.f64 (/.f64 #s(literal 1 binary64) re)))
(-.f64 (log.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re)) (log.f64 (/.f64 #s(literal -1 binary64) re)))
(-.f64 (log.f64 (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) re)) (log.f64 (/.f64 (/.f64 #s(literal -1 binary64) re) re)))
(-.f64 (/.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 3 binary64)) (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 re) (log.f64 (-.f64 #s(literal 0 binary64) re))))) (/.f64 (pow.f64 (log.f64 re) #s(literal 3 binary64)) (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 re) (log.f64 (-.f64 #s(literal 0 binary64) re))))))
(-.f64 (/.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 0 binary64) re))) (/.f64 (pow.f64 (log.f64 re) #s(literal 2 binary64)) (log.f64 (-.f64 #s(literal 0 binary64) re))))
(fma.f64 #s(literal 2 binary64) #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))
(neg.f64 (log.f64 (-.f64 #s(literal 0 binary64) re)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 re) (log.f64 (-.f64 #s(literal 0 binary64) re)))) (-.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 re) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))))
(/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))
(/.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re)))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 3 binary64))) (-.f64 #s(literal 0 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 re) #s(literal 3 binary64))) (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 re) (log.f64 (-.f64 #s(literal 0 binary64) re)))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (log.f64 (-.f64 #s(literal 0 binary64) re)))
(/.f64 (+.f64 (*.f64 (-.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 re) #s(literal 3 binary64))) #s(literal 0 binary64)) (*.f64 (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 re) (log.f64 (-.f64 #s(literal 0 binary64) re)))) #s(literal 0 binary64))) (*.f64 (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 re) (log.f64 (-.f64 #s(literal 0 binary64) re)))) #s(literal 0 binary64)))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))) (*.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(/.f64 (+.f64 (*.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 re) (log.f64 (-.f64 #s(literal 0 binary64) re))))) (*.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 re) #s(literal 3 binary64))))) (*.f64 #s(literal 0 binary64) (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 re) (log.f64 (-.f64 #s(literal 0 binary64) re))))))
(/.f64 (+.f64 (*.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))) (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (*.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(/.f64 (-.f64 (*.f64 (-.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 re) #s(literal 3 binary64))) #s(literal 0 binary64)) (*.f64 (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 re) (log.f64 (-.f64 #s(literal 0 binary64) re)))) #s(literal 0 binary64))) (*.f64 (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 re) (log.f64 (-.f64 #s(literal 0 binary64) re)))) #s(literal 0 binary64)))
(/.f64 (-.f64 (*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) #s(literal 0 binary64)) (*.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))) (*.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(/.f64 (-.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 3 binary64)) (*.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 re) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 re) (log.f64 (-.f64 #s(literal 0 binary64) re))))))
(/.f64 (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 3 binary64))) (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (-.f64 (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) re)) (log.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) re))))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (log.f64 (-.f64 #s(literal 0 binary64) re)) #s(literal 3 binary64))) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))
(/.f64 (-.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))) #s(literal 3 binary64))) (+.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (+.f64 (*.f64 (/.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))) (/.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (/.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))))))
(/.f64 (-.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 (/.f64 #s(literal 1 binary64) re)) (log.f64 (/.f64 #s(literal 1 binary64) re)))) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 (/.f64 #s(literal 1 binary64) re))))
(/.f64 (-.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (*.f64 (/.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))) (/.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (/.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))))
(pow.f64 (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))) #s(literal -1 binary64))
(*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))))
(*.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))
(*.f64 #s(literal -1 binary64) (log.f64 (-.f64 #s(literal 0 binary64) re)))
(*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 3 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))
(*.f64 (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))
(*.f64 (-.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 re) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (log.f64 #s(literal -1 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 re) (log.f64 (-.f64 #s(literal 0 binary64) re))))))
(*.f64 (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re)))))
(*.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (log.f64 (-.f64 #s(literal 0 binary64) re))))
(*.f64 (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 3 binary64))) (/.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (/.f64 #s(literal 1 binary64) (pow.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))

simplify627.0ms (5.9%)

Algorithm
egg-herbie
Rules
6750×*-lowering-*.f32
6750×*-lowering-*.f64
2056×+-lowering-+.f64
2056×+-lowering-+.f32
1294×sum3-define
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
05254698
117204379
264024294
081034294
Stop Event
iter limit
node limit
Counts
384 → 384
Calls
Call 1
Inputs
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/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 im) (* 1/2 (* (sqrt (/ 1 im)) re)))
(+ (sqrt im) (* re (+ (* 1/8 (* (sqrt (/ 1 (pow im 3))) re)) (* 1/2 (sqrt (/ 1 im))))))
(+ (sqrt im) (* re (+ (* 1/2 (sqrt (/ 1 im))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) re)) (* 1/8 (sqrt (/ 1 (pow im 3)))))))))
(* (sqrt re) (sqrt 2))
(* re (+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 2))))
(* re (+ (* -1/16 (* (/ (pow im 4) (sqrt 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 2)))))
(* re (+ (* -1/16 (* (/ (pow im 4) (sqrt 2)) (sqrt (/ 1 (pow re 9))))) (+ (* -1/32 (* (/ (pow im 4) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 2))))))
(* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re)))
(+ (* 1/16 (* (/ (* (pow im 3) (sqrt -1)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re))))
(+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (sqrt -1)) (sqrt 1/2)) (sqrt re))) (* 1/32 (* (/ (* (pow im 5) (sqrt -1)) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re))))
(+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (sqrt -1)) (sqrt 1/2)) (sqrt re))) (+ (* 1/512 (* (/ (* (pow im 5) (sqrt -1)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/32 (* (/ (* (pow im 5) (sqrt -1)) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re))))
(* (sqrt re) (sqrt 2))
(+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt 2)))
(+ (* (sqrt re) (sqrt 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 2)) (sqrt (/ 1 re)))) (* 1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt 2)))))))
(+ (* (sqrt re) (sqrt 2)) (* (pow im 2) (+ (* 1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt 2)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 re)) (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (sqrt 2)))) (* 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 2)) (sqrt (/ 1 re)))))))))
(sqrt im)
(* im (+ (sqrt (/ 1 im)) (* 1/2 (* (sqrt (/ 1 (pow im 3))) re))))
(* im (+ (sqrt (/ 1 im)) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) re)))))
(* im (+ (sqrt (/ 1 im)) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) re))))))
(* -1 (* (sqrt im) (sqrt -1)))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1)))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt -1)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (sqrt -1)))) (* 1/4 (* (sqrt im) (* (pow re 2) (sqrt -1))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))
im
(+ im 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))))))))
(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 (/ (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)
(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))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* 1/2 (+ (log 2) (log im)))
(* 1/2 (+ (log 2) (log im)))
(* 1/2 (+ (log 2) (log im)))
(* 1/2 (+ (log 2) (log im)))
(* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))
(* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))
(* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))
(* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))
(* 1/2 (+ (log -2) (* -1 (log (/ -1 im)))))
(* 1/2 (+ (log -2) (* -1 (log (/ -1 im)))))
(* 1/2 (+ (log -2) (* -1 (log (/ -1 im)))))
(* 1/2 (+ (log -2) (* -1 (log (/ -1 im)))))
(+ (log 2) (log im))
(+ (log 2) (log im))
(+ (log 2) (log im))
(+ (log 2) (log im))
(+ (log 2) (* -1 (log (/ 1 im))))
(+ (log 2) (* -1 (log (/ 1 im))))
(+ (log 2) (* -1 (log (/ 1 im))))
(+ (log 2) (* -1 (log (/ 1 im))))
(+ (log -2) (* -1 (log (/ -1 im))))
(+ (log -2) (* -1 (log (/ -1 im))))
(+ (log -2) (* -1 (log (/ -1 im))))
(+ (log -2) (* -1 (log (/ -1 im))))
(* 1/2 (exp (* 1/2 (+ (log -1) (+ (log (pow im 2)) (* -1 (log re)))))))
(* 1/2 (exp (* 1/2 (+ (log -1) (+ (log (pow im 2)) (* -1 (log re)))))))
(* 1/2 (exp (* 1/2 (+ (log -1) (+ (log (pow im 2)) (* -1 (log re)))))))
(* 1/2 (exp (* 1/2 (+ (log -1) (+ (log (pow im 2)) (* -1 (log re)))))))
(* 1/2 (exp (* 1/2 (+ (log -1) (+ (log (/ 1 re)) (log (pow im 2)))))))
(* 1/2 (exp (* 1/2 (+ (log -1) (+ (log (/ 1 re)) (log (pow im 2)))))))
(* 1/2 (exp (* 1/2 (+ (log -1) (+ (log (/ 1 re)) (log (pow im 2)))))))
(* 1/2 (exp (* 1/2 (+ (log -1) (+ (log (/ 1 re)) (log (pow im 2)))))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (* 2 (log im))))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (* 2 (log im))))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (* 2 (log im))))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (* 2 (log im))))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))))
(exp (* 1/2 (+ (log -1) (+ (log (pow im 2)) (* -1 (log re))))))
(exp (* 1/2 (+ (log -1) (+ (log (pow im 2)) (* -1 (log re))))))
(exp (* 1/2 (+ (log -1) (+ (log (pow im 2)) (* -1 (log re))))))
(exp (* 1/2 (+ (log -1) (+ (log (pow im 2)) (* -1 (log re))))))
(exp (* 1/2 (+ (log -1) (+ (log (/ 1 re)) (log (pow im 2))))))
(exp (* 1/2 (+ (log -1) (+ (log (/ 1 re)) (log (pow im 2))))))
(exp (* 1/2 (+ (log -1) (+ (log (/ 1 re)) (log (pow im 2))))))
(exp (* 1/2 (+ (log -1) (+ (log (/ 1 re)) (log (pow im 2))))))
(exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))
(exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))
(exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))
(exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))
(exp (* 1/2 (+ (log (/ -1 re)) (* 2 (log im)))))
(exp (* 1/2 (+ (log (/ -1 re)) (* 2 (log im)))))
(exp (* 1/2 (+ (log (/ -1 re)) (* 2 (log im)))))
(exp (* 1/2 (+ (log (/ -1 re)) (* 2 (log im)))))
(exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ 1 im))))))
(exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ 1 im))))))
(exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ 1 im))))))
(exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ 1 im))))))
(exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ -1 im))))))
(exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ -1 im))))))
(exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ -1 im))))))
(exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ -1 im))))))
(* 1/2 (+ (log -1) (+ (log (pow im 2)) (* -1 (log re)))))
(* 1/2 (+ (log -1) (+ (log (pow im 2)) (* -1 (log re)))))
(* 1/2 (+ (log -1) (+ (log (pow im 2)) (* -1 (log re)))))
(* 1/2 (+ (log -1) (+ (log (pow im 2)) (* -1 (log re)))))
(* 1/2 (+ (log -1) (+ (log (/ 1 re)) (log (pow im 2)))))
(* 1/2 (+ (log -1) (+ (log (/ 1 re)) (log (pow im 2)))))
(* 1/2 (+ (log -1) (+ (log (/ 1 re)) (log (pow im 2)))))
(* 1/2 (+ (log -1) (+ (log (/ 1 re)) (log (pow im 2)))))
(* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))
(* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))
(* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))
(* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))
(* 1/2 (+ (log (/ -1 re)) (* 2 (log im))))
(* 1/2 (+ (log (/ -1 re)) (* 2 (log im))))
(* 1/2 (+ (log (/ -1 re)) (* 2 (log im))))
(* 1/2 (+ (log (/ -1 re)) (* 2 (log im))))
(* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))
(* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))
(* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))
(* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))
(* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))
(* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))
(* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))
(* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))
(+ (log -1) (+ (log (pow im 2)) (* -1 (log re))))
(+ (log -1) (+ (log (pow im 2)) (* -1 (log re))))
(+ (log -1) (+ (log (pow im 2)) (* -1 (log re))))
(+ (log -1) (+ (log (pow im 2)) (* -1 (log re))))
(+ (log -1) (+ (log (/ 1 re)) (log (pow im 2))))
(+ (log -1) (+ (log (/ 1 re)) (log (pow im 2))))
(+ (log -1) (+ (log (/ 1 re)) (log (pow im 2))))
(+ (log -1) (+ (log (/ 1 re)) (log (pow im 2))))
(+ (log (/ -1 re)) (log (pow im 2)))
(+ (log (/ -1 re)) (log (pow im 2)))
(+ (log (/ -1 re)) (log (pow im 2)))
(+ (log (/ -1 re)) (log (pow im 2)))
(+ (log (/ -1 re)) (* 2 (log im)))
(+ (log (/ -1 re)) (* 2 (log im)))
(+ (log (/ -1 re)) (* 2 (log im)))
(+ (log (/ -1 re)) (* 2 (log im)))
(+ (log (/ -1 re)) (* -2 (log (/ 1 im))))
(+ (log (/ -1 re)) (* -2 (log (/ 1 im))))
(+ (log (/ -1 re)) (* -2 (log (/ 1 im))))
(+ (log (/ -1 re)) (* -2 (log (/ 1 im))))
(+ (log (/ -1 re)) (* -2 (log (/ -1 im))))
(+ (log (/ -1 re)) (* -2 (log (/ -1 im))))
(+ (log (/ -1 re)) (* -2 (log (/ -1 im))))
(+ (log (/ -1 re)) (* -2 (log (/ -1 im))))
(* (* 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)))
(* 2 (log im))
(* 2 (log im))
(* 2 (log im))
(* 2 (log im))
(* -2 (log (/ 1 im)))
(* -2 (log (/ 1 im)))
(* -2 (log (/ 1 im)))
(* -2 (log (/ 1 im)))
(* -2 (log (/ -1 im)))
(* -2 (log (/ -1 im)))
(* -2 (log (/ -1 im)))
(* -2 (log (/ -1 im)))
(+ (log -1) (* -1 (log re)))
(+ (log -1) (* -1 (log re)))
(+ (log -1) (* -1 (log re)))
(+ (log -1) (* -1 (log re)))
(+ (log -1) (log (/ 1 re)))
(+ (log -1) (log (/ 1 re)))
(+ (log -1) (log (/ 1 re)))
(+ (log -1) (log (/ 1 re)))
(log (/ -1 re))
(log (/ -1 re))
(log (/ -1 re))
(log (/ -1 re))
Outputs
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/4 binary64))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/16 binary64))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(+.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 re (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 re (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/32 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/16 binary64))))))))
(* 1/2 (* (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 im im))) (+.f64 (*.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 #s(literal -1/32 binary64) (pow.f64 im #s(literal 4 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 #s(literal -1/64 binary64) (/.f64 (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 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 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 2 binary64)) (*.f64 (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)))) (*.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 im (*.f64 im im))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (+.f64 (*.f64 (sqrt.f64 re) (*.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 im (*.f64 im im))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (/.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) #s(literal 1/64 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 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (+.f64 (*.f64 (sqrt.f64 re) (*.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 im (*.f64 im im))) (/.f64 (*.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) (pow.f64 im #s(literal 5 binary64))) (/.f64 (*.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 im im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal -1/4 binary64) (+.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/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal -1/4 binary64) (+.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 (*.f64 im im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (+.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 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 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 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)) #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)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re))) #s(literal 1/16 binary64)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal -1 binary64))))))
(* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -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 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re re) #s(literal -1/8 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (*.f64 re (sqrt.f64 #s(literal -1 binary64))))) (*.f64 im im)) (/.f64 (*.f64 (sqrt.f64 im) #s(literal 3/16 binary64)) im))) (-.f64 #s(literal 0 binary64) im))
(sqrt im)
(sqrt.f64 im)
(+ (sqrt im) (* 1/2 (* (sqrt (/ 1 im)) re)))
(+.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal 1/2 binary64) re)))
(+ (sqrt im) (* re (+ (* 1/8 (* (sqrt (/ 1 (pow im 3))) re)) (* 1/2 (sqrt (/ 1 im))))))
(+.f64 (sqrt.f64 im) (*.f64 re (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re #s(literal 1/8 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(+ (sqrt im) (* re (+ (* 1/2 (sqrt (/ 1 im))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) re)) (* 1/8 (sqrt (/ 1 (pow im 3)))))))))
(+.f64 (sqrt.f64 im) (*.f64 re (+.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 re (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re #s(literal -1/16 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)))))))
(* (sqrt re) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 re))
(* re (+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 2))))
(*.f64 re (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 im im) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* re (+ (* -1/16 (* (/ (pow im 4) (sqrt 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 2)))))
(*.f64 re (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 im im) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (/.f64 (*.f64 #s(literal -1/16 binary64) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64)))))))
(* re (+ (* -1/16 (* (/ (pow im 4) (sqrt 2)) (sqrt (/ 1 (pow re 9))))) (+ (* -1/32 (* (/ (pow im 4) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 2))))))
(*.f64 re (+.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 im im) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))))))))
(* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* 1/16 (* (/ (* (pow im 3) (sqrt -1)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re))))
(+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 im (*.f64 im im))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))
(+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (sqrt -1)) (sqrt 1/2)) (sqrt re))) (* 1/32 (* (/ (* (pow im 5) (sqrt -1)) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re))))
(-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (+.f64 (*.f64 (sqrt.f64 re) (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 im (*.f64 im im))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 #s(literal 1/32 binary64) (*.f64 (*.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (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 1/2)) (sqrt re))) (+ (* 1/512 (* (/ (* (pow im 5) (sqrt -1)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/32 (* (/ (* (pow im 5) (sqrt -1)) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re))))
(-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (+.f64 (*.f64 (sqrt.f64 re) (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 im (*.f64 im im))) (/.f64 (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) (pow.f64 im #s(literal 5 binary64))) (/.f64 (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)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))))))) (*.f64 re (*.f64 re re))))
(* (sqrt re) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 re))
(+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 re)) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (*.f64 im im) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* (sqrt re) (sqrt 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 2)) (sqrt (/ 1 re)))) (* 1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt 2)))))))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 (*.f64 im im) #s(literal -1/2 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)))) (sqrt.f64 #s(literal 2 binary64))))))))
(+ (* (sqrt re) (sqrt 2)) (* (pow im 2) (+ (* 1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt 2)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 re)) (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (sqrt 2)))) (* 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 2)) (sqrt (/ 1 re)))))))))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1/2 binary64)) (+.f64 (/.f64 #s(literal 1/32 binary64) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1/8 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (+.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)))))) (sqrt.f64 #s(literal 2 binary64)))))))))
(sqrt im)
(sqrt.f64 im)
(* im (+ (sqrt (/ 1 im)) (* 1/2 (* (sqrt (/ 1 (pow im 3))) re))))
(*.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 #s(literal 1/2 binary64) re))))
(* im (+ (sqrt (/ 1 im)) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) re)))))
(*.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 #s(literal 1/2 binary64) re)) (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 re re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))))))
(* im (+ (sqrt (/ 1 im)) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) re))))))
(*.f64 im (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) #s(literal 1/8 binary64)) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 #s(literal 1/2 binary64) re)))))
(* -1 (* (sqrt im) (sqrt -1)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64)))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1)))))
(*.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt -1)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/4 binary64)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (sqrt -1)))) (* 1/4 (* (sqrt im) (* (pow re 2) (sqrt -1))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))
(*.f64 (-.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (*.f64 (sqrt.f64 im) (*.f64 (*.f64 re (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) #s(literal 3/8 binary64))) (*.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
im
(+ im re)
(+.f64 im re)
(+ im (* re (+ 1 (* 1/2 (/ re im)))))
(+.f64 im (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) re) 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 #s(literal 1/2 binary64) (*.f64 im (/.f64 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 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (/.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 #s(literal 2 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))) (/.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 (*.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 (*.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 #s(literal 1/2 binary64) (/.f64 (*.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 (+.f64 (/.f64 re im) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))))
(* -1 im)
(-.f64 #s(literal 0 binary64) im)
(* -1 (* im (+ 1 (* -1 (/ re im)))))
(-.f64 #s(literal 0 binary64) (*.f64 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 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) im))) im)))
(* -1 (* im (+ 1 (* -1 (/ (+ re (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 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 (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) im)) im) (*.f64 #s(literal 1/2 binary64) (*.f64 re re))) im)) im)))
im
(+ im (* 1/2 (/ (pow re 2) im)))
(+.f64 im (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 re re) im)))
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+.f64 im (*.f64 (*.f64 re re) (+.f64 (/.f64 (*.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 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re))))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(*.f64 re (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (/.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 #s(literal 1/2 binary64) (*.f64 im (/.f64 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 re (*.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (pow.f64 re #s(literal 4 binary64))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (pow.f64 re #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (/.f64 im (*.f64 re re)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))))) (-.f64 #s(literal 0 binary64) re))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(+.f64 re (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) re)))
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+.f64 re (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 (*.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 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(*.f64 im (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64)))))
(* -1 im)
(-.f64 #s(literal 0 binary64) im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64)))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64)))))
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(* -1 (/ (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)
(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 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* -1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal -1/2 binary64) (*.f64 im (sqrt.f64 #s(literal -1 binary64)))))
(* -1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal -1/2 binary64) (*.f64 im (sqrt.f64 #s(literal -1 binary64)))))
(* -1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal -1/2 binary64) (*.f64 im (sqrt.f64 #s(literal -1 binary64)))))
(* -1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal -1/2 binary64) (*.f64 im (sqrt.f64 #s(literal -1 binary64)))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64)))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64)))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64)))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64)))
(* 1/2 (+ (log 2) (log im)))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))
(* 1/2 (+ (log 2) (log im)))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))
(* 1/2 (+ (log 2) (log im)))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))
(* 1/2 (+ (log 2) (log im)))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))
(* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))
(* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))
(* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))
(* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))
(* 1/2 (+ (log -2) (* -1 (log (/ -1 im)))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal -2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))
(* 1/2 (+ (log -2) (* -1 (log (/ -1 im)))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal -2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))
(* 1/2 (+ (log -2) (* -1 (log (/ -1 im)))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal -2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))
(* 1/2 (+ (log -2) (* -1 (log (/ -1 im)))))
(*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal -2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))
(+ (log 2) (log im))
(+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))
(+ (log 2) (log im))
(+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))
(+ (log 2) (log im))
(+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))
(+ (log 2) (log im))
(+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))
(+ (log 2) (* -1 (log (/ 1 im))))
(+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))
(+ (log 2) (* -1 (log (/ 1 im))))
(+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))
(+ (log 2) (* -1 (log (/ 1 im))))
(+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))
(+ (log 2) (* -1 (log (/ 1 im))))
(+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))
(+ (log -2) (* -1 (log (/ -1 im))))
(-.f64 (log.f64 #s(literal -2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))
(+ (log -2) (* -1 (log (/ -1 im))))
(-.f64 (log.f64 #s(literal -2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))
(+ (log -2) (* -1 (log (/ -1 im))))
(-.f64 (log.f64 #s(literal -2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))
(+ (log -2) (* -1 (log (/ -1 im))))
(-.f64 (log.f64 #s(literal -2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))
(* 1/2 (exp (* 1/2 (+ (log -1) (+ (log (pow im 2)) (* -1 (log re)))))))
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re))))))
(* 1/2 (exp (* 1/2 (+ (log -1) (+ (log (pow im 2)) (* -1 (log re)))))))
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re))))))
(* 1/2 (exp (* 1/2 (+ (log -1) (+ (log (pow im 2)) (* -1 (log re)))))))
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re))))))
(* 1/2 (exp (* 1/2 (+ (log -1) (+ (log (pow im 2)) (* -1 (log re)))))))
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re))))))
(* 1/2 (exp (* 1/2 (+ (log -1) (+ (log (/ 1 re)) (log (pow im 2)))))))
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re))))))
(* 1/2 (exp (* 1/2 (+ (log -1) (+ (log (/ 1 re)) (log (pow im 2)))))))
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re))))))
(* 1/2 (exp (* 1/2 (+ (log -1) (+ (log (/ 1 re)) (log (pow im 2)))))))
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re))))))
(* 1/2 (exp (* 1/2 (+ (log -1) (+ (log (/ 1 re)) (log (pow im 2)))))))
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re))))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)) (pow.f64 (*.f64 im im) #s(literal 1/2 binary64))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)) (pow.f64 (*.f64 im im) #s(literal 1/2 binary64))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)) (pow.f64 (*.f64 im im) #s(literal 1/2 binary64))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)) (pow.f64 (*.f64 im im) #s(literal 1/2 binary64))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (* 2 (log im))))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)) (pow.f64 im #s(literal 1 binary64))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (* 2 (log im))))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)) (pow.f64 im #s(literal 1 binary64))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (* 2 (log im))))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)) (pow.f64 im #s(literal 1 binary64))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (* 2 (log im))))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)) (pow.f64 im #s(literal 1 binary64))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))))
(*.f64 #s(literal 1/2 binary64) (*.f64 im (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))))
(*.f64 #s(literal 1/2 binary64) (*.f64 im (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))))
(*.f64 #s(literal 1/2 binary64) (*.f64 im (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))))
(*.f64 #s(literal 1/2 binary64) (*.f64 im (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64))))
(exp (* 1/2 (+ (log -1) (+ (log (pow im 2)) (* -1 (log re))))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re)))))
(exp (* 1/2 (+ (log -1) (+ (log (pow im 2)) (* -1 (log re))))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re)))))
(exp (* 1/2 (+ (log -1) (+ (log (pow im 2)) (* -1 (log re))))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re)))))
(exp (* 1/2 (+ (log -1) (+ (log (pow im 2)) (* -1 (log re))))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re)))))
(exp (* 1/2 (+ (log -1) (+ (log (/ 1 re)) (log (pow im 2))))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re)))))
(exp (* 1/2 (+ (log -1) (+ (log (/ 1 re)) (log (pow im 2))))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re)))))
(exp (* 1/2 (+ (log -1) (+ (log (/ 1 re)) (log (pow im 2))))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re)))))
(exp (* 1/2 (+ (log -1) (+ (log (/ 1 re)) (log (pow im 2))))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re)))))
(exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)) (pow.f64 (*.f64 im im) #s(literal 1/2 binary64)))
(exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)) (pow.f64 (*.f64 im im) #s(literal 1/2 binary64)))
(exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)) (pow.f64 (*.f64 im im) #s(literal 1/2 binary64)))
(exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)) (pow.f64 (*.f64 im im) #s(literal 1/2 binary64)))
(exp (* 1/2 (+ (log (/ -1 re)) (* 2 (log im)))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)) (pow.f64 im #s(literal 1 binary64)))
(exp (* 1/2 (+ (log (/ -1 re)) (* 2 (log im)))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)) (pow.f64 im #s(literal 1 binary64)))
(exp (* 1/2 (+ (log (/ -1 re)) (* 2 (log im)))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)) (pow.f64 im #s(literal 1 binary64)))
(exp (* 1/2 (+ (log (/ -1 re)) (* 2 (log im)))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)) (pow.f64 im #s(literal 1 binary64)))
(exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ 1 im))))))
(*.f64 im (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)))
(exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ 1 im))))))
(*.f64 im (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)))
(exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ 1 im))))))
(*.f64 im (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)))
(exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ 1 im))))))
(*.f64 im (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)))
(exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ -1 im))))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)))
(exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ -1 im))))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)))
(exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ -1 im))))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)))
(exp (* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ -1 im))))))
(*.f64 (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)))
(* 1/2 (+ (log -1) (+ (log (pow im 2)) (* -1 (log re)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re))))
(* 1/2 (+ (log -1) (+ (log (pow im 2)) (* -1 (log re)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re))))
(* 1/2 (+ (log -1) (+ (log (pow im 2)) (* -1 (log re)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re))))
(* 1/2 (+ (log -1) (+ (log (pow im 2)) (* -1 (log re)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re))))
(* 1/2 (+ (log -1) (+ (log (/ 1 re)) (log (pow im 2)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re))))
(* 1/2 (+ (log -1) (+ (log (/ 1 re)) (log (pow im 2)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re))))
(* 1/2 (+ (log -1) (+ (log (/ 1 re)) (log (pow im 2)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re))))
(* 1/2 (+ (log -1) (+ (log (/ 1 re)) (log (pow im 2)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re))))
(* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 im im)) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(* 1/2 (+ (log (/ -1 re)) (* 2 (log im))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 #s(literal 2 binary64) (log.f64 im))))
(* 1/2 (+ (log (/ -1 re)) (* 2 (log im))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 #s(literal 2 binary64) (log.f64 im))))
(* 1/2 (+ (log (/ -1 re)) (* 2 (log im))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 #s(literal 2 binary64) (log.f64 im))))
(* 1/2 (+ (log (/ -1 re)) (* 2 (log im))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 #s(literal 2 binary64) (log.f64 im))))
(* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))
(+.f64 (log.f64 im) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))
(+.f64 (log.f64 im) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))
(+.f64 (log.f64 im) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))
(+.f64 (log.f64 im) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))
(* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))) (log.f64 (/.f64 #s(literal -1 binary64) im)))
(* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))) (log.f64 (/.f64 #s(literal -1 binary64) im)))
(* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))) (log.f64 (/.f64 #s(literal -1 binary64) im)))
(* 1/2 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))) (log.f64 (/.f64 #s(literal -1 binary64) im)))
(+ (log -1) (+ (log (pow im 2)) (* -1 (log re))))
(+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re)))
(+ (log -1) (+ (log (pow im 2)) (* -1 (log re))))
(+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re)))
(+ (log -1) (+ (log (pow im 2)) (* -1 (log re))))
(+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re)))
(+ (log -1) (+ (log (pow im 2)) (* -1 (log re))))
(+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re)))
(+ (log -1) (+ (log (/ 1 re)) (log (pow im 2))))
(+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re)))
(+ (log -1) (+ (log (/ 1 re)) (log (pow im 2))))
(+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re)))
(+ (log -1) (+ (log (/ 1 re)) (log (pow im 2))))
(+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re)))
(+ (log -1) (+ (log (/ 1 re)) (log (pow im 2))))
(+.f64 (log.f64 (*.f64 im im)) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re)))
(+ (log (/ -1 re)) (log (pow im 2)))
(+.f64 (log.f64 (*.f64 im im)) (log.f64 (/.f64 #s(literal -1 binary64) re)))
(+ (log (/ -1 re)) (log (pow im 2)))
(+.f64 (log.f64 (*.f64 im im)) (log.f64 (/.f64 #s(literal -1 binary64) re)))
(+ (log (/ -1 re)) (log (pow im 2)))
(+.f64 (log.f64 (*.f64 im im)) (log.f64 (/.f64 #s(literal -1 binary64) re)))
(+ (log (/ -1 re)) (log (pow im 2)))
(+.f64 (log.f64 (*.f64 im im)) (log.f64 (/.f64 #s(literal -1 binary64) re)))
(+ (log (/ -1 re)) (* 2 (log im)))
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 #s(literal 2 binary64) (log.f64 im)))
(+ (log (/ -1 re)) (* 2 (log im)))
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 #s(literal 2 binary64) (log.f64 im)))
(+ (log (/ -1 re)) (* 2 (log im)))
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 #s(literal 2 binary64) (log.f64 im)))
(+ (log (/ -1 re)) (* 2 (log im)))
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 #s(literal 2 binary64) (log.f64 im)))
(+ (log (/ -1 re)) (* -2 (log (/ 1 im))))
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (log.f64 im))))
(+ (log (/ -1 re)) (* -2 (log (/ 1 im))))
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (log.f64 im))))
(+ (log (/ -1 re)) (* -2 (log (/ 1 im))))
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (log.f64 im))))
(+ (log (/ -1 re)) (* -2 (log (/ 1 im))))
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (log.f64 im))))
(+ (log (/ -1 re)) (* -2 (log (/ -1 im))))
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im))))
(+ (log (/ -1 re)) (* -2 (log (/ -1 im))))
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im))))
(+ (log (/ -1 re)) (* -2 (log (/ -1 im))))
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im))))
(+ (log (/ -1 re)) (* -2 (log (/ -1 im))))
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 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))))
(* (* 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))))
(* 2 (log im))
(*.f64 #s(literal 2 binary64) (log.f64 im))
(* 2 (log im))
(*.f64 #s(literal 2 binary64) (log.f64 im))
(* 2 (log im))
(*.f64 #s(literal 2 binary64) (log.f64 im))
(* 2 (log im))
(*.f64 #s(literal 2 binary64) (log.f64 im))
(* -2 (log (/ 1 im)))
(*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (log.f64 im)))
(* -2 (log (/ 1 im)))
(*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (log.f64 im)))
(* -2 (log (/ 1 im)))
(*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (log.f64 im)))
(* -2 (log (/ 1 im)))
(*.f64 #s(literal -2 binary64) (-.f64 #s(literal 0 binary64) (log.f64 im)))
(* -2 (log (/ -1 im)))
(*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)))
(* -2 (log (/ -1 im)))
(*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)))
(* -2 (log (/ -1 im)))
(*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)))
(* -2 (log (/ -1 im)))
(*.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)))
(+ (log -1) (* -1 (log re)))
(-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re))
(+ (log -1) (* -1 (log re)))
(-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re))
(+ (log -1) (* -1 (log re)))
(-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re))
(+ (log -1) (* -1 (log re)))
(-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re))
(+ (log -1) (log (/ 1 re)))
(-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re))
(+ (log -1) (log (/ 1 re)))
(-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re))
(+ (log -1) (log (/ 1 re)))
(-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re))
(+ (log -1) (log (/ 1 re)))
(-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re))
(log (/ -1 re))
(log.f64 (/.f64 #s(literal -1 binary64) re))
(log (/ -1 re))
(log.f64 (/.f64 #s(literal -1 binary64) re))
(log (/ -1 re))
(log.f64 (/.f64 #s(literal -1 binary64) re))
(log (/ -1 re))
(log.f64 (/.f64 #s(literal -1 binary64) re))

eval121.0ms (1.1%)

Compiler

Compiled 15505 to 2426 computations (84.4% saved)

prune159.0ms (1.5%)

Pruning

18 alts after pruning (12 fresh and 6 done)

PrunedKeptTotal
New9085913
Fresh3710
Picked325
Done044
Total91418932
Accuracy
99.8%
Counts
932 → 18
Alt Table
Click to see full alt table
StatusAccuracyProgram
14.7%
(pow.f64 (*.f64 re re) #s(literal 1/4 binary64))
6.8%
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))
72.9%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (exp.f64 #s(literal 1/2 binary64)) (exp.f64 #s(literal 1/2 binary64))) (/.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 2 binary64))))
74.2%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))))
24.7%
(*.f64 #s(literal 1/2 binary64) (*.f64 im (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64))))
34.1%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im (*.f64 #s(literal 2 binary64) (+.f64 im re)))) im)))
2.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal -1 binary64) re)))
14.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))))
5.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re))))
55.2%
(*.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))))))
44.5%
(*.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))))))))))
55.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
80.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
57.4%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re))))
22.8%
(*.f64 #s(literal 1/2 binary64) (exp.f64 (+.f64 (log.f64 im) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))))
70.3%
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 3 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (-.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 (+.f64 re (hypot.f64 re im))) (log.f64 #s(literal 2 binary64)))))))))
74.7%
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))))
25.1%
(sqrt.f64 re)
Compiler

Compiled 451 to 309 computations (31.5% saved)

simplify207.0ms (1.9%)

Algorithm
egg-herbie
Localize:

Found 17 expressions of interest:

NewMetricScoreProgram
cost-diff0
(+.f64 (*.f64 re re) (*.f64 im (*.f64 #s(literal 2 binary64) (+.f64 im re))))
cost-diff128
(/.f64 (+.f64 (*.f64 re re) (*.f64 im (*.f64 #s(literal 2 binary64) (+.f64 im re)))) im)
cost-diff128
(sqrt.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im (*.f64 #s(literal 2 binary64) (+.f64 im re)))) im))
cost-diff128
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im (*.f64 #s(literal 2 binary64) (+.f64 im re)))) im)))
cost-diff0
(/.f64 im re)
cost-diff0
(-.f64 #s(literal 0 binary64) (/.f64 im re))
cost-diff0
(sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)))
cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re))))
cost-diff0
(*.f64 im #s(literal 2 binary64))
cost-diff0
(sqrt.f64 (*.f64 im #s(literal 2 binary64)))
cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
cost-diff0
(sqrt.f64 #s(literal 2 binary64))
cost-diff0
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))
cost-diff0
(log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))
cost-diff0
(exp.f64 #s(literal 1/2 binary64))
cost-diff0
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))))
cost-diff0
(*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))))
Rules
1420×*-lowering-*.f32
1420×*-lowering-*.f64
1400×sum5-define
1148×div-sub
876×fma-lowering-fma.f32
Iterations

Useful iterations: 14 (0.0ms)

IterNodesCost
031172
156172
2105172
3186172
4247172
5266172
6286172
7296172
8371172
91068172
101422172
111918172
123641172
134606172
145933169
157043169
167512169
177810169
08234169
Stop Event
iter limit
node limit
Calls
Call 1
Inputs
(* 1/2 (pow (exp 1/2) (log (* (+ re (sqrt (+ (* re re) (* im im)))) 2))))
1/2
(pow (exp 1/2) (log (* (+ re (sqrt (+ (* re re) (* im im)))) 2)))
(exp 1/2)
(log (* (+ 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
2
(* (sqrt 2) 1/2)
(sqrt 2)
2
1/2
(* 1/2 (sqrt (* im 2)))
1/2
(sqrt (* im 2))
(* im 2)
im
2
(* 1/2 (sqrt (- 0 (/ im re))))
1/2
(sqrt (- 0 (/ im re)))
(- 0 (/ im re))
0
(/ im re)
im
re
(* 1/2 (sqrt (/ (+ (* re re) (* im (* 2 (+ im re)))) im)))
1/2
(sqrt (/ (+ (* re re) (* im (* 2 (+ im re)))) im))
(/ (+ (* re re) (* im (* 2 (+ im re)))) im)
(+ (* re re) (* im (* 2 (+ im re))))
(* re re)
re
(* im (* 2 (+ im re)))
im
(* 2 (+ im re))
2
(+ im re)
Outputs
(* 1/2 (pow (exp 1/2) (log (* (+ re (sqrt (+ (* re re) (* im im)))) 2))))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))))
1/2
#s(literal 1/2 binary64)
(pow (exp 1/2) (log (* (+ re (sqrt (+ (* re re) (* im im)))) 2)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))))
(exp 1/2)
(exp.f64 #s(literal 1/2 binary64))
(log (* (+ re (sqrt (+ (* re re) (* im im)))) 2))
(log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))
(* (+ re (sqrt (+ (* re re) (* im im)))) 2)
(*.f64 (+.f64 re (hypot.f64 re im)) #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
2
#s(literal 2 binary64)
(* (sqrt 2) 1/2)
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
1/2
#s(literal 1/2 binary64)
(* 1/2 (sqrt (* im 2)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
1/2
#s(literal 1/2 binary64)
(sqrt (* im 2))
(sqrt.f64 (*.f64 im #s(literal 2 binary64)))
(* im 2)
(*.f64 im #s(literal 2 binary64))
im
2
#s(literal 2 binary64)
(* 1/2 (sqrt (- 0 (/ im re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 im (-.f64 #s(literal 0 binary64) re))))
1/2
#s(literal 1/2 binary64)
(sqrt (- 0 (/ im re)))
(sqrt.f64 (/.f64 im (-.f64 #s(literal 0 binary64) re)))
(- 0 (/ im re))
(/.f64 im (-.f64 #s(literal 0 binary64) re))
0
#s(literal 0 binary64)
(/ im re)
(/.f64 im re)
im
re
(* 1/2 (sqrt (/ (+ (* re re) (* im (* 2 (+ im 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 (/ (+ (* re re) (* im (* 2 (+ im re)))) im))
(sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))
(/ (+ (* re re) (* im (* 2 (+ im re)))) im)
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))
(+ (* re re) (* im (* 2 (+ im re))))
(+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))))
(* re re)
(*.f64 re re)
re
(* im (* 2 (+ im re)))
(*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))
im
(* 2 (+ im re))
(*.f64 #s(literal 2 binary64) (+.f64 re im))
2
#s(literal 2 binary64)
(+ im re)
(+.f64 re im)

localize833.0ms (7.8%)

Localize:

Found 17 expressions of interest:

NewMetricScoreProgram
accuracy100.0%
(*.f64 #s(literal 2 binary64) (+.f64 im re))
accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im (*.f64 #s(literal 2 binary64) (+.f64 im re)))) im)))
accuracy100.0%
(sqrt.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im (*.f64 #s(literal 2 binary64) (+.f64 im re)))) im))
accuracy91.6%
(/.f64 (+.f64 (*.f64 re re) (*.f64 im (*.f64 #s(literal 2 binary64) (+.f64 im re)))) im)
accuracy100.0%
(/.f64 im re)
accuracy100.0%
(-.f64 #s(literal 0 binary64) (/.f64 im re))
accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re))))
accuracy93.7%
(sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)))
accuracy100.0%
(*.f64 im #s(literal 2 binary64))
accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
accuracy100.0%
(sqrt.f64 (*.f64 im #s(literal 2 binary64)))
accuracy100.0%
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))
accuracy100.0%
(sqrt.f64 #s(literal 2 binary64))
accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))))
accuracy100.0%
(log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))
accuracy100.0%
(exp.f64 #s(literal 1/2 binary64))
accuracy98.2%
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))))
Results
649.0ms60×5exit
49.0ms139×0invalid
21.0ms57×0valid
Compiler

Compiled 182 to 30 computations (83.5% saved)

Precisions
Click to see histograms. Total time spent on operations: 664.0ms
ival-pow: 458.0ms (69% of total)
ival-mult: 42.0ms (6.3% of total)
ival-exp: 39.0ms (5.9% of total)
ival-log: 34.0ms (5.1% of total)
backward-pass: 29.0ms (4.4% of total)
ival-sqrt: 23.0ms (3.5% of total)
compiled-spec: 19.0ms (2.9% of total)
ival-add: 10.0ms (1.5% of total)
ival-div: 7.0ms (1.1% of total)
ival-sub: 2.0ms (0.3% of total)
const: 1.0ms (0.2% of total)

series42.0ms (0.4%)

Counts
18 → 324
Calls
Call 1
Inputs
#<alt (* 1/2 (pow (exp 1/2) (log (* (+ re (sqrt (+ (* re re) (* im im)))) 2))))>
#<alt (pow (exp 1/2) (log (* (+ re (sqrt (+ (* re re) (* im im)))) 2)))>
#<alt (exp 1/2)>
#<alt (log (* (+ re (sqrt (+ (* re re) (* im im)))) 2))>
#<alt (* (sqrt 2) 1/2)>
#<alt (sqrt 2)>
#<alt (* 1/2 (sqrt (* im 2)))>
#<alt (sqrt (* im 2))>
#<alt (* im 2)>
#<alt (* 1/2 (sqrt (- 0 (/ im re))))>
#<alt (sqrt (- 0 (/ im re)))>
#<alt (- 0 (/ im re))>
#<alt (/ im re)>
#<alt (* 1/2 (sqrt (/ (+ (* re re) (* im (* 2 (+ im re)))) im)))>
#<alt (sqrt (/ (+ (* re re) (* im (* 2 (+ im re)))) im))>
#<alt (/ (+ (* re re) (* im (* 2 (+ im re)))) im)>
#<alt (+ (* re re) (* im (* 2 (+ im re))))>
#<alt (* 2 (+ im re))>
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 (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))))>
#<alt (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))) (* 1/2 (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))))>
#<alt (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))) (+ (* 1/2 (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))) (* 1/2 (/ (* (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))>
#<alt (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))) (+ (* 1/2 (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))) (+ (* 1/2 (/ (* (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/3072 (pow im 6)) (+ (* 1/1440 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6))))) (* 1/384 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (pow re 6))) (* 1/2 (/ (* (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))))>
#<alt (* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))))>
#<alt (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))) (* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))))>
#<alt (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))) (+ (* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))) (* 1/2 (/ (* (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))>
#<alt (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))) (+ (* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))) (+ (* 1/2 (/ (* (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* -1/384 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/3072 (pow im 6)) (* 1/1440 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6))) (* 1/2 (/ (* (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))))>
#<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)))) (* 21/1024 (* (pow im 2) (sqrt (/ 1 (pow re 11))))))))))>
#<alt (* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))))>
#<alt (+ (* 1/4 (/ (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))))>
#<alt (+ (* 1/4 (/ (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))) (* 1/2 (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))>
#<alt (+ (* 1/4 (/ (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))) (+ (* 1/2 (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/48 (pow re 3)) (+ (* 1/12 (+ (* -3 (pow re 3)) (* 2 (pow re 3)))) (* 1/8 (* re (+ (* -1 (pow re 2)) (pow re 2))))))) (pow im 3))) (* 1/2 (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))))>
#<alt (* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))))>
#<alt (+ (* -1/4 (/ (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))) im)) (* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))))>
#<alt (+ (* -1 (/ (+ (* -1/2 (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* 1/4 (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)) (* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))))>
#<alt (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/48 (pow re 3)) (+ (* 1/12 (+ (* -3 (pow re 3)) (* 2 (pow re 3)))) (* 1/8 (* re (+ (* -1 (pow re 2)) (pow re 2))))))) im)) (* 1/2 (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))))) im)) (* 1/4 (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)) (* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))))>
#<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 (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))>
#<alt (+ (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (* 1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))))>
#<alt (+ (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))) (/ (* (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))>
#<alt (+ (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/3072 (pow im 6)) (+ (* 1/1440 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6))))) (* 1/384 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (pow re 6)) (/ (* (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))>
#<alt (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))>
#<alt (+ (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (* -1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))))>
#<alt (+ (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* -1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))>
#<alt (+ (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* -1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* -1/384 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/3072 (pow im 6)) (* 1/1440 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))>
#<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)))) (* 21/512 (* (pow im 2) (sqrt (/ 1 (pow re 11))))))))))>
#<alt (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))>
#<alt (+ (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (* 1/2 (/ (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))>
#<alt (+ (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/2 (/ (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))>
#<alt (+ (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/2 (/ (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/48 (pow re 3)) (+ (* 1/12 (+ (* -3 (pow re 3)) (* 2 (pow re 3)))) (* 1/8 (* re (+ (* -1 (pow re 2)) (pow re 2))))))) (pow im 3)) (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))>
#<alt (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))>
#<alt (+ (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1/2 (/ (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))>
#<alt (+ (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* 1/2 (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))>
#<alt (+ (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/48 (pow re 3)) (+ (* 1/12 (+ (* -3 (pow re 3)) (* 2 (pow re 3)))) (* 1/8 (* re (+ (* -1 (pow re 2)) (pow re 2))))))) im)) (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* 1/2 (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))>
#<alt (log (* 2 im))>
#<alt (+ (log (* 2 im)) (/ re im))>
#<alt (+ (log (* 2 im)) (* re (+ (* -1/6 (/ (pow re 2) (pow im 3))) (/ 1 im))))>
#<alt (+ (log (* 2 im)) (* re (+ (* (pow re 2) (- (* 3/40 (/ (pow re 2) (pow im 5))) (* 1/6 (/ 1 (pow im 3))))) (/ 1 im))))>
#<alt (+ (log 4) (* -1 (log (/ 1 re))))>
#<alt (+ (log 4) (+ (* -1 (log (/ 1 re))) (* 1/4 (/ (pow im 2) (pow re 2)))))>
#<alt (+ (log 4) (+ (* -1 (log (/ 1 re))) (+ (* 1/24 (/ (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))) (pow re 4))) (* 1/4 (/ (pow im 2) (pow re 2))))))>
#<alt (+ (log 4) (+ (* -1 (log (/ 1 re))) (+ (* 1/720 (/ (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6)))) (pow re 6))) (+ (* 1/24 (/ (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))) (pow re 4))) (* 1/4 (/ (pow im 2) (pow re 2)))))))>
#<alt (+ (log (/ -1 re)) (log (pow im 2)))>
#<alt (+ (log (/ -1 re)) (+ (log (pow im 2)) (* -1/4 (/ (pow im 2) (pow re 2)))))>
#<alt (+ (log (/ -1 re)) (+ (log (pow im 2)) (+ (* -1/4 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))) (pow re 4))))))>
#<alt (+ (log (/ -1 re)) (+ (log (pow im 2)) (+ (* -1/4 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))) (pow re 6))) (* 1/24 (/ (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))) (pow re 4)))))))>
#<alt (log (* 4 re))>
#<alt (+ (log (* 4 re)) (* 1/4 (/ (pow im 2) (pow re 2))))>
#<alt (+ (log (* 4 re)) (* (pow im 2) (+ (* -3/32 (/ (pow im 2) (pow re 4))) (* 1/4 (/ 1 (pow re 2))))))>
#<alt (+ (log (* 4 re)) (* (pow im 2) (+ (* (pow im 2) (- (* 5/96 (/ (pow im 2) (pow re 6))) (* 3/32 (/ 1 (pow re 4))))) (* 1/4 (/ 1 (pow re 2))))))>
#<alt (+ (log 2) (* -1 (log (/ 1 im))))>
#<alt (+ (log 2) (+ (* -1 (log (/ 1 im))) (/ re im)))>
#<alt (+ (log 2) (+ (* -1 (log (/ 1 im))) (+ (* 1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow im 2))) (/ re im))))>
#<alt (+ (log 2) (+ (* -1 (log (/ 1 im))) (+ (* 1/6 (/ (+ (* -3 (pow re 3)) (* 2 (pow re 3))) (pow im 3))) (+ (* 1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow im 2))) (/ re im)))))>
#<alt (+ (log 2) (* -1 (log (/ -1 im))))>
#<alt (+ (log 2) (+ (* -1 (log (/ -1 im))) (* -1 (/ re im))))>
#<alt (+ (log 2) (+ (* -1 (log (/ -1 im))) (* -1 (/ (+ re (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) im))) im))))>
#<alt (+ (log 2) (+ (* -1 (log (/ -1 im))) (* -1 (/ (+ re (* -1 (/ (+ (* -1/6 (/ (+ (* -3 (pow re 3)) (* 2 (pow re 3))) im)) (* 1/2 (+ (* -1 (pow re 2)) (pow re 2)))) im))) im))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 1/2 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* 1/2 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* 1/2 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* 1/2 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* 1/2 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* 1/2 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* 1/2 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* 1/2 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* -1/2 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* -1/2 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* -1/2 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* -1/2 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* 1/2 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* 1/2 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* 1/2 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* 1/2 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* 1/2 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* 1/2 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* 1/2 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* 1/2 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* 1/2 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* 1/2 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* 1/2 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* 1/2 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* (sqrt (/ im re)) (sqrt -1))>
#<alt (* (sqrt (/ im re)) (sqrt -1))>
#<alt (* (sqrt (/ im re)) (sqrt -1))>
#<alt (* (sqrt (/ im re)) (sqrt -1))>
#<alt (* (sqrt (/ im re)) (sqrt -1))>
#<alt (* (sqrt (/ im re)) (sqrt -1))>
#<alt (* (sqrt (/ im re)) (sqrt -1))>
#<alt (* (sqrt (/ im re)) (sqrt -1))>
#<alt (* -1 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* -1 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* -1 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* -1 (* (sqrt (/ im re)) (sqrt -1)))>
#<alt (* (sqrt (/ im re)) (sqrt -1))>
#<alt (* (sqrt (/ im re)) (sqrt -1))>
#<alt (* (sqrt (/ im re)) (sqrt -1))>
#<alt (* (sqrt (/ im re)) (sqrt -1))>
#<alt (* (sqrt (/ im re)) (sqrt -1))>
#<alt (* (sqrt (/ im re)) (sqrt -1))>
#<alt (* (sqrt (/ im re)) (sqrt -1))>
#<alt (* (sqrt (/ im re)) (sqrt -1))>
#<alt (* (sqrt (/ im re)) (sqrt -1))>
#<alt (* (sqrt (/ im re)) (sqrt -1))>
#<alt (* (sqrt (/ im re)) (sqrt -1))>
#<alt (* (sqrt (/ im re)) (sqrt -1))>
#<alt (* -1 (/ im re))>
#<alt (* -1 (/ im re))>
#<alt (* -1 (/ im re))>
#<alt (* -1 (/ im re))>
#<alt (* -1 (/ im re))>
#<alt (* -1 (/ im re))>
#<alt (* -1 (/ im re))>
#<alt (* -1 (/ im re))>
#<alt (* -1 (/ im re))>
#<alt (* -1 (/ im re))>
#<alt (* -1 (/ im re))>
#<alt (* -1 (/ im re))>
#<alt (* -1 (/ im re))>
#<alt (* -1 (/ im re))>
#<alt (* -1 (/ im re))>
#<alt (* -1 (/ im re))>
#<alt (* -1 (/ im re))>
#<alt (* -1 (/ im re))>
#<alt (* -1 (/ im re))>
#<alt (* -1 (/ im re))>
#<alt (* -1 (/ im re))>
#<alt (* -1 (/ im re))>
#<alt (* -1 (/ im re))>
#<alt (* -1 (/ 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 (/ im re)>
#<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 (* 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) (* (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)) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2))))))))>
#<alt (* -1 (* im (+ (* -1 (/ (+ (* 1/4 (* (sqrt im) (/ (* (pow re 2) (pow (sqrt -1) 2)) (sqrt 2)))) (* 1/4 (* (sqrt im) (/ (* (pow re 2) (pow (sqrt -1) 2)) (pow (sqrt 2) 3))))) (pow im 3))) (+ (* -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 (* (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 (* (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) (* (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)) (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 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow re 2) (pow (sqrt -1) 2)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (pow (sqrt -1) 2)) (pow (sqrt 2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 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 (/ (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 (pow im 2))>
#<alt (+ (* 2 (* im re)) (* 2 (pow im 2)))>
#<alt (+ (* 2 (pow im 2)) (* re (+ re (* 2 im))))>
#<alt (+ (* 2 (pow im 2)) (* re (+ re (* 2 im))))>
#<alt (pow re 2)>
#<alt (* (pow re 2) (+ 1 (* 2 (/ im re))))>
#<alt (* (pow re 2) (+ 1 (+ (* 2 (/ im re)) (* 2 (/ (pow im 2) (pow re 2))))))>
#<alt (* (pow re 2) (+ 1 (+ (* 2 (/ im re)) (* 2 (/ (pow im 2) (pow re 2))))))>
#<alt (pow re 2)>
#<alt (* (pow re 2) (+ 1 (* 2 (/ im re))))>
#<alt (* (pow re 2) (+ 1 (* -1 (/ (+ (* -2 im) (* -2 (/ (pow im 2) re))) re))))>
#<alt (* (pow re 2) (+ 1 (* -1 (/ (+ (* -2 im) (* -2 (/ (pow im 2) re))) re))))>
#<alt (pow re 2)>
#<alt (+ (* 2 (* im re)) (pow re 2))>
#<alt (+ (* im (+ (* 2 im) (* 2 re))) (pow re 2))>
#<alt (+ (* im (+ (* 2 im) (* 2 re))) (pow re 2))>
#<alt (* 2 (pow im 2))>
#<alt (* (pow im 2) (+ 2 (* 2 (/ re im))))>
#<alt (* (pow im 2) (+ 2 (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2)))))>
#<alt (* (pow im 2) (+ 2 (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2)))))>
#<alt (* 2 (pow im 2))>
#<alt (* (pow im 2) (+ 2 (* 2 (/ re im))))>
#<alt (* (pow im 2) (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im))))>
#<alt (* (pow im 2) (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im))))>
#<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)))>
Calls

81 calls:

TimeVariablePointExpression
19.0ms
im
@inf
(* 1/2 (sqrt (/ (+ (* re re) (* im (* 2 (+ im re)))) im)))
2.0ms
re
@inf
(* 1/2 (pow (exp 1/2) (log (* (+ re (sqrt (+ (* re re) (* im im)))) 2))))
1.0ms
re
@-inf
(* 1/2 (pow (exp 1/2) (log (* (+ re (sqrt (+ (* re re) (* im im)))) 2))))
1.0ms
im
@-inf
(* 1/2 (sqrt (/ (+ (* re re) (* im (* 2 (+ im re)))) im)))
1.0ms
im
@inf
(* 1/2 (pow (exp 1/2) (log (* (+ re (sqrt (+ (* re re) (* im im)))) 2))))

rewrite331.0ms (3.1%)

Algorithm
batch-egg-rewrite
Rules
3140×*-lowering-*.f32
3140×*-lowering-*.f64
2964×/-lowering-/.f32
2964×/-lowering-/.f64
1696×+-lowering-+.f64
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
031127
1147127
21196123
08440123
Stop Event
iter limit
node limit
Counts
18 → 413
Calls
Call 1
Inputs
(* 1/2 (pow (exp 1/2) (log (* (+ re (sqrt (+ (* re re) (* im im)))) 2))))
(pow (exp 1/2) (log (* (+ re (sqrt (+ (* re re) (* im im)))) 2)))
(exp 1/2)
(log (* (+ re (sqrt (+ (* re re) (* im im)))) 2))
(* (sqrt 2) 1/2)
(sqrt 2)
(* 1/2 (sqrt (* im 2)))
(sqrt (* im 2))
(* im 2)
(* 1/2 (sqrt (- 0 (/ im re))))
(sqrt (- 0 (/ im re)))
(- 0 (/ im re))
(/ im re)
(* 1/2 (sqrt (/ (+ (* re re) (* im (* 2 (+ im re)))) im)))
(sqrt (/ (+ (* re re) (* im (* 2 (+ im re)))) im))
(/ (+ (* re re) (* im (* 2 (+ im re)))) im)
(+ (* re re) (* im (* 2 (+ im re))))
(* 2 (+ im re))
Outputs
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (pow.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (pow.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (/.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 2 binary64)))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))))))
(exp.f64 (*.f64 (log.f64 (pow.f64 (pow.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal 1 binary64))) (/.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 2 binary64))))
(exp.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 2 binary64) (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))))) #s(literal 2 binary64)))
(exp.f64 (+.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 2 binary64) (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))))) (/.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 2 binary64) (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))))))
(sqrt.f64 (exp.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (+.f64 (/.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 2 binary64))))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))))))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (*.f64 (/.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64)))
(pow.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (pow.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 #s(literal 1 binary64)) (/.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 2 binary64)))
(pow.f64 (pow.f64 (exp.f64 #s(literal 1 binary64)) #s(literal 1/2 binary64)) (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))))
(pow.f64 (pow.f64 (exp.f64 #s(literal 1 binary64)) (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (pow.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (pow.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 re (hypot.f64 re im))))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))))
(*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 re (hypot.f64 re im))))))
(*.f64 (pow.f64 (exp.f64 #s(literal 1 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 re (hypot.f64 re im))))) (pow.f64 (exp.f64 #s(literal 1 binary64)) (*.f64 #s(literal 1/2 binary64) (log.f64 #s(literal 2 binary64)))))
(*.f64 (pow.f64 (exp.f64 #s(literal 1 binary64)) (*.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 1/2 binary64))) (pow.f64 (exp.f64 #s(literal 1 binary64)) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(*.f64 (exp.f64 (*.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (/.f64 (+.f64 (/.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (/.f64 (+.f64 (/.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 2 binary64))) #s(literal 2 binary64))))
(*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))))) #s(literal 2 binary64))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (/.f64 (/.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))))) #s(literal 2 binary64))))
(*.f64 (pow.f64 (pow.f64 (pow.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (pow.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(exp.f64 #s(literal 1/2 binary64))
(log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))
(+.f64 (log.f64 (+.f64 re (hypot.f64 re im))) (log.f64 #s(literal 2 binary64)))
(+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (+.f64 re (hypot.f64 re im))))
(-.f64 (log.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))))) (log.f64 (+.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (hypot.f64 re im))))))
(-.f64 (log.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))))) (log.f64 (-.f64 re (hypot.f64 re im))))
(-.f64 (log.f64 (*.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) #s(literal 2 binary64))) (log.f64 (+.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (hypot.f64 re im))))))
(-.f64 (log.f64 (*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) #s(literal 2 binary64))) (log.f64 (-.f64 re (hypot.f64 re im))))
(-.f64 (/.f64 (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (log.f64 (/.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))) (/.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (/.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (-.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 (+.f64 re (hypot.f64 re im))) (log.f64 #s(literal 2 binary64))))) (+.f64 (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 3 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (log.f64 (/.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) (*.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) (log.f64 (/.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 3 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (-.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 (+.f64 re (hypot.f64 re im))) (log.f64 #s(literal 2 binary64))))))
(/.f64 (*.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) (log.f64 (/.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))) (log.f64 (/.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 3 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (-.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 (+.f64 re (hypot.f64 re im))) (log.f64 #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (*.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) (log.f64 (/.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))))) (neg.f64 (log.f64 (/.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 3 binary64))) (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (-.f64 (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (+.f64 re (hypot.f64 re im)))))))
(/.f64 (-.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64))) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (+.f64 re (hypot.f64 re im)))))
(*.f64 (+.f64 (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 3 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (-.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 (+.f64 re (hypot.f64 re im))) (log.f64 #s(literal 2 binary64)))))))
(*.f64 (*.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) (log.f64 (/.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))) (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 im) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(sqrt.f64 (*.f64 im #s(literal 2 binary64)))
(pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 im #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)))
(*.f64 im #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) im)
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re))) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re))) #s(literal 1/2 binary64)))
(sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)))
(/.f64 (/.f64 im re) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re))))
(/.f64 (sqrt.f64 im) (sqrt.f64 (-.f64 #s(literal 0 binary64) re)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 re im))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 im re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 im re) (sqrt.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re))))))
(/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (/.f64 im re) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) (/.f64 re im)))))
(/.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re)))) (/.f64 im re))
(/.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) (/.f64 re im))) (pow.f64 (/.f64 im re) #s(literal 1/2 binary64)))
(/.f64 (pow.f64 (-.f64 #s(literal 0 binary64) im) #s(literal 1/2 binary64)) (sqrt.f64 re))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 re im)))
(/.f64 (sqrt.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) (/.f64 re im))))
(/.f64 (neg.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (/.f64 im re)))
(/.f64 (neg.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) (/.f64 re im)))) (neg.f64 (pow.f64 (/.f64 im re) #s(literal 1/2 binary64))))
(pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) #s(literal 1/2 binary64))
(pow.f64 (/.f64 im (/.f64 re (/.f64 im re))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 im) (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) re)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 im) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) re))))
(*.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re)))) (/.f64 re im))
(*.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re)))) (pow.f64 (/.f64 (/.f64 re im) (/.f64 im re)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re)))) (sqrt.f64 (/.f64 (/.f64 re im) (/.f64 im re))))
(*.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) (/.f64 re im))) (pow.f64 (/.f64 re im) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) (/.f64 re im))) (sqrt.f64 (/.f64 re im)))
(*.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) (/.f64 re im))) (/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 im re) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) im) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) im) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) #s(literal 1/4 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 1/2 binary64)) (pow.f64 (/.f64 im re) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (/.f64 im re) #s(literal 1/2 binary64)))
(+.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (/.f64 im re)))
(+.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) #s(literal 0 binary64))
(-.f64 #s(literal 0 binary64) (/.f64 im re))
(fma.f64 im (-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) re)) #s(literal 0 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 #s(literal 1 binary64) re) #s(literal 0 binary64))
(fma.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re))) (/.f64 (/.f64 re im) (/.f64 im re)) #s(literal 0 binary64))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) (/.f64 re im)) (/.f64 re im) #s(literal 0 binary64))
(fma.f64 #s(literal -1 binary64) (/.f64 im re) #s(literal 0 binary64))
(neg.f64 (/.f64 im re))
(/.f64 im (-.f64 #s(literal 0 binary64) re))
(/.f64 (-.f64 #s(literal 0 binary64) im) re)
(/.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) (/.f64 re im)))
(/.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re))) (/.f64 im (/.f64 re (/.f64 im re))))
(/.f64 (/.f64 im (/.f64 re (/.f64 im re))) (-.f64 #s(literal 0 binary64) (/.f64 im re)))
(/.f64 (/.f64 im (/.f64 re (/.f64 im re))) (-.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) #s(literal 0 binary64)))
(/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 re im)))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 im re))))
(/.f64 #s(literal 1 binary64) (/.f64 re (-.f64 #s(literal 0 binary64) im)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) re) im))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 re im)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 im re))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 re im) #s(literal -1 binary64)))
(/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) (/.f64 re im)) (/.f64 im re))
(/.f64 #s(literal -1 binary64) (/.f64 re im))
(/.f64 #s(literal -1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (/.f64 re im))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 im re)))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 (/.f64 im (/.f64 re (/.f64 im re))) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))))) (/.f64 (/.f64 im (/.f64 re (/.f64 im re))) (/.f64 (/.f64 re im) (/.f64 im re))))
(/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re))) #s(literal 0 binary64)) (+.f64 (/.f64 im (/.f64 re (/.f64 im re))) (-.f64 #s(literal 0 binary64) (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) #s(literal 0 binary64)))))
(pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 re im)) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 im re))) #s(literal -1 binary64))
(*.f64 im (/.f64 #s(literal -1 binary64) re))
(*.f64 im (-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) re)))
(*.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 #s(literal 1 binary64) re))
(*.f64 (-.f64 #s(literal 0 binary64) im) (neg.f64 (/.f64 #s(literal -1 binary64) re)))
(*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) (/.f64 re im))))
(*.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re))) (/.f64 (/.f64 re im) (/.f64 im re)))
(*.f64 (/.f64 im (/.f64 re (/.f64 im re))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 im re))))
(*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 im re)))
(*.f64 (/.f64 #s(literal 1 binary64) re) (-.f64 #s(literal 0 binary64) im))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) (/.f64 re im)) (/.f64 re im))
(*.f64 #s(literal -1 binary64) (/.f64 im re))
(*.f64 (-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) re)) im)
(+.f64 #s(literal 0 binary64) (/.f64 im re))
(+.f64 (/.f64 im re) #s(literal 0 binary64))
(exp.f64 (*.f64 (log.f64 (/.f64 re im)) #s(literal -1 binary64)))
(fabs.f64 (/.f64 im re))
(-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (/.f64 im re)))
(sqrt.f64 (/.f64 im (/.f64 re (/.f64 im re))))
(fma.f64 im (/.f64 #s(literal 1 binary64) re) #s(literal 0 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 #s(literal -1 binary64) re) #s(literal 0 binary64))
(fma.f64 #s(literal 1 binary64) (/.f64 im re) #s(literal 0 binary64))
(fma.f64 (/.f64 #s(literal 1 binary64) re) im #s(literal 0 binary64))
(neg.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)))
(/.f64 im re)
(/.f64 (sqrt.f64 im) (sqrt.f64 (/.f64 re (/.f64 im re))))
(/.f64 (sqrt.f64 im) (sqrt.f64 (*.f64 (/.f64 re im) re)))
(/.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 0 binary64) re))
(/.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (/.f64 im (/.f64 re (/.f64 im re))))
(/.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re))) (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) (/.f64 re im)))
(/.f64 (/.f64 im (/.f64 re (/.f64 im re))) (/.f64 im re))
(/.f64 (/.f64 im (/.f64 re (/.f64 im re))) (-.f64 (/.f64 im re) #s(literal 0 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 re im))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (/.f64 re im) (/.f64 im re))))
(/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (/.f64 re im))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 im (/.f64 re (/.f64 im re))) (/.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) (/.f64 re im))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 im re) (/.f64 im (/.f64 re (/.f64 im re)))))
(/.f64 (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) (/.f64 re im)) (-.f64 #s(literal 0 binary64) (/.f64 im re)))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 re im)))
(/.f64 (pow.f64 (/.f64 im re) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 re im)))
(/.f64 (pow.f64 (-.f64 #s(literal 0 binary64) im) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 im re))))
(/.f64 (pow.f64 (-.f64 #s(literal 0 binary64) im) #s(literal 1/2 binary64)) (sqrt.f64 (*.f64 (/.f64 re im) (-.f64 #s(literal 0 binary64) re))))
(/.f64 (sqrt.f64 (*.f64 im im)) (sqrt.f64 (*.f64 re re)))
(/.f64 (sqrt.f64 (*.f64 (/.f64 im re) im)) (sqrt.f64 re))
(/.f64 (sqrt.f64 (*.f64 (/.f64 im (/.f64 re (/.f64 im re))) (/.f64 (/.f64 im (/.f64 re (/.f64 im re))) (/.f64 (/.f64 re im) (/.f64 im re))))) (sqrt.f64 (/.f64 (/.f64 im (/.f64 re (/.f64 im re))) (/.f64 (/.f64 re im) (/.f64 im re)))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 im (/.f64 re (/.f64 im re))) (/.f64 (/.f64 re im) (/.f64 im re))))) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) (/.f64 re im))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re))))
(/.f64 (sqrt.f64 (/.f64 (/.f64 im (/.f64 re (/.f64 im re))) (/.f64 (/.f64 re im) (/.f64 im re)))) (/.f64 im re))
(/.f64 (sqrt.f64 (*.f64 (/.f64 im re) (-.f64 #s(literal 0 binary64) im))) (sqrt.f64 (-.f64 #s(literal 0 binary64) re)))
(/.f64 (sqrt.f64 (/.f64 im (/.f64 re im))) (sqrt.f64 re))
(/.f64 (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 re im))) (sqrt.f64 (-.f64 #s(literal 0 binary64) re)))
(/.f64 (+.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) #s(literal 0 binary64)) (/.f64 im (/.f64 re (/.f64 im re))))
(pow.f64 (/.f64 im re) #s(literal 1 binary64))
(pow.f64 (/.f64 im (/.f64 re (/.f64 im re))) #s(literal 1/2 binary64))
(pow.f64 (/.f64 re im) #s(literal -1 binary64))
(*.f64 im (/.f64 #s(literal 1 binary64) re))
(*.f64 im (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 re im)) (/.f64 im re)))
(*.f64 im (neg.f64 (-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) re))))
(*.f64 (/.f64 im re) #s(literal 1 binary64))
(*.f64 (/.f64 im re) (/.f64 (/.f64 im re) (/.f64 im re)))
(*.f64 (sqrt.f64 im) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 re im))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 #s(literal -1 binary64) re))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 0 binary64) (/.f64 #s(literal 1 binary64) re)))
(*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 re (*.f64 re re))) (/.f64 (/.f64 re im) (/.f64 im re)))
(*.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im (*.f64 im im))) (*.f64 re (*.f64 re re))) (neg.f64 (/.f64 (/.f64 re im) (/.f64 im re))))
(*.f64 (/.f64 im (/.f64 re (/.f64 im re))) (/.f64 re im))
(*.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 (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) (/.f64 re im)) (-.f64 #s(literal 0 binary64) (/.f64 re im)))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)) (/.f64 re im)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 im re))))
(*.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 im re)))
(*.f64 (pow.f64 (/.f64 im re) #s(literal 1/2 binary64)) (pow.f64 (/.f64 im re) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (*.f64 im im)) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re)))
(*.f64 (sqrt.f64 (*.f64 (/.f64 im re) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(*.f64 (/.f64 (/.f64 im re) im) (/.f64 (/.f64 im (/.f64 re (/.f64 im re))) (/.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 re im))))
(*.f64 (/.f64 (/.f64 im re) im) (/.f64 (/.f64 im re) (/.f64 #s(literal 1 binary64) re)))
(*.f64 (/.f64 (/.f64 im re) (*.f64 im im)) (/.f64 (/.f64 im (/.f64 re (/.f64 im re))) (/.f64 (/.f64 #s(literal 1 binary64) re) re)))
(*.f64 (/.f64 (/.f64 im re) (/.f64 im re)) (/.f64 im re))
(*.f64 (/.f64 (/.f64 im re) (*.f64 (/.f64 im re) im)) (/.f64 (/.f64 im (/.f64 re (/.f64 im re))) (/.f64 #s(literal 1 binary64) re)))
(*.f64 (/.f64 (*.f64 im (*.f64 im im)) im) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))) (/.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 re im))))
(*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 im im)) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))) (/.f64 (/.f64 #s(literal 1 binary64) re) re)))
(*.f64 (/.f64 (*.f64 im (*.f64 im im)) (/.f64 im re)) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))) (/.f64 im re)))
(*.f64 (/.f64 (*.f64 im (*.f64 im im)) (*.f64 (/.f64 im re) im)) (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) re)))
(*.f64 (/.f64 (/.f64 im (/.f64 re (/.f64 im re))) im) (/.f64 (/.f64 im re) (/.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 re im))))
(*.f64 (/.f64 (/.f64 im (/.f64 re (/.f64 im re))) (*.f64 im im)) (/.f64 (/.f64 im re) (/.f64 (/.f64 #s(literal 1 binary64) re) re)))
(*.f64 (/.f64 (/.f64 im (/.f64 re (/.f64 im re))) (*.f64 (/.f64 im re) im)) (/.f64 (/.f64 im re) (/.f64 #s(literal 1 binary64) re)))
(*.f64 (/.f64 (/.f64 im re) (/.f64 #s(literal 1 binary64) re)) (/.f64 (/.f64 im re) im))
(*.f64 (/.f64 (pow.f64 (/.f64 im re) #s(literal 3/2 binary64)) im) (/.f64 (pow.f64 (/.f64 im re) #s(literal 3/2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 re im))))
(*.f64 (/.f64 (pow.f64 (/.f64 im re) #s(literal 3/2 binary64)) (*.f64 im im)) (/.f64 (pow.f64 (/.f64 im re) #s(literal 3/2 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) re) re)))
(*.f64 (/.f64 (pow.f64 (/.f64 im re) #s(literal 3/2 binary64)) (/.f64 im re)) (/.f64 (pow.f64 (/.f64 im re) #s(literal 3/2 binary64)) (/.f64 im re)))
(*.f64 (/.f64 (pow.f64 (/.f64 im re) #s(literal 3/2 binary64)) (*.f64 (/.f64 im re) im)) (/.f64 (pow.f64 (/.f64 im re) #s(literal 3/2 binary64)) (/.f64 #s(literal 1 binary64) re)))
(*.f64 (/.f64 im im) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 re im)) (/.f64 #s(literal 1 binary64) re)))
(*.f64 (/.f64 im (-.f64 #s(literal 0 binary64) im)) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 re im)) (/.f64 #s(literal -1 binary64) re)))
(*.f64 (/.f64 im (/.f64 #s(literal 1 binary64) re)) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 re im)) im))
(*.f64 (/.f64 (*.f64 im im) im) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) (/.f64 #s(literal 1 binary64) re)))
(*.f64 (/.f64 (*.f64 im im) (-.f64 #s(literal 0 binary64) im)) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) (/.f64 #s(literal -1 binary64) re)))
(*.f64 (/.f64 (*.f64 im im) #s(literal 1 binary64)) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) (/.f64 im re)))
(*.f64 (/.f64 (*.f64 im im) (/.f64 #s(literal 1 binary64) re)) (/.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) re) im))
(*.f64 (/.f64 (/.f64 im re) (-.f64 #s(literal 0 binary64) im)) (/.f64 (/.f64 im re) (/.f64 #s(literal -1 binary64) re)))
(*.f64 (/.f64 (/.f64 im re) #s(literal 1 binary64)) (/.f64 (/.f64 im re) (/.f64 im re)))
(*.f64 (/.f64 (*.f64 (/.f64 im re) im) im) (/.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 #s(literal 1 binary64) re)))
(*.f64 (/.f64 (*.f64 (/.f64 im re) im) (-.f64 #s(literal 0 binary64) im)) (/.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 #s(literal -1 binary64) re)))
(*.f64 (/.f64 (*.f64 (/.f64 im re) im) #s(literal 1 binary64)) (/.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 im re)))
(*.f64 (/.f64 (*.f64 (/.f64 im re) im) (/.f64 #s(literal 1 binary64) re)) (/.f64 (/.f64 #s(literal 1 binary64) re) im))
(/.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 im (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 im) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))))) #s(literal 1/2 binary64))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))))) (sqrt.f64 im))
(/.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))))) #s(literal 1/2 binary64)) (sqrt.f64 im))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 im)))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))))) #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 im)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))) im)))
(*.f64 (sqrt.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))) im)) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))))) (pow.f64 im #s(literal -1/2 binary64)))
(*.f64 (*.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))))) #s(literal 1/2 binary64)) (pow.f64 im #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))) im)) #s(literal 1/2 binary64)))
(sqrt.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))) im))
(/.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))))) (sqrt.f64 im))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 im (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 im (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))))) #s(literal 1 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (/.f64 im (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))) (*.f64 re re))) (pow.f64 (-.f64 #s(literal 0 binary64) im) #s(literal 1/2 binary64)))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (+.f64 re im) (*.f64 (+.f64 re im) (+.f64 re im)))))) (sqrt.f64 (*.f64 im (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re)))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (+.f64 re im) (*.f64 (+.f64 re im) (+.f64 re im)))))) (sqrt.f64 (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re)))) im)))
(/.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im)))))) (sqrt.f64 (*.f64 im (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im)))))) (sqrt.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))) im)))
(/.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))))) (-.f64 #s(literal 0 binary64) (sqrt.f64 im)))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))))))))
(/.f64 (sqrt.f64 (/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (+.f64 re im) (*.f64 (+.f64 re im) (+.f64 re im))))) im)) (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re))))))
(/.f64 (sqrt.f64 (/.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im))))) im)) (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))) (*.f64 re re)))) (neg.f64 (pow.f64 (-.f64 #s(literal 0 binary64) im) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 im))))
(pow.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))) im) #s(literal 1/2 binary64))
(pow.f64 (/.f64 im (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))))) #s(literal -1/2 binary64))
(pow.f64 (sqrt.f64 (/.f64 im (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))) im) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))) im) (/.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))) im)) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))) im))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))))) (pow.f64 im #s(literal -1/2 binary64)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))) im)))
(*.f64 (pow.f64 im #s(literal -1/2 binary64)) (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))) (*.f64 re re))) (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))) (*.f64 re re))) (sqrt.f64 (/.f64 #s(literal -1 binary64) im)))
(*.f64 (sqrt.f64 (-.f64 (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))) (*.f64 re re))) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) im) #s(literal 1/2 binary64))))
(*.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 im))))
(*.f64 (pow.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))) im) #s(literal 1/4 binary64)) (pow.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))) im) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))) im)))
(exp.f64 (*.f64 (log.f64 (/.f64 im (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (-.f64 (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))) (*.f64 re re)) im))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) im)) (/.f64 (-.f64 (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))) (*.f64 re re)) im))
(-.f64 (/.f64 (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))) im) (/.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im)))) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))) im))
(-.f64 (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))))) (/.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im)))) (*.f64 im (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))))))
(neg.f64 (/.f64 (-.f64 (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))) (*.f64 re re)) im))
(/.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))) im)
(/.f64 (-.f64 (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))) (*.f64 re re)) (-.f64 #s(literal 0 binary64) im))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (+.f64 re im) (*.f64 (+.f64 re im) (+.f64 re im))))) (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re)))) im))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (+.f64 re im) (*.f64 (+.f64 re im) (+.f64 re im))))) (*.f64 im (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re))))))
(/.f64 #s(literal 1 binary64) (/.f64 im (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))))))
(/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (/.f64 im (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re))))) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (+.f64 re im) (*.f64 (+.f64 re im) (+.f64 re im)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re)))) im) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (+.f64 re im) (*.f64 (+.f64 re im) (+.f64 re im)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))) im) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re)))) (/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (+.f64 re im) (*.f64 (+.f64 re im) (+.f64 re im))))) im)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))) (/.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im))))) im)))
(/.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))))))
(/.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im))))) (*.f64 (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))) im))
(/.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im))))) (*.f64 im (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 im (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (+.f64 re im) (*.f64 (+.f64 re im) (+.f64 re im)))))) (neg.f64 (*.f64 im (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (+.f64 re im) (*.f64 (+.f64 re im) (+.f64 re im)))))) (neg.f64 (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re)))) im)))
(/.f64 (*.f64 (-.f64 (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))) (*.f64 re re)) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))) (neg.f64 (*.f64 im (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))))))
(/.f64 (*.f64 (-.f64 (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))) (*.f64 re re)) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))) (neg.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))) im)))
(/.f64 (/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (+.f64 re im) (*.f64 (+.f64 re im) (+.f64 re im))))) im) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re)))))
(/.f64 (/.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im))))) im) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))))
(/.f64 (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (+.f64 re im) (*.f64 (+.f64 re im) (+.f64 re im))))) im)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re))))))
(/.f64 (neg.f64 (/.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im))))) im)) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))))
(pow.f64 (/.f64 im (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))))) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))) (/.f64 #s(literal 1 binary64) im))
(*.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))) im) (/.f64 (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))))
(*.f64 (sqrt.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))) im)) (sqrt.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))) im)))
(*.f64 (-.f64 (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))) (*.f64 re re)) (/.f64 #s(literal -1 binary64) im))
(*.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (+.f64 re im) (*.f64 (+.f64 re im) (+.f64 re im))))) (/.f64 #s(literal 1 binary64) (*.f64 im (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re)))))))
(*.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (+.f64 re im) (*.f64 (+.f64 re im) (+.f64 re im))))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re)))) im)))
(*.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))) im))
(*.f64 (/.f64 #s(literal 1 binary64) im) (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))))
(*.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im))))) (/.f64 #s(literal 1 binary64) (*.f64 im (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))))))
(*.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im))))) (/.f64 #s(literal 1 binary64) (*.f64 (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))) im)))
(*.f64 #s(literal -1 binary64) (/.f64 (-.f64 (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))) (*.f64 re re)) im))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 im (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))))))))
(*.f64 (/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (+.f64 re im) (*.f64 (+.f64 re im) (+.f64 re im))))) im) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re))))))
(*.f64 (/.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im))))) im) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))))
(*.f64 (pow.f64 (/.f64 im (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (+.f64 re im) (*.f64 (+.f64 re im) (+.f64 re im)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re))))))
(*.f64 (pow.f64 (/.f64 im (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im)))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))))
(*.f64 (/.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re)))) im) (/.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re))))))
(+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))))
(+.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re))
(+.f64 (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))) (neg.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im)))) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))))))
(-.f64 #s(literal 0 binary64) (-.f64 (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))) (*.f64 re re)))
(-.f64 (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))) (/.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im)))) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))))
(-.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im)))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re))) (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re))))
(fma.f64 re re (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))))
(fma.f64 im (*.f64 #s(literal 2 binary64) (+.f64 re im)) (*.f64 re re))
(fma.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)) (*.f64 re re))
(fma.f64 #s(literal 2 binary64) (*.f64 (+.f64 re im) im) (*.f64 re re))
(fma.f64 (*.f64 im #s(literal 2 binary64)) (+.f64 re im) (*.f64 re re))
(fma.f64 (+.f64 re im) (*.f64 im #s(literal 2 binary64)) (*.f64 re re))
(fma.f64 (*.f64 #s(literal 2 binary64) (+.f64 re im)) im (*.f64 re re))
(fma.f64 (*.f64 im (+.f64 re im)) #s(literal 2 binary64) (*.f64 re re))
(neg.f64 (-.f64 (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))) (*.f64 re re)))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (+.f64 re im) (*.f64 (+.f64 re im) (+.f64 re im))))) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re)))))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (+.f64 re im) (*.f64 (+.f64 re im) (+.f64 re im))))) (+.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im)))) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im)))) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))))) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (+.f64 re im) (*.f64 (+.f64 re im) (+.f64 re im)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re)) (-.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im)))) (*.f64 re (*.f64 re (*.f64 re re))))))
(/.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im))))) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (+.f64 re im) (*.f64 (+.f64 re im) (+.f64 re im)))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re))))))
(/.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (+.f64 re im) (*.f64 (+.f64 re im) (+.f64 re im)))))) (neg.f64 (+.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im)))) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))))))
(/.f64 (*.f64 (-.f64 (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))) (*.f64 re re)) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im)))) (*.f64 re (*.f64 re (*.f64 re re)))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re)))
(/.f64 (-.f64 (*.f64 (*.f64 re (*.f64 re (*.f64 re re))) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))) (*.f64 (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))) (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im)))))) (*.f64 (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (+.f64 re im) (*.f64 (+.f64 re im) (+.f64 re im))))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re)))))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))) (*.f64 re re)) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im)))) (*.f64 re (*.f64 re (*.f64 re re))))) (neg.f64 (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re))))
(/.f64 (-.f64 (pow.f64 (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im)))) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))) (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))))) (+.f64 (*.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im)))) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))) (/.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im)))) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))))) (*.f64 (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))) (/.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im)))) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))))))))
(/.f64 (-.f64 (*.f64 (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))) (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))))) (*.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im)))) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))) (/.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im)))) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))))) (+.f64 (/.f64 (*.f64 re (*.f64 re (*.f64 re re))) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))) (/.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im)))) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))))))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))))) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))) #s(literal 1 binary64))
(*.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (+.f64 re im) (*.f64 (+.f64 re im) (+.f64 re im))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re))))))
(*.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (+.f64 re im) (*.f64 (+.f64 re im) (+.f64 re im))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im)))) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))))))
(*.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im)))))
(*.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))))
(*.f64 #s(literal -1 binary64) (-.f64 (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))) (*.f64 re re)))
(*.f64 (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (+.f64 re im) (*.f64 (+.f64 re im) (+.f64 re im)))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re)))))))
(*.f64 (*.f64 (-.f64 (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))) (*.f64 re re)) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64))))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 re re) (*.f64 im (*.f64 (+.f64 re im) #s(literal -2 binary64)))))))
(*.f64 (-.f64 (*.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 (+.f64 re im) (+.f64 re im)))) (*.f64 re (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (+.f64 re im))) (*.f64 re re))))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64)))
(+.f64 (*.f64 re #s(literal 2 binary64)) (*.f64 im #s(literal 2 binary64)))
(-.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) re))) (/.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) re))))
(fma.f64 re #s(literal 2 binary64) (*.f64 im #s(literal 2 binary64)))
(fma.f64 im #s(literal 2 binary64) (*.f64 re #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) re (*.f64 im #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) im (*.f64 re #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (+.f64 re im)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (+.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (*.f64 im #s(literal -2 binary64)) (*.f64 re #s(literal 2 binary64))))) (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) re)) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) #s(literal 4 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im re) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 im im) (*.f64 re re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im))) (*.f64 (+.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im re) (*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) #s(literal 2 binary64))))
(/.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 im im) #s(literal 4 binary64)) (+.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (*.f64 im #s(literal -2 binary64)) (*.f64 re #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) #s(literal 4 binary64))) (+.f64 (*.f64 im #s(literal 2 binary64)) (*.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 (neg.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)))) (neg.f64 (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (+.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (*.f64 im #s(literal -2 binary64)) (*.f64 re #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) #s(literal 4 binary64)))) (neg.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) re))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im)))))
(/.f64 (neg.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 im im) (*.f64 re re)))) (-.f64 #s(literal 0 binary64) (-.f64 im re)))
(/.f64 (neg.f64 (*.f64 (+.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im)))))
(/.f64 (neg.f64 (*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (-.f64 im re)))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)) (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64))) (+.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re #s(literal 2 binary64)) (*.f64 im #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (*.f64 im im) #s(literal 4 binary64))) (-.f64 (*.f64 re #s(literal 2 binary64)) (*.f64 im #s(literal 2 binary64))))
(*.f64 #s(literal 2 binary64) (+.f64 re im))
(*.f64 (+.f64 re im) #s(literal 2 binary64))
(*.f64 (+.f64 (*.f64 (*.f64 im (*.f64 im im)) #s(literal 8 binary64)) (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (+.f64 (*.f64 (*.f64 re re) #s(literal 4 binary64)) (*.f64 (*.f64 im #s(literal -2 binary64)) (*.f64 re #s(literal 2 binary64)))))))
(*.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal 4 binary64)) (*.f64 (*.f64 re re) #s(literal 4 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 #s(literal -2 binary64) re))))
(*.f64 (*.f64 #s(literal 2 binary64) (+.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 #s(literal 2 binary64) (-.f64 (*.f64 im im) (*.f64 re re))) (/.f64 #s(literal 1 binary64) (-.f64 im re)))
(*.f64 (*.f64 (+.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re im)))))
(*.f64 (*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 im re)))

simplify405.0ms (3.8%)

Algorithm
egg-herbie
Rules
7188×*-lowering-*.f32
7188×*-lowering-*.f64
4374×+-lowering-+.f64
4374×+-lowering-+.f32
1964×fma-lowering-fma.f32
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
07415166
125084636
085254636
Stop Event
iter limit
node limit
Counts
324 → 324
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 (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))))
(+ (* 1/16 (/ (* (pow im 2) (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))) (* 1/2 (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))))
(+ (* 1/16 (/ (* (pow im 2) (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))) (+ (* 1/2 (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))) (* 1/2 (/ (* (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))
(+ (* 1/16 (/ (* (pow im 2) (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))) (+ (* 1/2 (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))) (+ (* 1/2 (/ (* (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/3072 (pow im 6)) (+ (* 1/1440 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6))))) (* 1/384 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (pow re 6))) (* 1/2 (/ (* (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))))
(+ (* -1/16 (/ (* (pow im 2) (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))) (* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))))
(+ (* -1/16 (/ (* (pow im 2) (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))) (+ (* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))) (* 1/2 (/ (* (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))
(+ (* -1/16 (/ (* (pow im 2) (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))) (+ (* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))) (+ (* 1/2 (/ (* (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* -1/384 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/3072 (pow im 6)) (* 1/1440 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6))) (* 1/2 (/ (* (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))))
(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)))) (* 21/1024 (* (pow im 2) (sqrt (/ 1 (pow re 11))))))))))
(* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))))
(+ (* 1/4 (/ (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))))
(+ (* 1/4 (/ (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))) (* 1/2 (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))
(+ (* 1/4 (/ (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))) (+ (* 1/2 (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/48 (pow re 3)) (+ (* 1/12 (+ (* -3 (pow re 3)) (* 2 (pow re 3)))) (* 1/8 (* re (+ (* -1 (pow re 2)) (pow re 2))))))) (pow im 3))) (* 1/2 (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))))
(* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))))
(+ (* -1/4 (/ (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))) im)) (* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))))
(+ (* -1 (/ (+ (* -1/2 (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* 1/4 (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)) (* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/48 (pow re 3)) (+ (* 1/12 (+ (* -3 (pow re 3)) (* 2 (pow re 3)))) (* 1/8 (* re (+ (* -1 (pow re 2)) (pow re 2))))))) im)) (* 1/2 (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))))) im)) (* 1/4 (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)) (* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))))
(* (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)))
(exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))
(+ (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (* 1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))))
(+ (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))) (/ (* (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))
(+ (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/3072 (pow im 6)) (+ (* 1/1440 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6))))) (* 1/384 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (pow re 6)) (/ (* (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))
(exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))
(+ (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (* -1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))))
(+ (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* -1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))
(+ (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* -1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* -1/384 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/3072 (pow im 6)) (* 1/1440 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))
(* 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)))) (* 21/512 (* (pow im 2) (sqrt (/ 1 (pow re 11))))))))))
(exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))
(+ (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (* 1/2 (/ (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))
(+ (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/2 (/ (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))
(+ (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/2 (/ (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/48 (pow re 3)) (+ (* 1/12 (+ (* -3 (pow re 3)) (* 2 (pow re 3)))) (* 1/8 (* re (+ (* -1 (pow re 2)) (pow re 2))))))) (pow im 3)) (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))
(exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))
(+ (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1/2 (/ (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))
(+ (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* 1/2 (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(+ (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/48 (pow re 3)) (+ (* 1/12 (+ (* -3 (pow re 3)) (* 2 (pow re 3)))) (* 1/8 (* re (+ (* -1 (pow re 2)) (pow re 2))))))) im)) (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* 1/2 (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(log (* 2 im))
(+ (log (* 2 im)) (/ re im))
(+ (log (* 2 im)) (* re (+ (* -1/6 (/ (pow re 2) (pow im 3))) (/ 1 im))))
(+ (log (* 2 im)) (* re (+ (* (pow re 2) (- (* 3/40 (/ (pow re 2) (pow im 5))) (* 1/6 (/ 1 (pow im 3))))) (/ 1 im))))
(+ (log 4) (* -1 (log (/ 1 re))))
(+ (log 4) (+ (* -1 (log (/ 1 re))) (* 1/4 (/ (pow im 2) (pow re 2)))))
(+ (log 4) (+ (* -1 (log (/ 1 re))) (+ (* 1/24 (/ (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))) (pow re 4))) (* 1/4 (/ (pow im 2) (pow re 2))))))
(+ (log 4) (+ (* -1 (log (/ 1 re))) (+ (* 1/720 (/ (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6)))) (pow re 6))) (+ (* 1/24 (/ (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))) (pow re 4))) (* 1/4 (/ (pow im 2) (pow re 2)))))))
(+ (log (/ -1 re)) (log (pow im 2)))
(+ (log (/ -1 re)) (+ (log (pow im 2)) (* -1/4 (/ (pow im 2) (pow re 2)))))
(+ (log (/ -1 re)) (+ (log (pow im 2)) (+ (* -1/4 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))) (pow re 4))))))
(+ (log (/ -1 re)) (+ (log (pow im 2)) (+ (* -1/4 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))) (pow re 6))) (* 1/24 (/ (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))) (pow re 4)))))))
(log (* 4 re))
(+ (log (* 4 re)) (* 1/4 (/ (pow im 2) (pow re 2))))
(+ (log (* 4 re)) (* (pow im 2) (+ (* -3/32 (/ (pow im 2) (pow re 4))) (* 1/4 (/ 1 (pow re 2))))))
(+ (log (* 4 re)) (* (pow im 2) (+ (* (pow im 2) (- (* 5/96 (/ (pow im 2) (pow re 6))) (* 3/32 (/ 1 (pow re 4))))) (* 1/4 (/ 1 (pow re 2))))))
(+ (log 2) (* -1 (log (/ 1 im))))
(+ (log 2) (+ (* -1 (log (/ 1 im))) (/ re im)))
(+ (log 2) (+ (* -1 (log (/ 1 im))) (+ (* 1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow im 2))) (/ re im))))
(+ (log 2) (+ (* -1 (log (/ 1 im))) (+ (* 1/6 (/ (+ (* -3 (pow re 3)) (* 2 (pow re 3))) (pow im 3))) (+ (* 1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow im 2))) (/ re im)))))
(+ (log 2) (* -1 (log (/ -1 im))))
(+ (log 2) (+ (* -1 (log (/ -1 im))) (* -1 (/ re im))))
(+ (log 2) (+ (* -1 (log (/ -1 im))) (* -1 (/ (+ re (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) im))) im))))
(+ (log 2) (+ (* -1 (log (/ -1 im))) (* -1 (/ (+ re (* -1 (/ (+ (* -1/6 (/ (+ (* -3 (pow re 3)) (* 2 (pow re 3))) im)) (* 1/2 (+ (* -1 (pow re 2)) (pow re 2)))) im))) im))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(* -1/2 (* (sqrt (/ im re)) (sqrt -1)))
(* -1/2 (* (sqrt (/ im re)) (sqrt -1)))
(* -1/2 (* (sqrt (/ im re)) (sqrt -1)))
(* -1/2 (* (sqrt (/ im re)) (sqrt -1)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(* (sqrt (/ im re)) (sqrt -1))
(* (sqrt (/ im re)) (sqrt -1))
(* (sqrt (/ im re)) (sqrt -1))
(* (sqrt (/ im re)) (sqrt -1))
(* (sqrt (/ im re)) (sqrt -1))
(* (sqrt (/ im re)) (sqrt -1))
(* (sqrt (/ im re)) (sqrt -1))
(* (sqrt (/ im re)) (sqrt -1))
(* -1 (* (sqrt (/ im re)) (sqrt -1)))
(* -1 (* (sqrt (/ im re)) (sqrt -1)))
(* -1 (* (sqrt (/ im re)) (sqrt -1)))
(* -1 (* (sqrt (/ im re)) (sqrt -1)))
(* (sqrt (/ im re)) (sqrt -1))
(* (sqrt (/ im re)) (sqrt -1))
(* (sqrt (/ im re)) (sqrt -1))
(* (sqrt (/ im re)) (sqrt -1))
(* (sqrt (/ im re)) (sqrt -1))
(* (sqrt (/ im re)) (sqrt -1))
(* (sqrt (/ im re)) (sqrt -1))
(* (sqrt (/ im re)) (sqrt -1))
(* (sqrt (/ im re)) (sqrt -1))
(* (sqrt (/ im re)) (sqrt -1))
(* (sqrt (/ im re)) (sqrt -1))
(* (sqrt (/ im re)) (sqrt -1))
(* -1 (/ im re))
(* -1 (/ im re))
(* -1 (/ im re))
(* -1 (/ im re))
(* -1 (/ im re))
(* -1 (/ im re))
(* -1 (/ im re))
(* -1 (/ im re))
(* -1 (/ im re))
(* -1 (/ im re))
(* -1 (/ im re))
(* -1 (/ im re))
(* -1 (/ im re))
(* -1 (/ im re))
(* -1 (/ im re))
(* -1 (/ im re))
(* -1 (/ im re))
(* -1 (/ im re))
(* -1 (/ im re))
(* -1 (/ im re))
(* -1 (/ im re))
(* -1 (/ im re))
(* -1 (/ im re))
(* -1 (/ 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)
(/ im re)
(* 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))))))
(* 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) (* (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)) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/4 (* (sqrt im) (/ (* (pow re 2) (pow (sqrt -1) 2)) (sqrt 2)))) (* 1/4 (* (sqrt im) (/ (* (pow re 2) (pow (sqrt -1) 2)) (pow (sqrt 2) 3))))) (pow im 3))) (+ (* -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))))))))
(* (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)))))
(* (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) (* (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)) (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 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow re 2) (pow (sqrt -1) 2)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (pow (sqrt -1) 2)) (pow (sqrt 2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 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)))
(/ (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 (pow im 2))
(+ (* 2 (* im re)) (* 2 (pow im 2)))
(+ (* 2 (pow im 2)) (* re (+ re (* 2 im))))
(+ (* 2 (pow im 2)) (* re (+ re (* 2 im))))
(pow re 2)
(* (pow re 2) (+ 1 (* 2 (/ im re))))
(* (pow re 2) (+ 1 (+ (* 2 (/ im re)) (* 2 (/ (pow im 2) (pow re 2))))))
(* (pow re 2) (+ 1 (+ (* 2 (/ im re)) (* 2 (/ (pow im 2) (pow re 2))))))
(pow re 2)
(* (pow re 2) (+ 1 (* 2 (/ im re))))
(* (pow re 2) (+ 1 (* -1 (/ (+ (* -2 im) (* -2 (/ (pow im 2) re))) re))))
(* (pow re 2) (+ 1 (* -1 (/ (+ (* -2 im) (* -2 (/ (pow im 2) re))) re))))
(pow re 2)
(+ (* 2 (* im re)) (pow re 2))
(+ (* im (+ (* 2 im) (* 2 re))) (pow re 2))
(+ (* im (+ (* 2 im) (* 2 re))) (pow re 2))
(* 2 (pow im 2))
(* (pow im 2) (+ 2 (* 2 (/ re im))))
(* (pow im 2) (+ 2 (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(* (pow im 2) (+ 2 (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(* 2 (pow im 2))
(* (pow im 2) (+ 2 (* 2 (/ re im))))
(* (pow im 2) (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im))))
(* (pow im 2) (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im))))
(* 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)))
Outputs
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/4 binary64))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/16 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(+.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 re (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/32 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/16 binary64))))))))
(* 1/2 (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))))
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))))
(+ (* 1/16 (/ (* (pow im 2) (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))) (* 1/2 (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re))))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (*.f64 im im))) (*.f64 re re)))
(+ (* 1/16 (/ (* (pow im 2) (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))) (+ (* 1/2 (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))) (* 1/2 (/ (* (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))
(+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (*.f64 im im))) (*.f64 re re)) (*.f64 #s(literal 1/2 binary64) (+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (/.f64 (+.f64 (*.f64 #s(literal 1/128 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -3/64 binary64))) (pow.f64 re #s(literal 4 binary64)))))))
(+ (* 1/16 (/ (* (pow im 2) (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))) (+ (* 1/2 (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))) (+ (* 1/2 (/ (* (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/3072 (pow im 6)) (+ (* 1/1440 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6))))) (* 1/384 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (pow re 6))) (* 1/2 (/ (* (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))))
(+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (*.f64 im im))) (*.f64 re re)) (*.f64 #s(literal 1/2 binary64) (+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (+.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/128 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -3/64 binary64))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (+.f64 (*.f64 #s(literal 1/3072 binary64) (pow.f64 im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/1440 binary64) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 75/2 binary64))) (*.f64 (*.f64 im im) (*.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64)) #s(literal 1/384 binary64))))) (pow.f64 re #s(literal 6 binary64))))))))
(* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))))
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))))
(+ (* -1/16 (/ (* (pow im 2) (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))) (* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im)))))) (/.f64 (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 im im)) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im)))))) (*.f64 re re)))
(+ (* -1/16 (/ (* (pow im 2) (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))) (+ (* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))) (* 1/2 (/ (* (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))
(+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 im im)) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im)))))) (*.f64 re re)) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (/.f64 (+.f64 (*.f64 #s(literal 1/128 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 3/64 binary64))) (pow.f64 re #s(literal 4 binary64)))) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))))))
(+ (* -1/16 (/ (* (pow im 2) (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))) (+ (* 1/2 (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))) (+ (* 1/2 (/ (* (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* -1/384 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/3072 (pow im 6)) (* 1/1440 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6))) (* 1/2 (/ (* (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))))
(+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 im im)) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im)))))) (*.f64 re re)) (*.f64 #s(literal 1/2 binary64) (+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (+.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/128 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 3/64 binary64))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64)) (*.f64 (*.f64 im im) #s(literal -1/384 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (*.f64 im im)) #s(literal -1/2 binary64)) (+.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 5/384 binary64)) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal -1/3072 binary64))))) (pow.f64 re #s(literal 6 binary64))))))))
(sqrt re)
(sqrt.f64 re)
(+ (sqrt re) (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 3))))))
(+.f64 (sqrt.f64 re) (*.f64 (*.f64 im im) (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))))))
(+ (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 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))))))
(+ (sqrt re) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -5/128 (sqrt (/ 1 (pow re 7)))) (* 21/1024 (* (pow im 2) (sqrt (/ 1 (pow re 11))))))))))
(+.f64 (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 (*.f64 im 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 21/1024 binary64))))))))
(* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))))
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))
(+ (* 1/4 (/ (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))) (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) re) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))) im))
(+ (* 1/4 (/ (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))) (* 1/2 (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))
(+.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) re) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))) im) (*.f64 #s(literal 1/2 binary64) (+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (/.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/8 binary64)) #s(literal 0 binary64)) (*.f64 im im))))))
(+ (* 1/4 (/ (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))) (+ (* 1/2 (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/48 (pow re 3)) (+ (* 1/12 (+ (* -3 (pow re 3)) (* 2 (pow re 3)))) (* 1/8 (* re (+ (* -1 (pow re 2)) (pow re 2))))))) (pow im 3))) (* 1/2 (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))))
(+.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) re) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))) im) (*.f64 #s(literal 1/2 binary64) (+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/8 binary64)) #s(literal 0 binary64)) (*.f64 im im)) (/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/12 binary64)) (+.f64 (*.f64 re #s(literal 0 binary64)) (*.f64 re (*.f64 (*.f64 re re) #s(literal 1/48 binary64))))) (*.f64 im (*.f64 im im))))))))
(* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))))
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))))
(+ (* -1/4 (/ (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))) im)) (* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) re) (exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) im))
(+ (* -1 (/ (+ (* -1/2 (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* 1/4 (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)) (* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (*.f64 (/.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/8 binary64)) #s(literal 0 binary64)) im) #s(literal -1/2 binary64))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (*.f64 re #s(literal 1/4 binary64)))) im))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/48 (pow re 3)) (+ (* 1/12 (+ (* -3 (pow re 3)) (* 2 (pow re 3)))) (* 1/8 (* re (+ (* -1 (pow re 2)) (pow re 2))))))) im)) (* 1/2 (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))))) im)) (* 1/4 (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)) (* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (-.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (*.f64 re #s(literal 1/4 binary64))) (/.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/12 binary64)) (+.f64 (*.f64 re #s(literal 0 binary64)) (*.f64 re (*.f64 (*.f64 re re) #s(literal 1/48 binary64)))))) im) (*.f64 #s(literal 1/2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/8 binary64)) #s(literal 0 binary64)) (exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))))) im)) im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* 1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 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) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/8 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
(+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 re (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/16 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/8 binary64))))))))
(exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re))))
(+ (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (* 1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (/.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (*.f64 re re))))
(+ (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))) (/ (* (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (/.f64 (+.f64 (*.f64 #s(literal 1/128 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -3/64 binary64))) (pow.f64 re #s(literal 4 binary64)))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (/.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (*.f64 re re)))))
(+ (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/3072 (pow im 6)) (+ (* 1/1440 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6))))) (* 1/384 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (pow re 6)) (/ (* (exp (* 1/2 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (/.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (*.f64 re re))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (+.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/128 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -3/64 binary64))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (+.f64 (*.f64 #s(literal 1/3072 binary64) (pow.f64 im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/1440 binary64) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 75/2 binary64))) (*.f64 (*.f64 im im) (*.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64)) #s(literal 1/384 binary64))))) (pow.f64 re #s(literal 6 binary64)))))))
(exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im)))))
(+ (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (* -1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im)))))) (*.f64 re re)))
(+ (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* -1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))
(+.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (/.f64 (+.f64 (*.f64 #s(literal 1/128 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 3/64 binary64))) (pow.f64 re #s(literal 4 binary64)))) (+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im)))))) (*.f64 re re))))
(+ (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* -1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* -1/384 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/3072 (pow im 6)) (* 1/1440 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/2 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))
(+.f64 (+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im)))))) (*.f64 re re))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (+.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/128 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 3/64 binary64))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (+.f64 (*.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64)) (*.f64 (*.f64 im im) #s(literal -1/384 binary64))) (+.f64 (*.f64 (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (*.f64 im im)) #s(literal -1/2 binary64)) (+.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 5/384 binary64)) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal -1/3072 binary64))))) (pow.f64 re #s(literal 6 binary64))))))
(* 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 (*.f64 im 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 #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) (+ (* -5/64 (sqrt (/ 1 (pow re 7)))) (* 21/512 (* (pow im 2) (sqrt (/ 1 (pow re 11))))))))))
(+.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (*.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 21/512 binary64))))))))
(exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))
(+ (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (* 1/2 (/ (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))
(+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) re) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))) im))
(+ (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/2 (/ (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))
(+.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (/.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/8 binary64)) #s(literal 0 binary64)) (*.f64 im im))) (+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) re) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))) im)))
(+ (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/2 (/ (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/48 (pow re 3)) (+ (* 1/12 (+ (* -3 (pow re 3)) (* 2 (pow re 3)))) (* 1/8 (* re (+ (* -1 (pow re 2)) (pow re 2))))))) (pow im 3)) (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))
(+.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) re) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))) im) (+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/8 binary64)) #s(literal 0 binary64)) (*.f64 im im)) (/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/12 binary64)) (+.f64 (*.f64 re #s(literal 0 binary64)) (*.f64 re (*.f64 (*.f64 re re) #s(literal 1/48 binary64))))) (*.f64 im (*.f64 im im)))))))
(exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))
(+ (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1/2 (/ (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))
(+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) re) (exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) im))
(+ (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* 1/2 (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(-.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (-.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (*.f64 re #s(literal 1/2 binary64))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/8 binary64)) #s(literal 0 binary64)) im))) im))
(+ (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/48 (pow re 3)) (+ (* 1/12 (+ (* -3 (pow re 3)) (* 2 (pow re 3)))) (* 1/8 (* re (+ (* -1 (pow re 2)) (pow re 2))))))) im)) (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* 1/2 (* re (exp (* 1/2 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(-.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (-.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (*.f64 re #s(literal 1/2 binary64))) (/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/8 binary64)) #s(literal 0 binary64)) (exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/12 binary64)) (+.f64 (*.f64 re #s(literal 0 binary64)) (*.f64 re (*.f64 (*.f64 re re) #s(literal 1/48 binary64))))) im))) im)) im))
(log (* 2 im))
(log.f64 (*.f64 im #s(literal 2 binary64)))
(+ (log (* 2 im)) (/ re im))
(+.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) (/.f64 re im))
(+ (log (* 2 im)) (* re (+ (* -1/6 (/ (pow re 2) (pow im 3))) (/ 1 im))))
(+.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 re re)) (*.f64 im (*.f64 im im))))))
(+ (log (* 2 im)) (* re (+ (* (pow re 2) (- (* 3/40 (/ (pow re 2) (pow im 5))) (* 1/6 (/ 1 (pow im 3))))) (/ 1 im))))
(+.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (*.f64 (*.f64 re re) (+.f64 (/.f64 (*.f64 #s(literal 3/40 binary64) (*.f64 re re)) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal -1/6 binary64) (*.f64 im (*.f64 im im))))))))
(+ (log 4) (* -1 (log (/ 1 re))))
(+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re))
(+ (log 4) (+ (* -1 (log (/ 1 re))) (* 1/4 (/ (pow im 2) (pow re 2)))))
(+.f64 (log.f64 #s(literal 4 binary64)) (+.f64 (log.f64 re) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im im)) (*.f64 re re))))
(+ (log 4) (+ (* -1 (log (/ 1 re))) (+ (* 1/24 (/ (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))) (pow re 4))) (* 1/4 (/ (pow im 2) (pow re 2))))))
(+.f64 (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im im)) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64))) (pow.f64 re #s(literal 4 binary64)))))
(+ (log 4) (+ (* -1 (log (/ 1 re))) (+ (* 1/720 (/ (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6)))) (pow re 6))) (+ (* 1/24 (/ (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))) (pow re 4))) (* 1/4 (/ (pow im 2) (pow re 2)))))))
(+.f64 (+.f64 (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im im)) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64))) (pow.f64 re #s(literal 4 binary64))))) (/.f64 (*.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 75/2 binary64))) (pow.f64 re #s(literal 6 binary64))))
(+ (log (/ -1 re)) (log (pow im 2)))
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im)))
(+ (log (/ -1 re)) (+ (log (pow im 2)) (* -1/4 (/ (pow im 2) (pow re 2)))))
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (+.f64 (log.f64 (*.f64 im im)) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (*.f64 re re))))
(+ (log (/ -1 re)) (+ (log (pow im 2)) (+ (* -1/4 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))) (pow re 4))))))
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (*.f64 re re)) (+.f64 (log.f64 (*.f64 im im)) (/.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 im #s(literal 4 binary64))) #s(literal 9/4 binary64)) (pow.f64 re #s(literal 4 binary64))))))
(+ (log (/ -1 re)) (+ (log (pow im 2)) (+ (* -1/4 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))) (pow re 6))) (* 1/24 (/ (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))) (pow re 4)))))))
(+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (*.f64 re re)) (+.f64 (log.f64 (*.f64 im im)) (/.f64 (*.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 im #s(literal 4 binary64))) #s(literal 9/4 binary64)) (pow.f64 re #s(literal 4 binary64))))) (/.f64 (*.f64 #s(literal 1/720 binary64) (+.f64 (/.f64 (*.f64 #s(literal -720 binary64) (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64))) (*.f64 im im)) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 75/4 binary64)))) (pow.f64 re #s(literal 6 binary64)))))
(log (* 4 re))
(log.f64 (*.f64 re #s(literal 4 binary64)))
(+ (log (* 4 re)) (* 1/4 (/ (pow im 2) (pow re 2))))
(+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im im)) (*.f64 re re)) (log.f64 (*.f64 re #s(literal 4 binary64))))
(+ (log (* 4 re)) (* (pow im 2) (+ (* -3/32 (/ (pow im 2) (pow re 4))) (* 1/4 (/ 1 (pow re 2))))))
(+.f64 (log.f64 (*.f64 re #s(literal 4 binary64))) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -3/32 binary64) (*.f64 im im)) (pow.f64 re #s(literal 4 binary64))) (/.f64 #s(literal 1/4 binary64) (*.f64 re re)))))
(+ (log (* 4 re)) (* (pow im 2) (+ (* (pow im 2) (- (* 5/96 (/ (pow im 2) (pow re 6))) (* 3/32 (/ 1 (pow re 4))))) (* 1/4 (/ 1 (pow re 2))))))
(+.f64 (log.f64 (*.f64 re #s(literal 4 binary64))) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 re re)) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal 5/96 binary64) (*.f64 im im)) (pow.f64 re #s(literal 6 binary64))) (/.f64 #s(literal -3/32 binary64) (pow.f64 re #s(literal 4 binary64))))))))
(+ (log 2) (* -1 (log (/ 1 im))))
(+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))
(+ (log 2) (+ (* -1 (log (/ 1 im))) (/ re im)))
(+.f64 (log.f64 #s(literal 2 binary64)) (+.f64 (log.f64 im) (/.f64 re im)))
(+ (log 2) (+ (* -1 (log (/ 1 im))) (+ (* 1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow im 2))) (/ re im))))
(+.f64 (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)) (+.f64 (/.f64 re im) (/.f64 #s(literal 0 binary64) (*.f64 im im))))
(+ (log 2) (+ (* -1 (log (/ 1 im))) (+ (* 1/6 (/ (+ (* -3 (pow re 3)) (* 2 (pow re 3))) (pow im 3))) (+ (* 1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow im 2))) (/ re im)))))
(+.f64 (+.f64 (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)) (+.f64 (/.f64 re im) (/.f64 #s(literal 0 binary64) (*.f64 im im)))) (/.f64 (*.f64 #s(literal 1/6 binary64) (neg.f64 (*.f64 re (*.f64 re re)))) (*.f64 im (*.f64 im im))))
(+ (log 2) (* -1 (log (/ -1 im))))
(-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))
(+ (log 2) (+ (* -1 (log (/ -1 im))) (* -1 (/ re im))))
(-.f64 (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))) (/.f64 re im))
(+ (log 2) (+ (* -1 (log (/ -1 im))) (* -1 (/ (+ re (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) im))) im))))
(-.f64 (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))) (/.f64 (+.f64 re (/.f64 #s(literal 0 binary64) im)) im))
(+ (log 2) (+ (* -1 (log (/ -1 im))) (* -1 (/ (+ re (* -1 (/ (+ (* -1/6 (/ (+ (* -3 (pow re 3)) (* 2 (pow re 3))) im)) (* 1/2 (+ (* -1 (pow re 2)) (pow re 2)))) im))) im))))
(-.f64 (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))) (/.f64 (-.f64 re (/.f64 (+.f64 (*.f64 #s(literal -1/6 binary64) (/.f64 (neg.f64 (*.f64 re (*.f64 re re))) im)) #s(literal 0 binary64)) 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/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 im)))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 im)))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 im)))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 im)))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(* -1/2 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1/2 binary64)))
(* -1/2 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1/2 binary64)))
(* -1/2 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1/2 binary64)))
(* -1/2 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1/2 binary64)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(* 1/2 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(* (sqrt (/ im re)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 im re)))
(* (sqrt (/ im re)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 im re)))
(* (sqrt (/ im re)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 im re)))
(* (sqrt (/ im re)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 im re)))
(* (sqrt (/ im re)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 im re)))
(* (sqrt (/ im re)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 im re)))
(* (sqrt (/ im re)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 im re)))
(* (sqrt (/ im re)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 im re)))
(* -1 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64)))
(* -1 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64)))
(* -1 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64)))
(* -1 (* (sqrt (/ im re)) (sqrt -1)))
(*.f64 (sqrt.f64 (/.f64 im re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64)))
(* (sqrt (/ im re)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 im re)))
(* (sqrt (/ im re)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 im re)))
(* (sqrt (/ im re)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 im re)))
(* (sqrt (/ im re)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 im re)))
(* (sqrt (/ im re)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 im re)))
(* (sqrt (/ im re)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 im re)))
(* (sqrt (/ im re)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 im re)))
(* (sqrt (/ im re)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 im re)))
(* (sqrt (/ im re)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 im re)))
(* (sqrt (/ im re)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 im re)))
(* (sqrt (/ im re)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 im re)))
(* (sqrt (/ im re)) (sqrt -1))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 im re)))
(* -1 (/ im re))
(-.f64 #s(literal 0 binary64) (/.f64 im re))
(* -1 (/ im re))
(-.f64 #s(literal 0 binary64) (/.f64 im re))
(* -1 (/ im re))
(-.f64 #s(literal 0 binary64) (/.f64 im re))
(* -1 (/ im re))
(-.f64 #s(literal 0 binary64) (/.f64 im re))
(* -1 (/ im re))
(-.f64 #s(literal 0 binary64) (/.f64 im re))
(* -1 (/ im re))
(-.f64 #s(literal 0 binary64) (/.f64 im re))
(* -1 (/ im re))
(-.f64 #s(literal 0 binary64) (/.f64 im re))
(* -1 (/ im re))
(-.f64 #s(literal 0 binary64) (/.f64 im re))
(* -1 (/ im re))
(-.f64 #s(literal 0 binary64) (/.f64 im re))
(* -1 (/ im re))
(-.f64 #s(literal 0 binary64) (/.f64 im re))
(* -1 (/ im re))
(-.f64 #s(literal 0 binary64) (/.f64 im re))
(* -1 (/ im re))
(-.f64 #s(literal 0 binary64) (/.f64 im re))
(* -1 (/ im re))
(-.f64 #s(literal 0 binary64) (/.f64 im re))
(* -1 (/ im re))
(-.f64 #s(literal 0 binary64) (/.f64 im re))
(* -1 (/ im re))
(-.f64 #s(literal 0 binary64) (/.f64 im re))
(* -1 (/ im re))
(-.f64 #s(literal 0 binary64) (/.f64 im re))
(* -1 (/ im re))
(-.f64 #s(literal 0 binary64) (/.f64 im re))
(* -1 (/ im re))
(-.f64 #s(literal 0 binary64) (/.f64 im re))
(* -1 (/ im re))
(-.f64 #s(literal 0 binary64) (/.f64 im re))
(* -1 (/ im re))
(-.f64 #s(literal 0 binary64) (/.f64 im re))
(* -1 (/ im re))
(-.f64 #s(literal 0 binary64) (/.f64 im re))
(* -1 (/ im re))
(-.f64 #s(literal 0 binary64) (/.f64 im re))
(* -1 (/ im re))
(-.f64 #s(literal 0 binary64) (/.f64 im re))
(* -1 (/ im re))
(-.f64 #s(literal 0 binary64) (/.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)
(/ im re)
(/.f64 im re)
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/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 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/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 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #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 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 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/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 re #s(literal 1/4 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 #s(literal 1 binary64) (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
(* 1/2 (* (sqrt (/ 1 im)) re))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal 1/2 binary64) re))
(* 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 (*.f64 im #s(literal 2 binary64)) im) (*.f64 re re)) (*.f64 (sqrt.f64 im) #s(literal 1/4 binary64)))))
(* 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 (*.f64 im #s(literal 2 binary64)) im) (*.f64 re re)) (*.f64 (sqrt.f64 im) #s(literal 1/4 binary64))) (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) (*.f64 re (*.f64 re re)))))))
(* -1/2 (* (sqrt (/ 1 im)) re))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 re #s(literal -1/2 binary64)))
(* -1 (* re (+ (* 1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re))))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.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 (-.f64 (*.f64 im #s(literal 2 binary64)) im) re) (*.f64 (sqrt.f64 im) #s(literal -1/4 binary64)))) 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 im #s(literal 2 binary64)) im) re)) (sqrt.f64 (*.f64 im (*.f64 im im)))) (*.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) im) (*.f64 (sqrt.f64 im) #s(literal 1/4 binary64)))) re)) re)) (neg.f64 re))
(* 1/2 (* (sqrt (/ 1 im)) re))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal 1/2 binary64) re))
(/ (+ (* 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 (sqrt.f64 im) re))) im)
(/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* 1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re)))))) im)
(/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) re) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im im) (+.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 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) re) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re) (*.f64 #s(literal 1/4 binary64) im))))) im)
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/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) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (/.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/4 binary64))))))
(* -1/2 (* (sqrt im) (* (pow (sqrt -1) 2) (sqrt 2))))
(*.f64 (sqrt.f64 im) (*.f64 #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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (/.f64 (neg.f64 re) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 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)) (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 (neg.f64 re) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal 1/2 binary64) (*.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 #s(literal 0 binary64) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/4 (* (sqrt im) (/ (* (pow re 2) (pow (sqrt -1) 2)) (sqrt 2)))) (* 1/4 (* (sqrt im) (/ (* (pow re 2) (pow (sqrt -1) 2)) (pow (sqrt 2) 3))))) (pow im 3))) (+ (* -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 #s(literal 0 binary64) (*.f64 im (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (/.f64 (neg.f64 re) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 im) (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 im (*.f64 im im))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* (sqrt im) (sqrt 2)) (* (sqrt (/ 1 im)) (/ re (sqrt 2))))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))
(+ (* re (+ (* 1/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 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal 1/2 binary64) re)) (/.f64 (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))))
(+ (* 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 im) (sqrt.f64 #s(literal 2 binary64))) (*.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 #s(literal 1 binary64) (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))))))
(* (sqrt (/ 1 im)) re)
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re)
(* 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 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 im) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) (*.f64 re re))))))
(* re (+ (sqrt (/ 1 im)) (+ (* -1/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 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 im) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) (*.f64 re re))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (*.f64 im (*.f64 im im)))) (/.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) im) (*.f64 re (*.f64 re re))))))
(* -1 (* (sqrt (/ 1 im)) re))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (neg.f64 re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* (sqrt im) (/ 1 re)))))
(-.f64 #s(literal 0 binary64) (*.f64 re (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) 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 im #s(literal 2 binary64)) 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 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) re)) (*.f64 (sqrt.f64 im) (*.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) im) #s(literal 1/2 binary64)))) re)) re)) (neg.f64 re))
(* (sqrt (/ 1 im)) re)
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re)
(/ (+ (sqrt (pow im 3)) (* (sqrt im) re)) im)
(/.f64 (+.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (*.f64 (sqrt.f64 im) re)) im)
(/ (+ (* (sqrt im) re) (* (pow im 2) (+ (sqrt (/ 1 im)) (* (sqrt im) (/ 1 re))))) im)
(/.f64 (+.f64 (*.f64 (sqrt.f64 im) re) (*.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 (sqrt.f64 im) re) (*.f64 im (*.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 im (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re))))))) im)
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* 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 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (/.f64 (*.f64 re re) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (+.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (/.f64 (*.f64 re re) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal -1/2 binary64))))))
(* -1 (* (sqrt im) (* (pow (sqrt -1) 2) (sqrt 2))))
(*.f64 (sqrt.f64 im) (*.f64 #s(literal -1 binary64) (*.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 #s(literal 0 binary64) (*.f64 im (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (neg.f64 re)) (sqrt.f64 #s(literal 2 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)) (sqrt 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) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (neg.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))) (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow re 2) (pow (sqrt -1) 2)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (pow (sqrt -1) 2)) (pow (sqrt 2) 3))))) (pow im 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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (neg.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 im) (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 im (*.f64 im 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 im))))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(* (pow re 2) (+ (/ 1 im) (* 2 (/ 1 re))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 2 binary64) re)))
(* (pow re 2) (+ (* 2 (/ im (pow re 2))) (+ (/ 1 im) (* 2 (/ 1 re)))))
(*.f64 (*.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (+.f64 (/.f64 #s(literal 2 binary64) re) (*.f64 #s(literal 2 binary64) (/.f64 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 1 binary64) im) (+.f64 (/.f64 #s(literal 2 binary64) re) (*.f64 #s(literal 2 binary64) (/.f64 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 #s(literal -2 binary64) (/.f64 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 #s(literal -2 binary64) (/.f64 im re)) #s(literal -2 binary64)) re)))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(/ (+ (* 2 (* im re)) (pow re 2)) im)
(/.f64 (*.f64 re (+.f64 re (*.f64 im #s(literal 2 binary64)))) im)
(/ (+ (* im (+ (* 2 im) (* 2 re))) (pow re 2)) im)
(/.f64 (+.f64 (*.f64 re re) (*.f64 im (*.f64 #s(literal 2 binary64) (+.f64 im re)))) im)
(/ (+ (* im (+ (* 2 im) (* 2 re))) (pow re 2)) im)
(/.f64 (+.f64 (*.f64 re re) (*.f64 im (*.f64 #s(literal 2 binary64) (+.f64 im re)))) im)
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* 2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im)))
(* im (+ 2 (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im)) (/.f64 (*.f64 re re) (*.f64 im im))))
(* im (+ 2 (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 im (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im)) (/.f64 (*.f64 re re) (*.f64 im im))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* -1 (* im (- (* -2 (/ re im)) 2)))
(*.f64 (+.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (- (* -1 (/ (+ (* 2 re) (/ (pow re 2) im)) im)) 2)))
(*.f64 (+.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) re) (/.f64 (*.f64 re re) im)) (-.f64 #s(literal 0 binary64) im)) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (- (* -1 (/ (+ (* 2 re) (/ (pow re 2) im)) im)) 2)))
(*.f64 (+.f64 (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) re) (/.f64 (*.f64 re re) im)) (-.f64 #s(literal 0 binary64) im)) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* 2 (pow im 2))
(*.f64 #s(literal 2 binary64) (*.f64 im im))
(+ (* 2 (* im re)) (* 2 (pow im 2)))
(*.f64 im (*.f64 #s(literal 2 binary64) (+.f64 im re)))
(+ (* 2 (pow im 2)) (* re (+ re (* 2 im))))
(+.f64 (*.f64 re re) (*.f64 im (*.f64 #s(literal 2 binary64) (+.f64 im re))))
(+ (* 2 (pow im 2)) (* re (+ re (* 2 im))))
(+.f64 (*.f64 re re) (*.f64 im (*.f64 #s(literal 2 binary64) (+.f64 im re))))
(pow re 2)
(*.f64 re re)
(* (pow re 2) (+ 1 (* 2 (/ im re))))
(*.f64 re (*.f64 re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 im re)))))
(* (pow re 2) (+ 1 (+ (* 2 (/ im re)) (* 2 (/ (pow im 2) (pow re 2))))))
(*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 im re) (/.f64 (*.f64 im im) (*.f64 re re))))))
(* (pow re 2) (+ 1 (+ (* 2 (/ im re)) (* 2 (/ (pow im 2) (pow re 2))))))
(*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 im re) (/.f64 (*.f64 im im) (*.f64 re re))))))
(pow re 2)
(*.f64 re re)
(* (pow re 2) (+ 1 (* 2 (/ im re))))
(*.f64 re (*.f64 re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 2 binary64) (/.f64 im re)))))
(* (pow re 2) (+ 1 (* -1 (/ (+ (* -2 im) (* -2 (/ (pow im 2) re))) re))))
(*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 im (/.f64 (*.f64 im im) re))) re)))
(* (pow re 2) (+ 1 (* -1 (/ (+ (* -2 im) (* -2 (/ (pow im 2) re))) re))))
(*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 im (/.f64 (*.f64 im im) re))) re)))
(pow re 2)
(*.f64 re re)
(+ (* 2 (* im re)) (pow re 2))
(*.f64 re (+.f64 re (*.f64 im #s(literal 2 binary64))))
(+ (* im (+ (* 2 im) (* 2 re))) (pow re 2))
(+.f64 (*.f64 re re) (*.f64 im (*.f64 #s(literal 2 binary64) (+.f64 im re))))
(+ (* im (+ (* 2 im) (* 2 re))) (pow re 2))
(+.f64 (*.f64 re re) (*.f64 im (*.f64 #s(literal 2 binary64) (+.f64 im re))))
(* 2 (pow im 2))
(*.f64 #s(literal 2 binary64) (*.f64 im im))
(* (pow im 2) (+ 2 (* 2 (/ re im))))
(*.f64 im (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im))))
(* (pow im 2) (+ 2 (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 (*.f64 im im) (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im)) (/.f64 (*.f64 re re) (*.f64 im im))))
(* (pow im 2) (+ 2 (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(*.f64 (*.f64 im im) (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im)) (/.f64 (*.f64 re re) (*.f64 im im))))
(* 2 (pow im 2))
(*.f64 #s(literal 2 binary64) (*.f64 im im))
(* (pow im 2) (+ 2 (* 2 (/ re im))))
(*.f64 im (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im))))
(* (pow im 2) (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im))))
(*.f64 (*.f64 im im) (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im)) im)))
(* (pow im 2) (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im))))
(*.f64 (*.f64 im im) (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im)) im)))
(* 2 re)
(*.f64 #s(literal 2 binary64) 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) (* 2 re))
(*.f64 #s(literal 2 binary64) (+.f64 im re))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* 2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im)))
(* im (+ 2 (* 2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im)))
(* im (+ 2 (* 2 (/ re im))))
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im)))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* -1 (* im (- (* -2 (/ re im)) 2)))
(*.f64 (+.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (- (* -2 (/ re im)) 2)))
(*.f64 (+.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (- (* -2 (/ re im)) 2)))
(*.f64 (+.f64 (/.f64 (*.f64 re #s(literal -2 binary64)) im) #s(literal -2 binary64)) (-.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) (* 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 #s(literal 2 binary64) re)
(* re (+ 2 (* 2 (/ im re))))
(*.f64 re (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 im re))))
(* re (+ 2 (* 2 (/ im re))))
(*.f64 re (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 im re))))
(* re (+ 2 (* 2 (/ im re))))
(*.f64 re (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 im re))))
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
(* -1 (* re (- (* -2 (/ im re)) 2)))
(-.f64 #s(literal 0 binary64) (*.f64 re (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 im re)) #s(literal -2 binary64))))
(* -1 (* re (- (* -2 (/ im re)) 2)))
(-.f64 #s(literal 0 binary64) (*.f64 re (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 im re)) #s(literal -2 binary64))))
(* -1 (* re (- (* -2 (/ im re)) 2)))
(-.f64 #s(literal 0 binary64) (*.f64 re (+.f64 (*.f64 #s(literal -2 binary64) (/.f64 im re)) #s(literal -2 binary64))))

eval102.0ms (1%)

Compiler

Compiled 16189 to 2590 computations (84% saved)

prune91.0ms (0.9%)

Pruning

21 alts after pruning (11 fresh and 10 done)

PrunedKeptTotal
New7334737
Fresh077
Picked145
Done066
Total73421755
Accuracy
99.8%
Counts
755 → 21
Alt Table
Click to see full alt table
StatusAccuracyProgram
14.7%
(pow.f64 (*.f64 re re) #s(literal 1/4 binary64))
6.8%
(*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))
72.9%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (exp.f64 #s(literal 1/2 binary64)) (exp.f64 #s(literal 1/2 binary64))) (/.f64 (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 2 binary64))))
70.1%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (/.f64 (+.f64 (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 3 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (-.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 (+.f64 re (hypot.f64 re im))) (log.f64 #s(literal 2 binary64))))))))
74.2%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))))
24.7%
(*.f64 #s(literal 1/2 binary64) (*.f64 im (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64))))
34.1%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 (*.f64 re re) (*.f64 im (*.f64 #s(literal 2 binary64) (+.f64 im re)))) im)))
14.4%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 im (/.f64 (*.f64 im im) re))) re))) im)))
5.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal -1 binary64) (/.f64 re im))))
2.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal -1 binary64) re)))
14.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))))
55.2%
(*.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))))))
44.5%
(*.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))))))))))
55.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
80.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
57.4%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re))))
5.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (neg.f64 (/.f64 im re))))
22.8%
(*.f64 #s(literal 1/2 binary64) (exp.f64 (+.f64 (log.f64 im) (*.f64 #s(literal 1/2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) re))))))
70.3%
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 3 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (-.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 (+.f64 re (hypot.f64 re im))) (log.f64 #s(literal 2 binary64)))))))))
74.7%
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))))
25.1%
(sqrt.f64 re)
Compiler

Compiled 748 to 371 computations (50.4% saved)

regimes75.0ms (0.7%)

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

7 calls:

17.0ms
re
11.0ms
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
10.0ms
(+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
10.0ms
im
8.0ms
(*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
Results
AccuracySegmentsBranch
93.1%2re
80.2%1im
92.6%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))))
92.6%2(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
91.7%2(*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
91.7%2(+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
80.2%1(*.f64 im im)
Compiler

Compiled 69 to 45 computations (34.8% saved)

regimes6.0ms (0.1%)

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

5.0ms
re
Results
AccuracySegmentsBranch
83.6%3re
Compiler

Compiled 3 to 2 computations (33.3% saved)

regimes8.0ms (0.1%)

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

2 calls:

4.0ms
im
4.0ms
re
Results
AccuracySegmentsBranch
62.0%2im
68.3%3re
Compiler

Compiled 6 to 4 computations (33.3% saved)

regimes6.0ms (0.1%)

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

1 calls:

5.0ms
re
Results
AccuracySegmentsBranch
66.7%2re
Compiler

Compiled 3 to 2 computations (33.3% saved)

regimes5.0ms (0%)

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

2 calls:

2.0ms
re
2.0ms
im
Results
AccuracySegmentsBranch
25.1%1im
28.2%2re
Compiler

Compiled 6 to 4 computations (33.3% saved)

regimes3.0ms (0%)

Accuracy

Total 0.0b remaining (0%)

Threshold costs 0b (0%)

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

2 calls:

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

Compiled 6 to 4 computations (33.3% saved)

bsearch41.0ms (0.4%)

Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
39.0ms
-1.7202226175137208e-96
-1.7797472529046538e-98
Results
23.0ms16×1valid
6.0ms77×0valid
5.0ms19×2valid
Compiler

Compiled 197 to 149 computations (24.4% saved)

Precisions
Click to see histograms. Total time spent on operations: 10.0ms
ival-mult: 5.0ms (51.1% of total)
ival-sqrt: 3.0ms (30.7% of total)
ival-add: 2.0ms (20.4% of total)
backward-pass: 1.0ms (10.2% of total)
const: 0.0ms (0% of total)

bsearch74.0ms (0.7%)

Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
29.0ms
6.04059226286805e+96
2.142843117973417e+100
41.0ms
-1.7202226175137208e-96
-1.7797472529046538e-98
Results
32.0ms210×0valid
5.0ms20×2valid
2.0ms10×1valid
Compiler

Compiled 311 to 246 computations (20.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 30.0ms
ival-sqrt: 18.0ms (59.2% of total)
ival-mult: 8.0ms (26.3% of total)
ival-add: 3.0ms (9.9% of total)
backward-pass: 1.0ms (3.3% of total)
const: 0.0ms (0% of total)

bsearch42.0ms (0.4%)

Algorithm
binary-search
Stop Event
narrow-enough
narrow-enough
Steps
TimeLeftRight
16.0ms
6.04059226286805e+96
2.142843117973417e+100
22.0ms
-4.697926505328724e+120
-1.553200943751478e+120
Results
14.0ms148×0valid
13.0ms48×2valid
2.0ms3valid
1.0ms1valid
Compiler

Compiled 255 to 205 computations (19.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 19.0ms
ival-mult: 9.0ms (47.2% of total)
ival-sqrt: 5.0ms (26.2% of total)
ival-add: 3.0ms (15.7% of total)
backward-pass: 1.0ms (5.2% of total)
const: 0.0ms (0% of total)

bsearch20.0ms (0.2%)

Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
19.0ms
1.636055938082718e+33
4.3617850090438165e+39
Results
12.0ms144×0valid
Compiler

Compiled 148 to 124 computations (16.2% saved)

Precisions
Click to see histograms. Total time spent on operations: 8.0ms
ival-mult: 4.0ms (51.1% of total)
ival-sqrt: 2.0ms (25.5% of total)
ival-add: 1.0ms (12.8% of total)
const: 0.0ms (0% of total)
backward-pass: 0.0ms (0% of total)

bsearch17.0ms (0.2%)

Algorithm
binary-search
Stop Event
narrow-enough
Steps
TimeLeftRight
16.0ms
1.3523113679643522e-247
6.071071048035784e-246
Results
12.0ms112×0valid
Compiler

Compiled 106 to 93 computations (12.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 9.0ms
ival-sqrt: 4.0ms (46.1% of total)
ival-mult: 3.0ms (34.6% of total)
ival-add: 1.0ms (11.5% of total)
const: 0.0ms (0% of total)
backward-pass: 0.0ms (0% of total)

simplify11.0ms (0.1%)

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

Useful iterations: 0 (0.0ms)

IterNodesCost
04699
16599
27199
37699
47899
Stop Event
saturated
Calls
Call 1
Inputs
(if (<=.f64 re #s(literal -4088342928092689/2404907604760405225358828131112281116032698930082119547604265954848982041717359046106827774346003151904701415424 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(if (<=.f64 re #s(literal -3126379886188527/2404907604760405225358828131112281116032698930082119547604265954848982041717359046106827774346003151904701415424 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)))) (if (<=.f64 re #s(literal 6199999999999999621429878227566788845790870446119243017623243243621890131269213115585986337701888 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 -2599999999999999890671552303473135282068371118980048627376360881552980184591593701535380628605860141611953967717658132480 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (neg.f64 (/.f64 im re)))) (if (<=.f64 re #s(literal 6199999999999999621429878227566788845790870446119243017623243243621890131269213115585986337701888 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 2600000000000000139808447690381983744 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 re))
(if (<=.f64 re #s(literal 669137167133861/3936100983140358674171118325863157261303419813782882110237782515784158576702511753696331798193284779002326689610310857585686054524054270515222392815820422596546908348791339130466666204306680269934417552562141332061201544797059608540225005885713074181150932467712 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (sqrt.f64 re))
(sqrt.f64 re)
Outputs
(if (<=.f64 re #s(literal -4088342928092689/2404907604760405225358828131112281116032698930082119547604265954848982041717359046106827774346003151904701415424 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(if (<=.f64 re #s(literal -3126379886188527/2404907604760405225358828131112281116032698930082119547604265954848982041717359046106827774346003151904701415424 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)))) (if (<=.f64 re #s(literal 6199999999999999621429878227566788845790870446119243017623243243621890131269213115585986337701888 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 -3126379886188527/2404907604760405225358828131112281116032698930082119547604265954848982041717359046106827774346003151904701415424 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 im (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)))) (if (<=.f64 re #s(literal 6199999999999999621429878227566788845790870446119243017623243243621890131269213115585986337701888 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 -2599999999999999890671552303473135282068371118980048627376360881552980184591593701535380628605860141611953967717658132480 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (neg.f64 (/.f64 im re)))) (if (<=.f64 re #s(literal 6199999999999999621429878227566788845790870446119243017623243243621890131269213115585986337701888 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 -2599999999999999890671552303473135282068371118980048627376360881552980184591593701535380628605860141611953967717658132480 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) im) re))) (if (<=.f64 re #s(literal 6199999999999999621429878227566788845790870446119243017623243243621890131269213115585986337701888 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 2600000000000000139808447690381983744 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 re))
(if (<=.f64 re #s(literal 669137167133861/3936100983140358674171118325863157261303419813782882110237782515784158576702511753696331798193284779002326689610310857585686054524054270515222392815820422596546908348791339130466666204306680269934417552562141332061201544797059608540225005885713074181150932467712 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (sqrt.f64 re))
(if (<=.f64 re #s(literal 669137167133861/3936100983140358674171118325863157261303419813782882110237782515784158576702511753696331798193284779002326689610310857585686054524054270515222392815820422596546908348791339130466666204306680269934417552562141332061201544797059608540225005885713074181150932467712 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 re))
(sqrt.f64 re)

soundness2.3s (21.4%)

Rules
6858×*-lowering-*.f32
6858×*-lowering-*.f64
6768×*-lowering-*.f32
6768×*-lowering-*.f64
6750×*-lowering-*.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
032141
1155139
21197136
08229136
04954958
117544592
268434556
086824556
012038142
142587766
083807766
01663
17263
258063
3685163
0806663
01210
12410
23110
33310
03310
031127
1147127
21196123
08440123
05254698
117204379
264024294
081034294
032153
1138134
2102084
01085484
Stop Event
fuel
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
saturated
iter limit
node limit
iter limit
node limit
iter limit
node limit
iter limit
node limit
Compiler

Compiled 479 to 336 computations (29.9% saved)

preprocess57.0ms (0.5%)

Compiler

Compiled 370 to 194 computations (47.6% saved)

end0.0ms (0%)

Profiling

Loading profile data...