math.sqrt on complex, real part

Time bar (total: 13.1s)

analyze199.0ms (1.5%)

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

Compiled 18 to 13 computations (27.8% saved)

Precisions
Click to see histograms. Total time spent on operations: 63.0ms
ival-mult: 30.0ms (48% of total)
ival-sqrt: 16.0ms (25.6% of total)
ival-add: 14.0ms (22.4% of total)
const: 2.0ms (3.2% of total)
backward-pass: 0.0ms (0% of total)

sample1.8s (13.7%)

Results
717.0ms6193×0valid
453.0ms1241×2valid
183.0ms612×1valid
91.0ms210×3valid
Precisions
Click to see histograms. Total time spent on operations: 860.0ms
ival-mult: 373.0ms (43.4% of total)
ival-sqrt: 241.0ms (28% of total)
ival-add: 155.0ms (18% of total)
backward-pass: 73.0ms (8.5% of total)
const: 18.0ms (2.1% of total)
Bogosity

preprocess59.0ms (0.5%)

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

Useful iterations: 0 (0.0ms)

IterNodesCost
03660
111860
221460
337260
473660
5123560
6176460
7239160
8278660
9282660
01210
12610
23510
33710
03710
Stop Event
1×iter limit
1×saturated
1×saturated
Calls
Call 1
Inputs
(* 1/2 (sqrt (* 2 (+ (sqrt (+ (* re re) (* im im))) re))))
Outputs
(* 1/2 (sqrt (* 2 (+ (sqrt (+ (* re re) (* im im))) re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
Call 2
Inputs
(* 1/2 (sqrt (* 2 (+ (sqrt (+ (* re re) (* im im))) re))))
(* 1/2 (sqrt (* 2 (+ (sqrt (+ (* (neg re) (neg re)) (* im im))) (neg re)))))
(* 1/2 (sqrt (* 2 (+ (sqrt (+ (* re re) (* (neg im) (neg im)))) re))))
(neg (* 1/2 (sqrt (* 2 (+ (sqrt (+ (* (neg re) (neg re)) (* im im))) (neg re))))))
(neg (* 1/2 (sqrt (* 2 (+ (sqrt (+ (* re re) (* (neg im) (neg im)))) re)))))
(* 1/2 (sqrt (* 2 (+ (sqrt (+ (* im im) (* re re))) im))))
Outputs
(* 1/2 (sqrt (* 2 (+ (sqrt (+ (* re re) (* im im))) re))))
(* 1/2 (sqrt (* 2 (+ re (hypot re im)))))
(* 1/2 (sqrt (* 2 (+ (sqrt (+ (* (neg re) (neg re)) (* im im))) (neg re)))))
(* 1/2 (sqrt (* 2 (- (hypot re im) re))))
(* 1/2 (sqrt (* 2 (+ (sqrt (+ (* re re) (* (neg im) (neg im)))) re))))
(* 1/2 (sqrt (* 2 (+ re (hypot re im)))))
(neg (* 1/2 (sqrt (* 2 (+ (sqrt (+ (* (neg re) (neg re)) (* im im))) (neg re))))))
(* (sqrt (* 2 (- (hypot re im) re))) -1/2)
(neg (* 1/2 (sqrt (* 2 (+ (sqrt (+ (* re re) (* (neg im) (neg im)))) re)))))
(* (sqrt (* 2 (+ re (hypot re im)))) -1/2)
(* 1/2 (sqrt (* 2 (+ (sqrt (+ (* im im) (* re re))) im))))
(* 1/2 (sqrt (* 2 (+ im (hypot re im)))))
Symmetry

(abs im)

explain205.0ms (1.6%)

FPErrors
Click to see full error table
Ground TruthOverpredictionsExampleUnderpredictionsExampleSubexpression
1220-1(-1.410752745990398e-160 5.3832282340027116e-297)(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
311(-2.5496435457423924e+244 3.479031676058819e-201)2(-4.9934048300146705e-264 1.3241052539065097e-289)(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
252(-3.777968336872797e-144 4.966719633742169e-145)0-(+.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
72.0ms396×0valid
43.0ms84×2valid
9.0ms24×1valid
6.0ms8×3valid
Compiler

Compiled 173 to 38 computations (78% saved)

Precisions
Click to see histograms. Total time spent on operations: 49.0ms
ival-mult: 20.0ms (40.5% of total)
ival-sqrt: 12.0ms (24.3% of total)
ival-add: 9.0ms (18.2% of total)
backward-pass: 7.0ms (14.2% of total)
const: 1.0ms (2% of total)

eval0.0ms (0%)

Compiler

Compiled 12 to 9 computations (25% saved)

prune3.0ms (0%)

Alt Table
Click to see full alt table
StatusAccuracyProgram
▶42.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.4%
(*.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)

simplify7.0ms (0.1%)

Algorithm
1×egg-herbie
Localize:

Found 8 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
✓cost-diff0
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))
✓cost-diff320
(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
✓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
01683
13283
24083
04083
Stop Event
1×iter limit
1×saturated
Calls
Call 1
Inputs
(* 1/2 (sqrt (* 2 (+ re (sqrt (+ (* re re) (* im im)))))))
1/2
(sqrt (* 2 (+ re (sqrt (+ (* re re) (* im im))))))
(* 2 (+ re (sqrt (+ (* re re) (* im im)))))
2
(+ re (sqrt (+ (* re re) (* im im))))
re
(sqrt (+ (* re re) (* im im)))
im
(* 1/2 (sqrt (* 2 (+ (sqrt (+ (* re re) (* im im))) re))))
1/2
(sqrt (* 2 (+ (sqrt (+ (* re re) (* im im))) re)))
(* 2 (+ (sqrt (+ (* re re) (* im im))) re))
2
(+ (sqrt (+ (* re re) (* im im))) re)
(sqrt (+ (* re re) (* im im)))
(+ (* re re) (* im im))
(* re re)
re
(* im im)
im
Outputs
(* 1/2 (sqrt (* 2 (+ re (sqrt (+ (* re re) (* im im)))))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
1/2
#s(literal 1/2 binary64)
(sqrt (* 2 (+ re (sqrt (+ (* re re) (* im im))))))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))
(* 2 (+ re (sqrt (+ (* re re) (* im im)))))
(*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))
2
#s(literal 2 binary64)
(+ re (sqrt (+ (* re re) (* im im))))
(+.f64 re (hypot.f64 re im))
re
(sqrt (+ (* re re) (* im im)))
(hypot.f64 re im)
im
(* 1/2 (sqrt (* 2 (+ (sqrt (+ (* re re) (* im im))) re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
1/2
#s(literal 1/2 binary64)
(sqrt (* 2 (+ (sqrt (+ (* re re) (* im im))) re)))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))
(* 2 (+ (sqrt (+ (* re re) (* im im))) re))
(*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))
2
#s(literal 2 binary64)
(+ (sqrt (+ (* re re) (* im im))) re)
(+.f64 re (hypot.f64 re im))
(sqrt (+ (* re re) (* im im)))
(hypot.f64 re im)
(+ (* re re) (* im im))
(+.f64 (*.f64 re re) (*.f64 im im))
(* re re)
(*.f64 re re)
re
(* im im)
(*.f64 im im)
im

localize194.0ms (1.5%)

Localize:

Found 8 expressions of interest:

NewMetricScoreProgram
✓accuracy100.0%
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
✓accuracy100.0%
(+.f64 (*.f64 re re) (*.f64 im im))
✓accuracy99.9%
(+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
✓accuracy64.8%
(sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))
✓accuracy100.0%
(*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))
✓accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
✓accuracy100.0%
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))
✓accuracy99.9%
(+.f64 re (hypot.f64 re im))
Results
98.0ms59×5exit
49.0ms197×0valid
Compiler

Compiled 115 to 18 computations (84.3% saved)

Precisions
Click to see histograms. Total time spent on operations: 77.0ms
ival-mult: 24.0ms (31.3% of total)
backward-pass: 16.0ms (20.8% of total)
ival-sqrt: 14.0ms (18.2% of total)
compiled-spec: 13.0ms (16.9% of total)
ival-add: 9.0ms (11.7% of total)
const: 1.0ms (1.3% of total)

series28.0ms (0.2%)

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

60 calls:

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

rewrite297.0ms (2.3%)

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

Useful iterations: 1 (0.0ms)

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

simplify366.0ms (2.8%)

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

Useful iterations: 2 (0.0ms)

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

eval104.0ms (0.8%)

Compiler

Compiled 23490 to 2245 computations (90.4% saved)

prune79.0ms (0.6%)

Pruning

13 alts after pruning (12 fresh and 1 done)

PrunedKeptTotal
New65912671
Fresh000
Picked112
Done000
Total66013673
Accuracy
86.6%
Counts
673 → 13
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶27.3%
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
▶79.8%
(*.f64 #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)))
29.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (-.f64 re (hypot.f64 re im)))))
27.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.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 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
11.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))))
25.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))))
▶52.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))))))
47.6%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (/.f64 (*.f64 re re) im) im)) im))))))))
▶53.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im)))))
52.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
5.4%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.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)) re))))
✓80.4%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
▶54.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re))))
Compiler

Compiled 434 to 291 computations (32.9% saved)

simplify295.0ms (2.3%)

Algorithm
1×egg-herbie
Localize:

Found 18 expressions of interest:

NewMetricScoreProgram
✓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 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im))
✓cost-diff0
(sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im))))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im)))))
✓cost-diff256
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) 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
(*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))
✓cost-diff0
(pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64))
✓cost-diff0
(*.f64 #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)))
✓cost-diff6528
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
Rules
5780×*-lowering-*.f32
5780×*-lowering-*.f64
2298×fma-define
1910×cube-prod
1488×fma-lowering-fma.f32
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
034179
178174
2132169
3184169
4220169
5344169
6636169
71871169
83050169
94324169
105362169
116124169
126782169
137487169
08065169
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(* 1/2 (pow (pow (* 2 (+ re (sqrt (+ (* re re) (* im im))))) 1/4) 2))
1/2
(pow (pow (* 2 (+ re (sqrt (+ (* re re) (* im im))))) 1/4) 2)
(pow (* 2 (+ re (sqrt (+ (* re re) (* im im))))) 1/4)
(* 2 (+ re (sqrt (+ (* re re) (* im im)))))
2
(+ re (sqrt (+ (* re re) (* im im))))
re
(sqrt (+ (* re re) (* im im)))
im
1/4
(* 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 (/ (* 2 re) im)))))
1/2
(sqrt (* im (+ 2 (/ (* 2 re) im))))
(* im (+ 2 (/ (* 2 re) im)))
im
(+ 2 (/ (* 2 re) im))
2
(/ (* 2 re) im)
(* 2 re)
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)
Outputs
(* 1/2 (pow (pow (* 2 (+ re (sqrt (+ (* re re) (* im im))))) 1/4) 2))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
1/2
#s(literal 1/2 binary64)
(pow (pow (* 2 (+ re (sqrt (+ (* re re) (* im im))))) 1/4) 2)
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))
(pow (* 2 (+ re (sqrt (+ (* re re) (* im im))))) 1/4)
(pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64))
(* 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/4
#s(literal 1/4 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 (/ (* 2 re) im)))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re im))))
1/2
#s(literal 1/2 binary64)
(sqrt (* im (+ 2 (/ (* 2 re) im))))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re im)))
(* im (+ 2 (/ (* 2 re) im)))
(*.f64 #s(literal 2 binary64) (+.f64 re im))
im
(+ 2 (/ (* 2 re) im))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im))
2
#s(literal 2 binary64)
(/ (* 2 re) im)
(/.f64 (*.f64 #s(literal 2 binary64) re) im)
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
re
(* 1/2 (sqrt (+ (* im 2) (* re (+ 2 (/ re im))))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))))
1/2
#s(literal 1/2 binary64)
(sqrt (+ (* im 2) (* re (+ 2 (/ re im)))))
(sqrt.f64 (+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))
(+ (* im 2) (* re (+ 2 (/ re im))))
(+.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))
(* im 2)
(*.f64 #s(literal 2 binary64) im)
im
2
#s(literal 2 binary64)
(* re (+ 2 (/ re im)))
(*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))
re
(+ 2 (/ re im))
(+.f64 #s(literal 2 binary64) (/.f64 re im))
(/ re im)
(/.f64 re im)

localize243.0ms (1.9%)

Localize:

Found 18 expressions of interest:

NewMetricScoreProgram
✓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)))
✓accuracy91.6%
(sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))
✓accuracy100.0%
(*.f64 #s(literal 2 binary64) re)
✓accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im)))))
✓accuracy100.0%
(sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im))))
✓accuracy93.4%
(*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) 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 2 binary64) (+.f64 re (hypot.f64 re im)))
✓accuracy100.0%
(*.f64 #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)))
✓accuracy99.7%
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
Results
110.0ms131×0valid
71.0ms124×0invalid
3.0ms1×5exit
Compiler

Compiled 199 to 32 computations (83.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 93.0ms
ival-add: 24.0ms (25.8% of total)
ival-mult: 22.0ms (23.7% of total)
ival-div: 17.0ms (18.3% of total)
ival-pow: 10.0ms (10.8% of total)
compiled-spec: 10.0ms (10.8% of total)
ival-sqrt: 9.0ms (9.7% of total)
const: 1.0ms (1.1% of total)
backward-pass: 1.0ms (1.1% of total)

series82.0ms (0.6%)

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

114 calls:

TimeVariablePointExpression
21.0ms
re
@inf
(* 1/2 (sqrt (* im (+ 2 (/ (* 2 re) im)))))
8.0ms
re
@inf
(pow (* 2 (+ re (sqrt (+ (* re re) (* im im))))) 1/4)
5.0ms
im
@-inf
(* 1/2 (sqrt (* im (+ 2 (/ (* 2 re) im)))))
3.0ms
im
@-inf
(* 1/2 (sqrt (* 2 (+ im re))))
2.0ms
re
@-inf
(pow (* 2 (+ re (sqrt (+ (* re re) (* im im))))) 1/4)

rewrite390.0ms (3%)

Algorithm
1×batch-egg-rewrite
Rules
3136×*-lowering-*.f32
3136×*-lowering-*.f64
2794×/-lowering-/.f32
2794×/-lowering-/.f64
2074×+-lowering-+.f64
Iterations

Useful iterations: 2 (0.0ms)

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

simplify608.0ms (4.6%)

Algorithm
1×egg-herbie
Rules
7820×*-lowering-*.f32
7820×*-lowering-*.f64
5716×+-lowering-+.f64
5716×+-lowering-+.f32
1868×distribute-lft-in
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
012908382
147287771
092417771
Stop Event
1×iter limit
1×node limit
Counts
456 → 456
Calls
Call 1
Inputs
(* (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 (* (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))))))))
(pow (* 2 im) 1/4)
(+ (* 1/4 (* (pow (/ 2 (pow im 3)) 1/4) re)) (pow (* 2 im) 1/4))
(+ (* re (+ (* 1/32 (* (pow (/ 2 (pow im 7)) 1/4) re)) (* 1/4 (pow (/ 2 (pow im 3)) 1/4)))) (pow (* 2 im) 1/4))
(+ (* re (+ (* 1/4 (pow (/ 2 (pow im 3)) 1/4)) (* re (+ (* -5/128 (* (pow (/ 2 (pow im 11)) 1/4) re)) (* 1/32 (pow (/ 2 (pow im 7)) 1/4)))))) (pow (* 2 im) 1/4))
(exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re))))))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/24576 (pow im 6)) (+ (* 1/2880 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6))))) (* 1/1536 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (pow re 6)) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))
(exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2)))))
(+ (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))))
(+ (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))
(+ (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* -1/1536 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/24576 (pow im 6)) (* 1/2880 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))
(pow (* 4 re) 1/4)
(+ (* 1/16 (* (pow (/ 4 (pow re 7)) 1/4) (pow im 2))) (pow (* 4 re) 1/4))
(+ (* (pow im 2) (+ (* -11/512 (* (pow (/ 4 (pow re 15)) 1/4) (pow im 2))) (* 1/16 (pow (/ 4 (pow re 7)) 1/4)))) (pow (* 4 re) 1/4))
(+ (* (pow im 2) (+ (* 1/16 (pow (/ 4 (pow re 7)) 1/4)) (* (pow im 2) (+ (* -11/512 (pow (/ 4 (pow re 15)) 1/4)) (* 95/8192 (* (pow (/ 4 (pow re 23)) 1/4) (pow im 2))))))) (pow (* 4 re) 1/4))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (* 1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/384 (pow re 3)) (+ (* 1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (* 1/24 (+ (* -3 (pow re 3)) (* 2 (pow re 3))))))) (pow im 3)) (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* 1/4 (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/384 (pow re 3)) (+ (* 1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (* 1/24 (+ (* -3 (pow re 3)) (* 2 (pow re 3))))))) im)) (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* 1/4 (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(* 2 im)
(+ (* 2 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)))))
(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)))
(* 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)))
(* 1/2 (* (sqrt re) (sqrt 2)))
(+ (* 1/2 (* (sqrt re) (sqrt 2))) (* 1/2 (* (/ im (sqrt 2)) (sqrt (/ 1 re)))))
(+ (* 1/2 (* (sqrt re) (sqrt 2))) (* im (+ (* -1/4 (* (/ im (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (/ 1 (sqrt 2)))))))
(+ (* 1/2 (* (sqrt re) (sqrt 2))) (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (/ 1 (sqrt 2)))) (* im (+ (* -1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (pow (sqrt 2) 3)))) (* 1/4 (* (/ im (pow (sqrt 2) 5)) (sqrt (/ 1 (pow re 5))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 7))) (/ (pow re 3) (pow (sqrt 2) 5)))) (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2))))))))
(* -1/2 (* (sqrt im) (* (pow (sqrt -1) 2) (sqrt 2))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2)))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (pow (sqrt -1) 2)) (pow (sqrt 2) 3)))) (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2))))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (pow (sqrt -1) 2)) (pow (sqrt 2) 3)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 7))) (/ (* (pow re 3) (pow (sqrt -1) 2)) (pow (sqrt 2) 5)))) (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2)))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (pow (sqrt 2) 3)))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (/ 1 (pow (sqrt 2) 3)))) (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ re (pow (sqrt 2) 5)))))))))
(* 1/2 (* (sqrt re) (sqrt 2)))
(* re (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt 2))) (* 1/2 (* (/ im (sqrt 2)) (sqrt (/ 1 (pow re 3)))))))
(* re (+ (* -1/4 (* (/ (pow im 2) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt 2))) (* 1/2 (* (/ im (sqrt 2)) (sqrt (/ 1 (pow re 3))))))))
(* re (+ (* -1/4 (* (/ (pow im 2) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (/ (pow im 3) (pow (sqrt 2) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt 2))) (* 1/2 (* (/ im (sqrt 2)) (sqrt (/ 1 (pow re 3)))))))))
(* -1/2 (* (sqrt re) (* (sqrt -2) (sqrt -1))))
(* -1 (* re (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt -1)))) (* 1/2 (* (/ (* im (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))))))
(* -1 (* re (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt -1)))) (* 1/2 (* (/ (* im (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow re 3)))))))))
(* -1 (* re (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (/ (* (pow im 3) (sqrt -1)) (pow (sqrt -2) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt -1)))) (* 1/2 (* (/ (* im (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))))))))
(* (sqrt re) (sqrt 2))
(+ (* (sqrt re) (sqrt 2)) (* (/ im (sqrt 2)) (sqrt (/ 1 re))))
(+ (* im (+ (* -1/2 (* (/ im (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (/ 1 (sqrt 2))))) (* (sqrt re) (sqrt 2)))
(+ (* im (+ (* im (+ (* -1/2 (* (sqrt (/ 1 (pow re 3))) (/ 1 (pow (sqrt 2) 3)))) (* 1/2 (* (/ im (pow (sqrt 2) 5)) (sqrt (/ 1 (pow re 5))))))) (* (sqrt (/ 1 re)) (/ 1 (sqrt 2))))) (* (sqrt re) (sqrt 2)))
(* (sqrt im) (sqrt 2))
(* im (+ (* (sqrt (/ 1 im)) (sqrt 2)) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* (sqrt (/ 1 im)) (sqrt 2)) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 7))) (/ (pow re 3) (pow (sqrt 2) 5)))) (+ (* (sqrt (/ 1 im)) (sqrt 2)) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))))
(* -1 (* (sqrt im) (* (pow (sqrt -1) 2) (sqrt 2))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (pow (sqrt -1) 2)) (pow (sqrt 2) 3)))) (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2)))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (pow (sqrt -1) 2)) (pow (sqrt 2) 3)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 7))) (/ (* (pow re 3) (pow (sqrt -1) 2)) (pow (sqrt 2) 5)))) (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2))))))))
(* (sqrt im) (sqrt 2))
(+ (* (sqrt im) (sqrt 2)) (* (sqrt (/ 1 im)) (/ re (sqrt 2))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (pow (sqrt 2) 3)))) (* (sqrt (/ 1 im)) (/ 1 (sqrt 2))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* re (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ 1 (pow (sqrt 2) 3)))) (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ re (pow (sqrt 2) 5)))))) (* (sqrt (/ 1 im)) (/ 1 (sqrt 2))))) (* (sqrt im) (sqrt 2)))
(* (sqrt re) (sqrt 2))
(* re (+ (* (sqrt (/ 1 re)) (sqrt 2)) (* (/ im (sqrt 2)) (sqrt (/ 1 (pow re 3))))))
(* re (+ (* -1/2 (* (/ (pow im 2) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* (sqrt (/ 1 re)) (sqrt 2)) (* (/ im (sqrt 2)) (sqrt (/ 1 (pow re 3)))))))
(* re (+ (* -1/2 (* (/ (pow im 2) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (/ (pow im 3) (pow (sqrt 2) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* (sqrt (/ 1 re)) (sqrt 2)) (* (/ im (sqrt 2)) (sqrt (/ 1 (pow re 3))))))))
(* -1 (* (sqrt re) (* (sqrt -2) (sqrt -1))))
(* -1 (* re (+ (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt -1))) (* (/ (* im (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow re 3)))))))
(* -1 (* re (+ (* -1/2 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt -1))) (* (/ (* im (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))))))
(* -1 (* re (+ (* -1/2 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (/ (* (pow im 3) (sqrt -1)) (pow (sqrt -2) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt -1))) (* (/ (* im (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow re 3)))))))))
2
(+ 2 (* 2 (/ re im)))
(+ 2 (* 2 (/ re im)))
(+ 2 (* 2 (/ re im)))
(* 2 (/ re im))
(* re (+ (* 2 (/ 1 im)) (* 2 (/ 1 re))))
(* re (+ (* 2 (/ 1 im)) (* 2 (/ 1 re))))
(* re (+ (* 2 (/ 1 im)) (* 2 (/ 1 re))))
(* 2 (/ re im))
(* re (+ (* 2 (/ 1 im)) (* 2 (/ 1 re))))
(* re (+ (* 2 (/ 1 im)) (* 2 (/ 1 re))))
(* re (+ (* 2 (/ 1 im)) (* 2 (/ 1 re))))
(* 2 (/ re im))
(/ (+ (* 2 im) (* 2 re)) im)
(/ (+ (* 2 im) (* 2 re)) im)
(/ (+ (* 2 im) (* 2 re)) im)
2
(+ 2 (* 2 (/ re im)))
(+ 2 (* 2 (/ re im)))
(+ 2 (* 2 (/ re im)))
2
(+ 2 (* 2 (/ re im)))
(+ 2 (* 2 (/ re im)))
(+ 2 (* 2 (/ re im)))
(* 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)
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)))))
(* 2 re)
(* 2 re)
(* 2 re)
(* 2 re)
(* 2 re)
(* 2 re)
(* 2 re)
(* 2 re)
(* 2 re)
(* 2 re)
(* 2 re)
(* 2 re)
(* 2 re)
(* 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
(* (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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal 1/2 binary64)) (/.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -1 binary64) (*.f64 im #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* re (+ (* 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 #s(literal -1 binary64) (*.f64 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 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im (*.f64 im im))))) (*.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 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im (*.f64 im im))))) (*.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 #s(literal -5/64 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 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 (/.f64 re (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))))
(* 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 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 (/.f64 re (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))))
(* 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 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 (/.f64 re (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (+ (* (sqrt (/ 1 im)) (* (sqrt -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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 im) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 im) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (*.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* 1/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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))) (*.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))) (*.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 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) #s(literal 2 binary64))
(* 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))
(+ (* 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (*.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.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 (pow.f64 im #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 #s(literal 1/2 binary64))))) (*.f64 re (*.f64 re re))))
(+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/1024 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.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 (pow.f64 im #s(literal 5 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 #s(literal 1/2 binary64)))) (*.f64 #s(literal 1/1024 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))) (*.f64 re (*.f64 re re))))
(* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) #s(literal 2 binary64))
(+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) #s(literal 2 binary64)) (*.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 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) #s(literal 2 binary64)) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1/16 binary64) (*.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 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) #s(literal 2 binary64)) (*.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))) (*.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))) (*.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 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))) (*.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))))) (*.f64 #s(literal -1/16 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))))))
(* -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 (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -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 0 binary64) im))
(* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -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 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (*.f64 (*.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(*.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (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 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 3/16 binary64)) (*.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(pow (* 2 im) 1/4)
(pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64))
(+ (* 1/4 (* (pow (/ 2 (pow im 3)) 1/4) re)) (pow (* 2 im) 1/4))
(+.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 re (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 im (*.f64 im im))) #s(literal 1/4 binary64)))))
(+ (* re (+ (* 1/32 (* (pow (/ 2 (pow im 7)) 1/4) re)) (* 1/4 (pow (/ 2 (pow im 3)) 1/4)))) (pow (* 2 im) 1/4))
(+.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) (*.f64 re (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 re (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 7 binary64))) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 im (*.f64 im im))) #s(literal 1/4 binary64))))))
(+ (* re (+ (* 1/4 (pow (/ 2 (pow im 3)) 1/4)) (* re (+ (* -5/128 (* (pow (/ 2 (pow im 11)) 1/4) re)) (* 1/32 (pow (/ 2 (pow im 7)) 1/4)))))) (pow (* 2 im) 1/4))
(+.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) (*.f64 re (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 im (*.f64 im im))) #s(literal 1/4 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal -5/128 binary64) (*.f64 re (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 11 binary64))) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/32 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 7 binary64))) #s(literal 1/4 binary64))))))))
(exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re))))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))))) (*.f64 re re)))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))))) (*.f64 re re)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64))))) (pow.f64 re #s(literal 4 binary64)))))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/24576 (pow im 6)) (+ (* 1/2880 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6))))) (* 1/1536 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (pow re 6)) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))))) (*.f64 re re)) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (+.f64 (*.f64 #s(literal 1/24576 binary64) (pow.f64 im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/2880 binary64) (+.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 15/4 binary64)) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 135/4 binary64)))) (*.f64 (*.f64 #s(literal 1/1536 binary64) (*.f64 im im)) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64)))))) (pow.f64 re #s(literal 6 binary64))))))
(exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2)))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im)))))
(+ (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))))) (*.f64 re re)))
(+ (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 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/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (/.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64)))) (pow.f64 re #s(literal 4 binary64))))))
(+ (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* -1/1536 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/24576 (pow im 6)) (* 1/2880 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))))) (*.f64 re re)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/1536 binary64) (*.f64 im im)) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64))) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal -1/24576 binary64))) (*.f64 #s(literal 1/2880 binary64) (+.f64 (*.f64 #s(literal -720 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (*.f64 im im))) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 75/4 binary64)))))) (pow.f64 re #s(literal 6 binary64)))) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (/.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64)))) (pow.f64 re #s(literal 4 binary64))))))
(pow (* 4 re) 1/4)
(pow.f64 (*.f64 re #s(literal 4 binary64)) #s(literal 1/4 binary64))
(+ (* 1/16 (* (pow (/ 4 (pow re 7)) 1/4) (pow im 2))) (pow (* 4 re) 1/4))
(+.f64 (pow.f64 (*.f64 re #s(literal 4 binary64)) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 im im) (pow.f64 (/.f64 #s(literal 4 binary64) (pow.f64 re #s(literal 7 binary64))) #s(literal 1/4 binary64)))))
(+ (* (pow im 2) (+ (* -11/512 (* (pow (/ 4 (pow re 15)) 1/4) (pow im 2))) (* 1/16 (pow (/ 4 (pow re 7)) 1/4)))) (pow (* 4 re) 1/4))
(+.f64 (pow.f64 (*.f64 re #s(literal 4 binary64)) #s(literal 1/4 binary64)) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -11/512 binary64) (*.f64 (*.f64 im im) (pow.f64 (/.f64 #s(literal 4 binary64) (pow.f64 re #s(literal 15 binary64))) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/16 binary64) (pow.f64 (/.f64 #s(literal 4 binary64) (pow.f64 re #s(literal 7 binary64))) #s(literal 1/4 binary64))))))
(+ (* (pow im 2) (+ (* 1/16 (pow (/ 4 (pow re 7)) 1/4)) (* (pow im 2) (+ (* -11/512 (pow (/ 4 (pow re 15)) 1/4)) (* 95/8192 (* (pow (/ 4 (pow re 23)) 1/4) (pow im 2))))))) (pow (* 4 re) 1/4))
(+.f64 (pow.f64 (*.f64 re #s(literal 4 binary64)) #s(literal 1/4 binary64)) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 (/.f64 #s(literal 4 binary64) (pow.f64 re #s(literal 7 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -11/512 binary64) (pow.f64 (/.f64 #s(literal 4 binary64) (pow.f64 re #s(literal 15 binary64))) #s(literal 1/4 binary64))) (*.f64 #s(literal 95/8192 binary64) (*.f64 (*.f64 im im) (pow.f64 (/.f64 #s(literal 4 binary64) (pow.f64 re #s(literal 23 binary64))) #s(literal 1/4 binary64)))))))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (* 1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))) im))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))) im) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (/.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/32 binary64)) #s(literal 0 binary64)) (*.f64 im im)))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/384 (pow re 3)) (+ (* 1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (* 1/24 (+ (* -3 (pow re 3)) (* 2 (pow re 3))))))) (pow im 3)) (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))) im) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (/.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/32 binary64)) #s(literal 0 binary64)) (*.f64 im im))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/384 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 re #s(literal 0 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 im (*.f64 im im))))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))))) im))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* 1/4 (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(-.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) re) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/32 binary64)) #s(literal 0 binary64)) im))) im))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/384 (pow re 3)) (+ (* 1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (* 1/24 (+ (* -3 (pow re 3)) (* 2 (pow re 3))))))) im)) (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* 1/4 (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(-.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) re) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/32 binary64)) #s(literal 0 binary64)) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (+.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/384 binary64)) (*.f64 #s(literal 1/32 binary64) (*.f64 re #s(literal 0 binary64)))) (*.f64 #s(literal 1/24 binary64) (*.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re))))) im))) 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 (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 im im) (*.f64 re re))))
(* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))
(*.f64 re (+.f64 (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64))))))
(* -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 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re))) (neg.f64 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 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (+.f64 (*.f64 im im) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) (neg.f64 re))
(* -1 (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re))
(/.f64 (-.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (+.f64 (*.f64 im im) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (pow.f64 re #s(literal 6 binary64)))) (neg.f64 re))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(+ (* 4 re) (/ (pow im 2) re))
(+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))
(+ (* 4 re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))))
(+.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im 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 #s(literal 2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) re) im) (/.f64 (*.f64 re re) (*.f64 im im)))))
(* im (+ 2 (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2))))))
(*.f64 im (+.f64 #s(literal 2 binary64) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) re) im) (/.f64 (*.f64 re re) (*.f64 im im))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))))
(* -2 im)
(*.f64 im #s(literal -2 binary64))
(* -1 (* im (+ 2 (* -2 (/ re im)))))
(*.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) re) im)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (pow re 2) im)) (* 2 re)) im)))))
(*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) re) (/.f64 (*.f64 re re) im)) im)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im)) (* 2 re)) im)))))
(*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) re) (/.f64 (+.f64 (*.f64 re re) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im))) im)) im)) (-.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))) (*.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))) (*.f64 #s(literal -1/16 binary64) (*.f64 (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/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 #s(literal -1/16 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 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))) (*.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/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))))))))
(* -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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))) (*.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))) (*.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))) (*.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 #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)) re))))))
(+ (* 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 #s(literal -1/16 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) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)) #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 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 im (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #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 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 im (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #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 (*.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 #s(literal 1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (*.f64 im im)))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 im (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #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 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 im (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))))) (neg.f64 re))
(* -1 (* re (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (* im (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 2))))))))
(*.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 im (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.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)))))) #s(literal -1 binary64)))) (neg.f64 re))
(* -1 (* re (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 3) (sqrt 2)) (pow (sqrt -1) 4)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/4 (* (* im (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 2)))))))))
(*.f64 (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.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)))))) #s(literal -1 binary64))) (+.f64 (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (*.f64 im im))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 4 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 im (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)))))) (neg.f64 re))
(* (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 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 im (sqrt.f64 #s(literal 2 binary64))))))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(*.f64 im (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)))))
(* 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)))) (*.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/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 #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 #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 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))))))
(* -1 (* (sqrt im) (* (pow (sqrt -1) 2) (sqrt 2))))
(*.f64 (sqrt.f64 im) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2))))))
(*.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)))) (-.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/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2)))))))
(*.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (*.f64 (*.f64 re re) (/.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)))) (*.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/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) (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 (+.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (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 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)))) (*.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))
(* (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 #s(literal -1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))))))
(+ (* 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 #s(literal -1/8 binary64) (*.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) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))))))))
(* (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 im (*.f64 im im))))))))
(* -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 (*.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)))))) (neg.f64 re))
(* -1 (* re (+ (* -1/8 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (* im (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 2)))))))
(*.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 (*.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 (*.f64 im im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) #s(literal -1 binary64)))) (neg.f64 re))
(* -1 (* re (+ (* -1/8 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (/ (* (pow im 3) (sqrt 2)) (pow (sqrt -1) 4)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (* im (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (pow (sqrt -1) 2) (sqrt 2))))))))
(*.f64 (+.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.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)))))) #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))))))) (neg.f64 re))
(* 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 re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 im re))) #s(literal 2 binary64)))
(* -1 (* re (- (* -2 (/ im re)) 2)))
(*.f64 re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 im re))) #s(literal 2 binary64)))
(* -1 (* re (- (* -2 (/ im re)) 2)))
(*.f64 re (+.f64 (*.f64 #s(literal -1 binary64) (*.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 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 re im)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (- (* -1 (/ re im)) 1)))
(*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 re im)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (- (* -1 (/ re im)) 1)))
(*.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 re im)) #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) im))
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 (+.f64 (/.f64 im (neg.f64 re)) #s(literal -1 binary64)) (neg.f64 re))
(* -1 (* re (- (* -1 (/ im re)) 1)))
(*.f64 (+.f64 (/.f64 im (neg.f64 re)) #s(literal -1 binary64)) (neg.f64 re))
(* -1 (* re (- (* -1 (/ im re)) 1)))
(*.f64 (+.f64 (/.f64 im (neg.f64 re)) #s(literal -1 binary64)) (neg.f64 re))
(* 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 re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 im re))) #s(literal 2 binary64)))
(* -1 (* re (- (* -2 (/ im re)) 2)))
(*.f64 re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 im re))) #s(literal 2 binary64)))
(* -1 (* re (- (* -2 (/ im re)) 2)))
(*.f64 re (+.f64 (*.f64 #s(literal -1 binary64) (*.f64 #s(literal -2 binary64) (/.f64 im re))) #s(literal 2 binary64)))
(* 1/2 (* (sqrt re) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* 1/2 (* (sqrt re) (sqrt 2))) (* 1/2 (* (/ im (sqrt 2)) (sqrt (/ 1 re)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 re)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (/.f64 im (sqrt.f64 #s(literal 2 binary64))))))
(+ (* 1/2 (* (sqrt re) (sqrt 2))) (* im (+ (* -1/4 (* (/ im (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (/ 1 (sqrt 2)))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 im (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 im (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 2 binary64)))))))
(+ (* 1/2 (* (sqrt re) (sqrt 2))) (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (/ 1 (sqrt 2)))) (* im (+ (* -1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (pow (sqrt 2) 3)))) (* 1/4 (* (/ im (pow (sqrt 2) 5)) (sqrt (/ 1 (pow re 5))))))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 im (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 im (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 im (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2))))))
(*.f64 im (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (/.f64 re (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))))
(*.f64 im (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (/.f64 re (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))) (*.f64 (/.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)))) #s(literal -1/4 binary64))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 7))) (/ (pow re 3) (pow (sqrt 2) 5)))) (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2))))))))
(*.f64 im (+.f64 (*.f64 (/.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)))) #s(literal -1/4 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 (/.f64 re (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64)))) (*.f64 re (*.f64 re re))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))))
(* -1/2 (* (sqrt im) (* (pow (sqrt -1) 2) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2)))))))
(*.f64 (+.f64 (*.f64 #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/2 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 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (pow (sqrt -1) 2)) (pow (sqrt 2) 3)))) (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2))))))))
(*.f64 (+.f64 (*.f64 #s(literal -1/2 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 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)))) (*.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (*.f64 (/.f64 (*.f64 re re) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (pow (sqrt -1) 2)) (pow (sqrt 2) 3)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 7))) (/ (* (pow re 3) (pow (sqrt -1) 2)) (pow (sqrt 2) 5)))) (* 1/2 (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2)))))))))
(*.f64 (+.f64 (*.f64 #s(literal -1/2 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 (*.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (*.f64 (/.f64 (*.f64 re re) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))) (*.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64))))) (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) 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/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 (pow im 3))) (/ re (pow (sqrt 2) 3)))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (/ 1 (pow (sqrt 2) 3)))) (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ re (pow (sqrt 2) 5)))))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 re (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (/.f64 re (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))))))
(* 1/2 (* (sqrt re) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))
(* re (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt 2))) (* 1/2 (* (/ im (sqrt 2)) (sqrt (/ 1 (pow re 3)))))))
(*.f64 re (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 im (sqrt.f64 #s(literal 2 binary64)))))))
(* re (+ (* -1/4 (* (/ (pow im 2) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt 2))) (* 1/2 (* (/ im (sqrt 2)) (sqrt (/ 1 (pow re 3))))))))
(*.f64 re (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 im (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 im im) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* re (+ (* -1/4 (* (/ (pow im 2) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (/ (pow im 3) (pow (sqrt 2) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt 2))) (* 1/2 (* (/ im (sqrt 2)) (sqrt (/ 1 (pow re 3)))))))))
(*.f64 re (+.f64 (*.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 im im) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 im (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 im (*.f64 im im)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64))))))))
(* -1/2 (* (sqrt re) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))
(* -1 (* re (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt -1)))) (* 1/2 (* (/ (* im (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 #s(literal -2 binary64))))) (neg.f64 re))
(* -1 (* re (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt -1)))) (* 1/2 (* (/ (* im (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow re 3)))))))))
(*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 #s(literal -2 binary64))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 (*.f64 im im) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64))))))) (neg.f64 re))
(* -1 (* re (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (/ (* (pow im 3) (sqrt -1)) (pow (sqrt -2) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt -1)))) (* 1/2 (* (/ (* im (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))))))))
(*.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 (*.f64 im im) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64)))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 #s(literal -2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im (*.f64 im im))) (pow.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 5 binary64))))))) (neg.f64 re))
(* (sqrt re) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 re))
(+ (* (sqrt re) (sqrt 2)) (* (/ im (sqrt 2)) (sqrt (/ 1 re))))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 re)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (/.f64 im (sqrt.f64 #s(literal 2 binary64)))))
(+ (* im (+ (* -1/2 (* (/ im (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (/ 1 (sqrt 2))))) (* (sqrt re) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 re)) (*.f64 im (+.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 im (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))))))
(+ (* im (+ (* im (+ (* -1/2 (* (sqrt (/ 1 (pow re 3))) (/ 1 (pow (sqrt 2) 3)))) (* 1/2 (* (/ im (pow (sqrt 2) 5)) (sqrt (/ 1 (pow re 5))))))) (* (sqrt (/ 1 re)) (/ 1 (sqrt 2))))) (* (sqrt re) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 re)) (*.f64 im (+.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 im (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 im (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 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 (/.f64 re (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* (sqrt (/ 1 im)) (sqrt 2)) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2))))))
(*.f64 im (+.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (/.f64 re (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 7))) (/ (pow re 3) (pow (sqrt 2) 5)))) (+ (* (sqrt (/ 1 im)) (sqrt 2)) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))))
(*.f64 im (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (/.f64 re (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64)))) (*.f64 re (*.f64 re re))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))))
(* -1 (* (sqrt im) (* (pow (sqrt -1) 2) (sqrt 2))))
(*.f64 (sqrt.f64 im) (neg.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (neg.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (pow (sqrt -1) 2)) (pow (sqrt 2) 3)))) (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2)))))))
(*.f64 (-.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (/.f64 (*.f64 re re) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 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 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (pow (sqrt -1) 2)) (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (pow (sqrt -1) 2)) (pow (sqrt 2) 3)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 7))) (/ (* (pow re 3) (pow (sqrt -1) 2)) (pow (sqrt 2) 5)))) (* (sqrt (/ 1 im)) (* (pow (sqrt -1) 2) (sqrt 2))))))))
(*.f64 (-.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (/.f64 (*.f64 re re) (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)))) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64)))) (*.f64 #s(literal -1 binary64) (*.f64 re (*.f64 re re)))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (neg.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* (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 (pow im 3))) (/ re (pow (sqrt 2) 3)))) (* (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 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (/.f64 re (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))))))
(+ (* re (+ (* re (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ 1 (pow (sqrt 2) 3)))) (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ re (pow (sqrt 2) 5)))))) (* (sqrt (/ 1 im)) (/ 1 (sqrt 2))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 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 (*.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (/.f64 re (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64))))))))))
(* (sqrt re) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 re))
(* re (+ (* (sqrt (/ 1 re)) (sqrt 2)) (* (/ im (sqrt 2)) (sqrt (/ 1 (pow re 3))))))
(*.f64 re (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 im (sqrt.f64 #s(literal 2 binary64))))))
(* re (+ (* -1/2 (* (/ (pow im 2) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* (sqrt (/ 1 re)) (sqrt 2)) (* (/ im (sqrt 2)) (sqrt (/ 1 (pow re 3)))))))
(*.f64 re (+.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 im (sqrt.f64 #s(literal 2 binary64))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 im im) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))))
(* re (+ (* -1/2 (* (/ (pow im 2) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (/ (pow im 3) (pow (sqrt 2) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* (sqrt (/ 1 re)) (sqrt 2)) (* (/ im (sqrt 2)) (sqrt (/ 1 (pow re 3))))))))
(*.f64 re (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 im im) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 im (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im (*.f64 im im)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64))))))))
(* -1 (* (sqrt re) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 (sqrt.f64 re) #s(literal -1 binary64)))
(* -1 (* re (+ (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt -1))) (* (/ (* im (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow re 3)))))))
(*.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 #s(literal -2 binary64)))) (neg.f64 re))
(* -1 (* re (+ (* -1/2 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt -1))) (* (/ (* im (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow re 3))))))))
(*.f64 (+.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 (*.f64 im im) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64))))))) (neg.f64 re))
(* -1 (* re (+ (* -1/2 (* (/ (* (pow im 2) (sqrt -1)) (pow (sqrt -2) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (/ (* (pow im 3) (sqrt -1)) (pow (sqrt -2) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* (sqrt (/ 1 re)) (* (sqrt -2) (sqrt -1))) (* (/ (* im (sqrt -1)) (sqrt -2)) (sqrt (/ 1 (pow re 3)))))))))
(*.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 (*.f64 im im) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64)))))) (+.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im (*.f64 im im))) (pow.f64 (sqrt.f64 #s(literal -2 binary64)) #s(literal 5 binary64))))))) (neg.f64 re))
2
#s(literal 2 binary64)
(+ 2 (* 2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im))
(+ 2 (* 2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im))
(+ 2 (* 2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im))
(* 2 (/ re im))
(/.f64 (*.f64 #s(literal 2 binary64) re) im)
(* re (+ (* 2 (/ 1 im)) (* 2 (/ 1 re))))
(*.f64 re (+.f64 (/.f64 #s(literal 2 binary64) im) (/.f64 #s(literal 2 binary64) re)))
(* re (+ (* 2 (/ 1 im)) (* 2 (/ 1 re))))
(*.f64 re (+.f64 (/.f64 #s(literal 2 binary64) im) (/.f64 #s(literal 2 binary64) re)))
(* re (+ (* 2 (/ 1 im)) (* 2 (/ 1 re))))
(*.f64 re (+.f64 (/.f64 #s(literal 2 binary64) im) (/.f64 #s(literal 2 binary64) re)))
(* 2 (/ re im))
(/.f64 (*.f64 #s(literal 2 binary64) re) im)
(* re (+ (* 2 (/ 1 im)) (* 2 (/ 1 re))))
(*.f64 re (+.f64 (/.f64 #s(literal 2 binary64) im) (/.f64 #s(literal 2 binary64) re)))
(* re (+ (* 2 (/ 1 im)) (* 2 (/ 1 re))))
(*.f64 re (+.f64 (/.f64 #s(literal 2 binary64) im) (/.f64 #s(literal 2 binary64) re)))
(* re (+ (* 2 (/ 1 im)) (* 2 (/ 1 re))))
(*.f64 re (+.f64 (/.f64 #s(literal 2 binary64) im) (/.f64 #s(literal 2 binary64) re)))
(* 2 (/ re im))
(/.f64 (*.f64 #s(literal 2 binary64) re) im)
(/ (+ (* 2 im) (* 2 re)) im)
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re)) im)
(/ (+ (* 2 im) (* 2 re)) im)
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re)) im)
(/ (+ (* 2 im) (* 2 re)) im)
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re)) im)
2
#s(literal 2 binary64)
(+ 2 (* 2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im))
(+ 2 (* 2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im))
(+ 2 (* 2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im))
2
#s(literal 2 binary64)
(+ 2 (* 2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im))
(+ 2 (* 2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im))
(+ 2 (* 2 (/ re im)))
(+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im))
(* 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 (*.f64 #s(literal 1/2 binary64) (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 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) re) (*.f64 (*.f64 im im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal 1/2 binary64)) (*.f64 im (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re) #s(literal 1/4 binary64)))))) im)
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* 1/2 (* (sqrt (/ 1 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 (/.f64 re (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 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 (/.f64 re (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1/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 (*.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)))) #s(literal -1/4 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 (/.f64 re (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))))) (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -2 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (+ (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2))))))))
(-.f64 #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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -2 binary64))))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re re) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))))))))
(* -1 (* im (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2))))))))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -2 binary64))))) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 im) (*.f64 (*.f64 re re) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 im)) (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (/.f64 (*.f64 re re) #s(literal -2 binary64))))) (*.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))))
(*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 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/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -1 binary64) (*.f64 im #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (* 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 #s(literal -1 binary64) (*.f64 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 (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) (*.f64 re (*.f64 re re))))))
(* -1/2 (* (sqrt (/ 1 im)) re))
(*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re))
(* -1 (* re (+ (* 1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re))))))
(*.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) re))) (neg.f64 re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/2 (sqrt im)) (* -1/4 (* (sqrt im) (/ (- (* 2 im) im) re)))) re)) (* 1/2 (sqrt (/ 1 im))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal 1/2 binary64)) (/.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)) (neg.f64 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal 1/2 binary64)) (/.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)) (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 (*.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 (/.f64 re (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))))
(* 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 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 (/.f64 re (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))))
(* 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 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 (/.f64 re (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (+ (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))) (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))))))
(*.f64 (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -2 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 re re) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (+ (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))) (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))))))
(*.f64 (-.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -2 binary64)))) (/.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)) (*.f64 (*.f64 re re) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (*.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (/.f64 (*.f64 re re) #s(literal -2 binary64))))) (*.f64 im (*.f64 im im)))) (-.f64 #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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal 1/2 binary64)) (/.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -1 binary64) (*.f64 im #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(+ (* re (+ (* 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 #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 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (/.f64 (-.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 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (/.f64 (-.f64 (*.f64 im #s(literal 2 binary64)) im) (*.f64 re re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (*.f64 im (*.f64 im im))) (-.f64 (*.f64 im #s(literal 2 binary64)) im)) (*.f64 re (*.f64 re re)))))))
(* -1 (* (sqrt (/ 1 im)) re))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (neg.f64 re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* (sqrt im) (/ 1 re)))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) re)) (neg.f64 re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (* -1 (sqrt im)) (* -1/2 (* (sqrt im) (/ (- (* 2 im) im) re)))) re)))))
(*.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)) (/.f64 (-.f64 (*.f64 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 (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)) (neg.f64 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 #s(literal 2 binary64) (+.f64 (/.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 #s(literal 2 binary64) (+.f64 (/.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 #s(literal 1 binary64) im) (/.f64 #s(literal 2 binary64) re)) (/.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re re))))
(* (pow re 2) (+ (* 2 (/ im (pow re 2))) (+ (/ 1 im) (* 2 (/ 1 re)))))
(*.f64 (*.f64 re re) (+.f64 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 2 binary64) re)) (/.f64 (*.f64 im #s(literal 2 binary64)) (*.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)))
(* 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))
im
(+ im re)
(+.f64 im re)
(+ im (* re (+ 1 (* 1/2 (/ re im)))))
(+.f64 im (*.f64 re (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 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 #s(literal -1/2 binary64) (/.f64 (*.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))) (neg.f64 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))))) (neg.f64 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/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64))) (pow.f64 re #s(literal 6 binary64)))) (neg.f64 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))
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
(* 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))

eval117.0ms (0.9%)

Compiler

Compiled 20893 to 3103 computations (85.1% saved)

prune140.0ms (1.1%)

Pruning

23 alts after pruning (18 fresh and 5 done)

PrunedKeptTotal
New82311834
Fresh077
Picked145
Done011
Total82423847
Accuracy
89.9%
Counts
847 → 23
Alt Table
Click to see full alt table
StatusAccuracyProgram
16.7%
(pow.f64 (*.f64 re re) #s(literal 1/4 binary64))
27.1%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (/.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)) (+.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (hypot.f64 re im))))) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
11.9%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
▶51.9%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
✓79.8%
(*.f64 #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)))
▶71.0%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))) #s(literal 2 binary64)))
12.3%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))))) (*.f64 re re))) #s(literal 2 binary64)))
13.3%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) #s(literal 2 binary64)))
48.5%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) #s(literal 2 binary64)))
47.1%
(*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (*.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (*.f64 re re) im) im))) im)) (pow.f64 (-.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (/.f64 im re))) #s(literal 1/2 binary64))))
49.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (*.f64 re re) im) im))) im) (-.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (/.f64 im re))))))
29.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (-.f64 re (hypot.f64 re im)))))
▶27.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.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 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
11.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))))
▶25.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))))
✓52.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))))))
47.6%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (/.f64 (*.f64 re re) im) im)) im))))))))
✓53.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im)))))
52.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
5.4%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.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)) re))))
✓80.4%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
✓54.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re))))
▶27.3%
(sqrt.f64 re)
Compiler

Compiled 815 to 533 computations (34.6% saved)

simplify167.0ms (1.3%)

Algorithm
1×egg-herbie
Localize:

Found 17 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(/.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 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))
✓cost-diff0
(sqrt.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 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.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 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
✓cost-diff128
(+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))
✓cost-diff0
(*.f64 im #s(literal 2 binary64))
✓cost-diff0
(pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
✓cost-diff6528
(pow.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
✓cost-diff0
(*.f64 re #s(literal 4 binary64))
✓cost-diff0
(+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))
✓cost-diff0
(sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re)))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))))
✓cost-diff0
(sqrt.f64 re)
✓cost-diff0
(exp.f64 #s(literal 1/4 binary64))
✓cost-diff0
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))) #s(literal 2 binary64)))
✓cost-diff6336
(pow.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))) #s(literal 2 binary64))
Rules
2538×sum3-define
2016×sum5-define
1442×fma-define
1418×fma-lowering-fma.f32
1418×fma-lowering-fma.f64
Iterations

Useful iterations: 5 (0.0ms)

IterNodesCost
038295
187289
2148287
3231283
4338283
5696279
62523279
74291279
87937279
08239279
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(* 1/2 (pow (pow (exp 1/4) (log (* 2 (+ re (sqrt (+ (* re re) (* im im))))))) 2))
1/2
(pow (pow (exp 1/4) (log (* 2 (+ re (sqrt (+ (* re re) (* im im))))))) 2)
(pow (exp 1/4) (log (* 2 (+ re (sqrt (+ (* re re) (* im im)))))))
(exp 1/4)
1/4
(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
(sqrt re)
re
(* 1/2 (sqrt (+ (* re 4) (/ (* im im) re))))
1/2
(sqrt (+ (* re 4) (/ (* im im) re)))
(+ (* re 4) (/ (* im im) re))
(* re 4)
re
4
(/ (* im im) re)
(* im im)
im
(* 1/2 (pow (pow (* im 2) 1/4) 2))
1/2
(pow (pow (* im 2) 1/4) 2)
(pow (* im 2) 1/4)
(* im 2)
im
2
1/4
(* 1/2 (sqrt (/ (* 2 (+ (* re (* re re)) (pow (+ (* re re) (* im im)) 3/2))) (+ (+ (* re re) (* im im)) (* re (- re (sqrt (+ (* re re) (* im im)))))))))
1/2
(sqrt (/ (* 2 (+ (* re (* re re)) (pow (+ (* re re) (* im im)) 3/2))) (+ (+ (* re re) (* im im)) (* re (- re (sqrt (+ (* re re) (* im im))))))))
(/ (* 2 (+ (* re (* re re)) (pow (+ (* re re) (* im im)) 3/2))) (+ (+ (* re re) (* im im)) (* re (- re (sqrt (+ (* re re) (* im im)))))))
(* 2 (+ (* re (* re re)) (pow (+ (* re re) (* im im)) 3/2)))
2
(+ (* re (* re re)) (pow (+ (* re re) (* im im)) 3/2))
(* re (* re re))
re
(* re re)
(pow (+ (* re re) (* im im)) 3/2)
(+ (* re re) (* im im))
(* im im)
im
3/2
(+ (+ (* re re) (* im im)) (* re (- re (sqrt (+ (* re re) (* im im))))))
(* re (- re (sqrt (+ (* re re) (* im im)))))
(- re (sqrt (+ (* re re) (* im im))))
(sqrt (+ (* re re) (* im im)))
Outputs
(* 1/2 (pow (pow (exp 1/4) (log (* 2 (+ re (sqrt (+ (* re re) (* im im))))))) 2))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))))
1/2
#s(literal 1/2 binary64)
(pow (pow (exp 1/4) (log (* 2 (+ re (sqrt (+ (* re re) (* im im))))))) 2)
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(pow (exp 1/4) (log (* 2 (+ re (sqrt (+ (* re re) (* im im)))))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
(exp 1/4)
(exp.f64 #s(literal 1/4 binary64))
1/4
#s(literal 1/4 binary64)
(log (* 2 (+ re (sqrt (+ (* re re) (* im im))))))
(log.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
(sqrt re)
(sqrt.f64 re)
re
(* 1/2 (sqrt (+ (* re 4) (/ (* im im) re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))))
1/2
#s(literal 1/2 binary64)
(sqrt (+ (* re 4) (/ (* im im) re)))
(sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re)))
(+ (* re 4) (/ (* im im) re))
(+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))
(* re 4)
(*.f64 re #s(literal 4 binary64))
re
4
#s(literal 4 binary64)
(/ (* im im) re)
(/.f64 (*.f64 im im) re)
(* im im)
(*.f64 im im)
im
(* 1/2 (pow (pow (* im 2) 1/4) 2))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) im)))
1/2
#s(literal 1/2 binary64)
(pow (pow (* im 2) 1/4) 2)
(sqrt.f64 (*.f64 #s(literal 2 binary64) im))
(pow (* im 2) 1/4)
(pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64))
(* im 2)
(*.f64 #s(literal 2 binary64) im)
im
2
#s(literal 2 binary64)
1/4
#s(literal 1/4 binary64)
(* 1/2 (sqrt (/ (* 2 (+ (* re (* re re)) (pow (+ (* re re) (* im im)) 3/2))) (+ (+ (* re re) (* im im)) (* re (- re (sqrt (+ (* re re) (* im im)))))))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #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 im im) (*.f64 re (-.f64 (*.f64 #s(literal 2 binary64) re) (hypot.f64 re im))))))))
1/2
#s(literal 1/2 binary64)
(sqrt (/ (* 2 (+ (* re (* re re)) (pow (+ (* re re) (* im im)) 3/2))) (+ (+ (* re re) (* im im)) (* re (- re (sqrt (+ (* re re) (* im im))))))))
(sqrt.f64 (*.f64 #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 im im) (*.f64 re (-.f64 (*.f64 #s(literal 2 binary64) re) (hypot.f64 re im)))))))
(/ (* 2 (+ (* re (* re re)) (pow (+ (* re re) (* im im)) 3/2))) (+ (+ (* re re) (* im im)) (* re (- re (sqrt (+ (* re re) (* im im)))))))
(*.f64 #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 im im) (*.f64 re (-.f64 (*.f64 #s(literal 2 binary64) re) (hypot.f64 re im))))))
(* 2 (+ (* re (* re re)) (pow (+ (* re re) (* im im)) 3/2)))
(*.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))))
2
#s(literal 2 binary64)
(+ (* re (* re re)) (pow (+ (* re re) (* im im)) 3/2))
(+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))
(* re (* re re))
(*.f64 re (*.f64 re re))
re
(* re re)
(*.f64 re re)
(pow (+ (* re re) (* im im)) 3/2)
(pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))
(+ (* re re) (* im im))
(+.f64 (*.f64 re re) (*.f64 im im))
(* im im)
(*.f64 im im)
im
3/2
#s(literal 3/2 binary64)
(+ (+ (* re re) (* im im)) (* re (- re (sqrt (+ (* re re) (* im im))))))
(+.f64 (*.f64 im im) (*.f64 re (-.f64 (*.f64 #s(literal 2 binary64) re) (hypot.f64 re im))))
(* re (- re (sqrt (+ (* re re) (* im im)))))
(*.f64 re (-.f64 re (hypot.f64 re im)))
(- re (sqrt (+ (* re re) (* im im))))
(-.f64 re (hypot.f64 re im))
(sqrt (+ (* re re) (* im im)))
(hypot.f64 re im)

localize818.0ms (6.2%)

Localize:

Found 17 expressions of interest:

NewMetricScoreProgram
✓accuracy99.9%
(pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))
✓accuracy99.9%
(*.f64 re (*.f64 re re))
✓accuracy98.8%
(+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))
✓accuracy85.6%
(/.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 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))
✓accuracy100.0%
(pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64))
✓accuracy100.0%
(*.f64 im #s(literal 2 binary64))
✓accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
✓accuracy99.8%
(pow.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
✓accuracy100.0%
(*.f64 im im)
✓accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))))
✓accuracy98.2%
(/.f64 (*.f64 im im) re)
✓accuracy88.7%
(sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re)))
✓accuracy100.0%
(sqrt.f64 re)
✓accuracy100.0%
(log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))
✓accuracy100.0%
(exp.f64 #s(literal 1/4 binary64))
✓accuracy99.8%
(pow.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))) #s(literal 2 binary64))
✓accuracy97.3%
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
Results
314.0ms66×0valid
231.0ms66×5exit
200.0ms124×0invalid
Compiler

Compiled 346 to 39 computations (88.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 454.0ms
ival-pow: 313.0ms (68.9% of total)
backward-pass: 38.0ms (8.4% of total)
ival-mult: 36.0ms (7.9% of total)
compiled-spec: 15.0ms (3.3% of total)
ival-add: 14.0ms (3.1% of total)
ival-sqrt: 12.0ms (2.6% of total)
ival-div: 8.0ms (1.8% of total)
ival-log: 8.0ms (1.8% of total)
ival-exp: 5.0ms (1.1% of total)
ival-sub: 3.0ms (0.7% of total)
const: 1.0ms (0.2% of total)

series187.0ms (1.4%)

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

102 calls:

TimeVariablePointExpression
64.0ms
im
@0
(pow (* im 2) 1/4)
39.0ms
im
@-inf
(pow (* im 2) 1/4)
6.0ms
im
@inf
(pow (* im 2) 1/4)
6.0ms
re
@-inf
(* 1/2 (sqrt (/ (* 2 (+ (* re (* re re)) (pow (+ (* re re) (* im im)) 3/2))) (+ (+ (* re re) (* im im)) (* re (- re (sqrt (+ (* re re) (* im im)))))))))
4.0ms
im
@0
(pow (pow (exp 1/4) (log (* 2 (+ re (sqrt (+ (* re re) (* im im))))))) 2)

rewrite325.0ms (2.5%)

Algorithm
1×batch-egg-rewrite
Rules
2812×*-lowering-*.f32
2812×*-lowering-*.f64
2094×/-lowering-/.f32
2094×/-lowering-/.f64
1886×fma-lowering-fma.f32
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
038209
1216193
21753187
08688187
Stop Event
1×iter limit
1×node limit
Counts
22 → 437
Calls
Call 1
Inputs
(pow (pow (exp 1/4) (log (* 2 (+ re (sqrt (+ (* re re) (* im im))))))) 2)
(* 1/2 (pow (pow (exp 1/4) (log (* 2 (+ re (sqrt (+ (* re re) (* im im))))))) 2))
(pow (exp 1/4) (log (* 2 (+ re (sqrt (+ (* re re) (* im im)))))))
(exp 1/4)
(sqrt re)
(* 1/2 (sqrt (+ (* re 4) (/ (* im im) re))))
(sqrt (+ (* re 4) (/ (* im im) re)))
(+ (* re 4) (/ (* im im) re))
(* re 4)
(pow (pow (* im 2) 1/4) 2)
(* 1/2 (pow (pow (* im 2) 1/4) 2))
(pow (* im 2) 1/4)
(* im 2)
(+ (+ (* re re) (* im im)) (* re (- re (sqrt (+ (* re re) (* im im))))))
(* 1/2 (sqrt (/ (* 2 (+ (* re (* re re)) (pow (+ (* re re) (* im im)) 3/2))) (+ (+ (* re re) (* im im)) (* re (- re (sqrt (+ (* re re) (* im im)))))))))
(sqrt (/ (* 2 (+ (* re (* re re)) (pow (+ (* re re) (* im im)) 3/2))) (+ (+ (* re re) (* im im)) (* re (- re (sqrt (+ (* re re) (* im im))))))))
(/ (* 2 (+ (* re (* re re)) (pow (+ (* re re) (* im im)) 3/2))) (+ (+ (* re re) (* im im)) (* re (- re (sqrt (+ (* re re) (* im im)))))))
(log (* 2 (+ re (sqrt (+ (* re re) (* im im))))))
(/ (* im im) re)
(* im im)
(* re (* re re))
(pow (+ (* re re) (* im im)) 3/2)
Outputs
(exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))))
(exp.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))))
(exp.f64 (log.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64)) #s(literal 2 binary64))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))))
(exp.f64 (*.f64 (log.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64)) #s(literal 2 binary64))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal 1/2 binary64))) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(exp.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))) #s(literal 1 binary64)))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 1 binary64)) #s(literal 2 binary64)))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 (+.f64 (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64))) #s(literal 2 binary64)))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64))) #s(literal 2 binary64)))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))) #s(literal 1 binary64)))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 (log.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 binary64)))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 1 binary64)) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (+.f64 (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64))) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64))) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 1 binary64))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 1 binary64)) (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 1 binary64))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (+.f64 (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64))) (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 1 binary64))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64))) (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 1 binary64))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) (+.f64 (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 1 binary64)) (+.f64 (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (+.f64 (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64))) (+.f64 (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64))) (+.f64 (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) (*.f64 #s(literal 2 binary64) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 1 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (+.f64 (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))) #s(literal 2 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))) #s(literal 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 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64)) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (sqrt.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64))) #s(literal 4 binary64))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 1 binary64)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (+.f64 (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64))))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))) #s(literal 2 binary64)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64))))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (*.f64 (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)) #s(literal 2 binary64)))
(pow.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))) #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 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(*.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 (sqrt.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64))) (pow.f64 (sqrt.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64))) #s(literal 3 binary64)))
(*.f64 (sqrt.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64))) (pow.f64 (pow.f64 (sqrt.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64))) #s(literal 3 binary64)) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (log.f64 (+.f64 re (hypot.f64 re im))))) #s(literal 2 binary64)))
(*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))) #s(literal 2 binary64)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))) #s(literal 2 binary64)))))
(*.f64 (pow.f64 (sqrt.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64))) #s(literal 3 binary64)) (sqrt.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 re (hypot.f64 re im)))))
(*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 re (hypot.f64 re im)))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))))
(*.f64 (pow.f64 (pow.f64 (sqrt.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64))) #s(literal 3 binary64)) #s(literal 1 binary64)) (sqrt.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))) #s(literal 2 binary64)))) #s(literal 1 binary64)) (pow.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))) #s(literal 2 binary64)))) #s(literal 1 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 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64)) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(*.f64 #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)))
(*.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/4 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 1 binary64))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)))))
(exp.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 #s(literal 1/2 binary64))) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 1 binary64)))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)) #s(literal 2 binary64)))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 1 binary64)) #s(literal 1 binary64)))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 (+.f64 (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64))) #s(literal 1 binary64)))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64))) #s(literal 1 binary64)))
(pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64)) #s(literal 1 binary64))
(pow.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64)) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (sqrt.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 (exp.f64 #s(literal 1/2 binary64)) (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (*.f64 (/.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)) #s(literal 1 binary64)))
(pow.f64 (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))) #s(literal 1/4 binary64))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (exp.f64 (*.f64 #s(literal 1/4 binary64) (log.f64 (+.f64 re (hypot.f64 re im))))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (log.f64 (+.f64 re (hypot.f64 re im))))) #s(literal 1 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (exp.f64 (*.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64))))
(*.f64 (sqrt.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64))) (sqrt.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/4 binary64))))
(*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (log.f64 (+.f64 re (hypot.f64 re im))))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(exp.f64 #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 (pow.f64 re #s(literal 1/4 binary64)) (pow.f64 re #s(literal 1/4 binary64)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)))
(sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 im im) re) (*.f64 re #s(literal 4 binary64))) (/.f64 re (*.f64 im im)))) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re)))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re)) (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re))))) (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 im im) re) (*.f64 re #s(literal 4 binary64))) (/.f64 re (*.f64 im im))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re))))) (sqrt.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))) (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 re (*.f64 im im)))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))) (sqrt.f64 (-.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re)))))) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 im im) re) (*.f64 re #s(literal 4 binary64))) (/.f64 re (*.f64 im im)))))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))))) (sqrt.f64 (neg.f64 (-.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re)))))
(/.f64 (sqrt.f64 (-.f64 (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))) (*.f64 (*.f64 re re) #s(literal 16 binary64)))) (sqrt.f64 (-.f64 (/.f64 (*.f64 im im) re) (*.f64 re #s(literal 4 binary64)))))
(/.f64 (neg.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re)))))) (neg.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 im im) re) (*.f64 re #s(literal 4 binary64))) (/.f64 re (*.f64 im im)))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))))) (neg.f64 (sqrt.f64 (-.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re)))))
(pow.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re)) (+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re)))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re))))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 im im) re) (*.f64 re #s(literal 4 binary64))) (/.f64 re (*.f64 im im))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 im im) re) (*.f64 re #s(literal 4 binary64))) (/.f64 re (*.f64 im im)))))))
(*.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re)))))
(*.f64 (pow.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64)))
(+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))
(+.f64 (/.f64 (*.f64 im im) re) (*.f64 re #s(literal 4 binary64)))
(-.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) (-.f64 #s(literal 0 binary64) re)))
(-.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) re))
(-.f64 (/.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (-.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))) (/.f64 (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))) (-.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))))
(fma.f64 re #s(literal 4 binary64) (/.f64 (*.f64 im im) re))
(fma.f64 im (/.f64 im re) (*.f64 re #s(literal 4 binary64)))
(fma.f64 (*.f64 im im) (/.f64 #s(literal 1 binary64) re) (*.f64 re #s(literal 4 binary64)))
(fma.f64 #s(literal 4 binary64) re (/.f64 (*.f64 im im) re))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)) (*.f64 re #s(literal 4 binary64)))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 im im) re) (*.f64 re #s(literal 4 binary64)))
(fma.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 im im) (*.f64 re #s(literal 4 binary64)))
(fma.f64 (/.f64 im re) im (*.f64 re #s(literal 4 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 im im) re) (*.f64 re #s(literal 4 binary64))) (/.f64 re (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re)))) (+.f64 (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))) (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 re (*.f64 im im))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 im im) re) (*.f64 re #s(literal 4 binary64))) (/.f64 re (*.f64 im im)))) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re)) (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))))
(/.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))) (-.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 im im) re) (*.f64 re #s(literal 4 binary64))) (/.f64 re (*.f64 im im)))) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re)))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re)) (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re))))) (neg.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 im im) re) (*.f64 re #s(literal 4 binary64))) (/.f64 re (*.f64 im im))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re))))) (neg.f64 (+.f64 (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))) (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 re (*.f64 im im)))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))) (neg.f64 (-.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))))
(/.f64 (-.f64 (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))) (*.f64 (*.f64 re re) #s(literal 16 binary64))) (-.f64 (/.f64 (*.f64 im im) re) (*.f64 re #s(literal 4 binary64))))
(/.f64 (-.f64 (*.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (-.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))) (*.f64 (-.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))) (*.f64 (-.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re)) (-.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re)))))) (neg.f64 (neg.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 im im) re) (*.f64 re #s(literal 4 binary64))) (/.f64 re (*.f64 im im)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))))) (neg.f64 (neg.f64 (-.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re)))))
(/.f64 (neg.f64 (-.f64 (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))) (*.f64 (*.f64 re re) #s(literal 16 binary64)))) (neg.f64 (-.f64 (/.f64 (*.f64 im im) re) (*.f64 re #s(literal 4 binary64)))))
(pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 im im) re) (*.f64 re #s(literal 4 binary64))) (/.f64 re (*.f64 im im)))) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re)) (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 64 binary64)) (/.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))) (*.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (-.f64 (/.f64 (*.f64 im im) re) (*.f64 re #s(literal 4 binary64))) (/.f64 re (*.f64 im im))))))
(*.f64 (-.f64 (*.f64 (*.f64 re re) #s(literal 16 binary64)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))))
(*.f64 re #s(literal 4 binary64))
(*.f64 #s(literal 4 binary64) re)
(exp.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 #s(literal 2 binary64) im)))))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) im)) #s(literal 1/2 binary64)))
(exp.f64 (log.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 #s(literal 2 binary64) im)))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) im)) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(sqrt.f64 (*.f64 #s(literal 2 binary64) im))
(pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)) #s(literal 4 binary64))
(pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 #s(literal 2 binary64) im)) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 #s(literal 2 binary64) im)) (*.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/8 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 #s(literal 2 binary64) im))))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 im #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) im)) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 im #s(literal 1/4 binary64)) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) im)) #s(literal 1/4 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 3/8 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 3/8 binary64)) #s(literal 1 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) im) im) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 3/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 im) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) im) im) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 3/8 binary64)) #s(literal 1 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64))) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 #s(literal 2 binary64) im))))
(exp.f64 (*.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) im)) #s(literal 1/8 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/8 binary64)))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 #s(literal 2 binary64) im)))
(pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/4 binary64)) #s(literal 1 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) im) (*.f64 #s(literal 2 binary64) im)) #s(literal 1/8 binary64))
(*.f64 (pow.f64 im #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 im #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)))
(exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) im)))
(*.f64 #s(literal 2 binary64) im)
(*.f64 im #s(literal 2 binary64))
(*.f64 (exp.f64 (log.f64 im)) (exp.f64 (log.f64 #s(literal 2 binary64))))
(*.f64 (exp.f64 (log.f64 #s(literal 2 binary64))) (exp.f64 (log.f64 im)))
(+.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))))
(+.f64 (*.f64 im im) (+.f64 (*.f64 re re) (*.f64 re (-.f64 re (hypot.f64 re im)))))
(+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))
(+.f64 (*.f64 re (-.f64 re (hypot.f64 re im))) (+.f64 (*.f64 re re) (*.f64 im im)))
(+.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))) (*.f64 re re))
(+.f64 (+.f64 (*.f64 re (-.f64 re (hypot.f64 re im))) (*.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 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))) (/.f64 (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))))))
(fma.f64 re re (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))))
(fma.f64 re (-.f64 re (hypot.f64 re im)) (+.f64 (*.f64 re re) (*.f64 im im)))
(fma.f64 im im (+.f64 (*.f64 re re) (*.f64 re (-.f64 re (hypot.f64 re im)))))
(fma.f64 (hypot.f64 re im) (hypot.f64 re im) (*.f64 re (-.f64 re (hypot.f64 re im))))
(fma.f64 (-.f64 re (hypot.f64 re im)) re (+.f64 (*.f64 re re) (*.f64 im im)))
(fma.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (*.f64 re (-.f64 re (hypot.f64 re im))))
(fma.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im))) (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (-.f64 re (hypot.f64 re im))))
(/.f64 (+.f64 (pow.f64 (*.f64 re (-.f64 re (hypot.f64 re im))) #s(literal 3 binary64)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))))) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 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 (pow.f64 (*.f64 re (-.f64 re (hypot.f64 re im))) #s(literal 3 binary64)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))))) (+.f64 (pow.f64 (*.f64 re (-.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.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 (pow.f64 (*.f64 re (-.f64 re (hypot.f64 re im))) #s(literal 3 binary64)) (*.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 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))) (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (pow.f64 (*.f64 re (-.f64 re (hypot.f64 re im))) #s(literal 2 binary64)))))
(/.f64 (-.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 #s(literal -1 binary64) (neg.f64 (/.f64 (+.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 (pow.f64 (*.f64 re (-.f64 re (hypot.f64 re im))) #s(literal 3 binary64)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))) (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (pow.f64 (*.f64 re (-.f64 re (hypot.f64 re im))) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 re (-.f64 re (hypot.f64 re im))) #s(literal 3 binary64)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))))) (neg.f64 (+.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 (neg.f64 (+.f64 (pow.f64 (*.f64 re (-.f64 re (hypot.f64 re im))) #s(literal 3 binary64)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))))) (neg.f64 (+.f64 (pow.f64 (*.f64 re (-.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (pow.f64 (*.f64 re (-.f64 re (hypot.f64 re im))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))))
(/.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (pow.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))) #s(literal 3 binary64))) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (-.f64 (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 re (*.f64 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 (pow.f64 (*.f64 re (-.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (*.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 re) (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))) (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (*.f64 re (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))))) (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))))
(/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))) (+.f64 re (hypot.f64 re im))) (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (*.f64 re (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))))) (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 re (hypot.f64 re im))))
(/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))) (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (*.f64 (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) re))) (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))))
(/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))) (+.f64 re (hypot.f64 re im))) (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) re))) (*.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 re (hypot.f64 re im))))
(/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))) (*.f64 (+.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 im im))))) (*.f64 re (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))))) (*.f64 (+.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 im im))))) (+.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 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))) (+.f64 re (hypot.f64 re im))) (*.f64 (+.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 im im))))) (*.f64 re (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))))) (*.f64 (+.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 im im))))) (+.f64 re (hypot.f64 re im))))
(/.f64 (+.f64 (*.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))) (*.f64 (+.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 im im))))) (*.f64 (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) re))) (*.f64 (+.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 im im))))) (+.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 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))) (+.f64 re (hypot.f64 re im))) (*.f64 (+.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 im im))))) (*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) re))) (*.f64 (+.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 im im))))) (+.f64 re (hypot.f64 re im))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))) (*.f64 (/.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))) (*.f64 re (-.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 (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))) (*.f64 (/.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))) (*.f64 re (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))))) (*.f64 (/.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))) (+.f64 re (hypot.f64 re im))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))) (*.f64 (/.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))) (*.f64 (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) re))) (*.f64 (/.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))) (*.f64 (/.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))) (*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) re))) (*.f64 (/.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))) (+.f64 re (hypot.f64 re im))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))) (*.f64 (/.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im)))) (*.f64 re (-.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 (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im)))) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))) (*.f64 (/.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im)))) (*.f64 re (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))))) (*.f64 (/.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im)))) (+.f64 re (hypot.f64 re im))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))) (*.f64 (/.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im)))) (*.f64 (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) re))) (*.f64 (/.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im)))) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))) (*.f64 (/.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im)))) (*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) re))) (*.f64 (/.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im)))) (+.f64 re (hypot.f64 re im))))
(/.f64 (+.f64 (*.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im 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 im im)) (*.f64 re (-.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 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))))
(/.f64 (+.f64 (*.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im))) (+.f64 re (hypot.f64 re im))) (*.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))))) (*.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im))))
(/.f64 (+.f64 (*.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im 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 im im)) (*.f64 (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) re))) (*.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))))
(/.f64 (+.f64 (*.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im))) (+.f64 re (hypot.f64 re im))) (*.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) re))) (*.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (+.f64 re (hypot.f64 re im))))
(/.f64 (+.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))) (*.f64 (neg.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (*.f64 re (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))))) (*.f64 (neg.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))))
(/.f64 (+.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))) (+.f64 re (hypot.f64 re im))) (*.f64 (neg.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (*.f64 re (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))))) (*.f64 (neg.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (+.f64 re (hypot.f64 re im))))
(/.f64 (+.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))) (*.f64 (neg.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (*.f64 (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) re))) (*.f64 (neg.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))))
(/.f64 (+.f64 (*.f64 (neg.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))) (+.f64 re (hypot.f64 re im))) (*.f64 (neg.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) re))) (*.f64 (neg.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (+.f64 re (hypot.f64 re im))))
(/.f64 (+.f64 (*.f64 (neg.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im)))) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))) (*.f64 (neg.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))))) (*.f64 (neg.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))))
(/.f64 (+.f64 (*.f64 (neg.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im)))) (+.f64 re (hypot.f64 re im))) (*.f64 (neg.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))))) (*.f64 (neg.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (+.f64 re (hypot.f64 re im))))
(/.f64 (+.f64 (*.f64 (neg.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im)))) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))) (*.f64 (neg.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) re))) (*.f64 (neg.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))))
(/.f64 (+.f64 (*.f64 (neg.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im)))) (+.f64 re (hypot.f64 re im))) (*.f64 (neg.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) re))) (*.f64 (neg.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (+.f64 re (hypot.f64 re im))))
(/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 re (*.f64 re (*.f64 re re)))) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))) (*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) (*.f64 re (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))))) (*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))))
(/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 re (*.f64 re (*.f64 re re)))) (+.f64 re (hypot.f64 re im))) (*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) (*.f64 re (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))))) (*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) (+.f64 re (hypot.f64 re im))))
(/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 re (*.f64 re (*.f64 re re)))) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))) (*.f64 (-.f64 (*.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))) re))) (*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))))
(/.f64 (+.f64 (*.f64 (-.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 re (*.f64 re (*.f64 re re)))) (+.f64 re (hypot.f64 re im))) (*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) (*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) re))) (*.f64 (-.f64 (*.f64 im im) (*.f64 re re)) (+.f64 re (hypot.f64 re im))))
(/.f64 (+.f64 (*.f64 (*.f64 re (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))))
(/.f64 (+.f64 (*.f64 (*.f64 re (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (+.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 im im)))))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (+.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 im im)))))))
(/.f64 (+.f64 (*.f64 (*.f64 re (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (/.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) #s(literal 1 binary64))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (/.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))))))
(/.f64 (+.f64 (*.f64 (*.f64 re (-.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 (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im))))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) #s(literal 1 binary64))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (/.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im))))))
(/.f64 (+.f64 (*.f64 (*.f64 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 im im))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im))))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (-.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (*.f64 re (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (neg.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (neg.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (neg.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(/.f64 (+.f64 (*.f64 (*.f64 re (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (neg.f64 (-.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (neg.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im)))))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (neg.f64 (-.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 (*.f64 re (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (-.f64 (*.f64 im im) (*.f64 re re))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (-.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 re (*.f64 re (*.f64 re re)))))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (-.f64 (*.f64 im im) (*.f64 re re))))
(/.f64 (+.f64 (*.f64 (*.f64 re (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (*.f64 (+.f64 re (hypot.f64 re im)) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))))) (*.f64 (+.f64 re (hypot.f64 re im)) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))))
(/.f64 (+.f64 (*.f64 (*.f64 re (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (+.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 im im)))))) (*.f64 (+.f64 re (hypot.f64 re im)) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))))) (*.f64 (+.f64 re (hypot.f64 re im)) (+.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 im im)))))))
(/.f64 (+.f64 (*.f64 (*.f64 re (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (/.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))))) (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1 binary64))) (*.f64 (+.f64 re (hypot.f64 re im)) (/.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))))))
(/.f64 (+.f64 (*.f64 (*.f64 re (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (/.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im))))) (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1 binary64))) (*.f64 (+.f64 re (hypot.f64 re im)) (/.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im))))))
(/.f64 (+.f64 (*.f64 (*.f64 re (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (-.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (+.f64 re (hypot.f64 re im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im))))) (*.f64 (+.f64 re (hypot.f64 re im)) (-.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (*.f64 re (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (neg.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))) (*.f64 (+.f64 re (hypot.f64 re im)) (neg.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))))) (*.f64 (+.f64 re (hypot.f64 re im)) (neg.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(/.f64 (+.f64 (*.f64 (*.f64 re (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (neg.f64 (-.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (+.f64 re (hypot.f64 re im)) (neg.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im)))))) (*.f64 (+.f64 re (hypot.f64 re im)) (neg.f64 (-.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 (*.f64 re (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (-.f64 (*.f64 im im) (*.f64 re re))) (*.f64 (+.f64 re (hypot.f64 re im)) (-.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 re (*.f64 re (*.f64 re re)))))) (*.f64 (+.f64 re (hypot.f64 re im)) (-.f64 (*.f64 im im) (*.f64 re re))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) re) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) re) (+.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 im im)))))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (+.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 im im)))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) re) (/.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) #s(literal 1 binary64))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (/.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) re) (/.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im))))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) #s(literal 1 binary64))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (/.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) re) (-.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im))))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (-.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) re) (neg.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (neg.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (neg.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) re) (neg.f64 (-.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (neg.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im)))))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (neg.f64 (-.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) re) (-.f64 (*.f64 im im) (*.f64 re re))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (-.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 re (*.f64 re (*.f64 re re)))))) (*.f64 (+.f64 (+.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im))) (-.f64 (*.f64 im im) (*.f64 re re))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) re) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (*.f64 (+.f64 re (hypot.f64 re im)) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))))) (*.f64 (+.f64 re (hypot.f64 re im)) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) re) (+.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 im im)))))) (*.f64 (+.f64 re (hypot.f64 re im)) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))))) (*.f64 (+.f64 re (hypot.f64 re im)) (+.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 re (*.f64 re (*.f64 im im)))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) re) (/.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))))) (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1 binary64))) (*.f64 (+.f64 re (hypot.f64 re im)) (/.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))) (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) re) (/.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im))))) (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1 binary64))) (*.f64 (+.f64 re (hypot.f64 re im)) (/.f64 (-.f64 (*.f64 re re) (*.f64 im im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) re) (-.f64 (*.f64 re re) (*.f64 im im))) (*.f64 (+.f64 re (hypot.f64 re im)) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im))))) (*.f64 (+.f64 re (hypot.f64 re im)) (-.f64 (*.f64 re re) (*.f64 im im))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) re) (neg.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))) (*.f64 (+.f64 re (hypot.f64 re im)) (neg.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im))))))) (*.f64 (+.f64 re (hypot.f64 re im)) (neg.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) re) (neg.f64 (-.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (+.f64 re (hypot.f64 re im)) (neg.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im)))))) (*.f64 (+.f64 re (hypot.f64 re im)) (neg.f64 (-.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) re) (-.f64 (*.f64 im im) (*.f64 re re))) (*.f64 (+.f64 re (hypot.f64 re im)) (-.f64 (*.f64 (*.f64 im im) (*.f64 im im)) (*.f64 re (*.f64 re (*.f64 re re)))))) (*.f64 (+.f64 re (hypot.f64 re im)) (-.f64 (*.f64 im im) (*.f64 re re))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))) (*.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))) (pow.f64 (*.f64 re (-.f64 re (hypot.f64 re im))) #s(literal 2 binary64)))) (*.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 (*.f64 re (-.f64 re (hypot.f64 re im))) #s(literal 3 binary64)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))))))) (neg.f64 (neg.f64 (+.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 (neg.f64 (neg.f64 (-.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))))) (neg.f64 (neg.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
(/.f64 (neg.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (pow.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))) #s(literal 3 binary64)))) (neg.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (-.f64 (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 (neg.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (pow.f64 (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 im im) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (*.f64 re (-.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))))) (neg.f64 (-.f64 (*.f64 re (-.f64 re (hypot.f64 re im))) (+.f64 (*.f64 re re) (*.f64 im im)))))
(pow.f64 (/.f64 (+.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 (pow.f64 (*.f64 re (-.f64 re (hypot.f64 re im))) #s(literal 3 binary64)) (*.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))
(pow.f64 (/.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))) (-.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) (pow.f64 (*.f64 re (-.f64 re (hypot.f64 re im))) #s(literal 2 binary64)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (*.f64 re (-.f64 re (hypot.f64 re im))) #s(literal 3 binary64)) (*.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 (+.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 (*.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 #s(literal 1 binary64) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (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 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))))
(/.f64 (*.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))))) #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (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))))))) (neg.f64 (sqrt.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
(/.f64 (neg.f64 (*.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))))) #s(literal 1/2 binary64))) (neg.f64 (sqrt.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
(*.f64 #s(literal 1/2 binary64) (sqrt.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 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
(*.f64 (sqrt.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 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.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 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))) #s(literal 1/2 binary64)))
(sqrt.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 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))))
(/.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 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))) (*.f64 #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) (sqrt.f64 (/.f64 (/.f64 (+.f64 (+.f64 (*.f64 re re) (*.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))))) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (/.f64 (+.f64 (+.f64 (*.f64 re re) (*.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 (sqrt.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))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
(/.f64 (neg.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)))))) (neg.f64 (sqrt.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 (+.f64 (+.f64 (*.f64 re re) (*.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 (sqrt.f64 (neg.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)))) (sqrt.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))))))
(/.f64 (sqrt.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)))) #s(literal 1 binary64))) (sqrt.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))))
(/.f64 (neg.f64 (sqrt.f64 (*.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) #s(literal -2 binary64)))) (neg.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))))))
(/.f64 (neg.f64 (neg.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))))))) (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))))))
(pow.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 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))) #s(literal 1/2 binary64))
(pow.f64 (/.f64 (+.f64 (+.f64 (*.f64 re re) (*.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))))) #s(literal -1/2 binary64))
(pow.f64 (sqrt.f64 (/.f64 (+.f64 (+.f64 (*.f64 re re) (*.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)))))) #s(literal -1 binary64))
(pow.f64 (pow.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 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.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 im im)) (*.f64 re (-.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 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.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 im im)) (*.f64 re (-.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))))) (pow.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))) #s(literal -1/2 binary64)))
(*.f64 #s(literal 1 binary64) (sqrt.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 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.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 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
(*.f64 (sqrt.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 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))) #s(literal -1/2 binary64)) (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))))))
(*.f64 (sqrt.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))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (*.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) #s(literal -2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))))))
(*.f64 (pow.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 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))) #s(literal 1/4 binary64)) (pow.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 im im)) (*.f64 re (-.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 2 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (pow.f64 (/.f64 #s(literal 2 binary64) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))))))
(*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 2 binary64) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal 1/2 binary64)) (sqrt.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 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
(*.f64 (pow.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 (pow.f64 (*.f64 re (-.f64 re (hypot.f64 re im))) #s(literal 3 binary64)) (*.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/2 binary64)) (sqrt.f64 (+.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 (pow.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)))) #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))))
(*.f64 (sqrt.f64 (/.f64 (*.f64 #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 (pow.f64 (*.f64 re (-.f64 re (hypot.f64 re im))) #s(literal 3 binary64)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))))))) (sqrt.f64 (+.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 (sqrt.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))))) (sqrt.f64 (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))))
(exp.f64 (*.f64 (log.f64 (/.f64 (+.f64 (+.f64 (*.f64 re re) (*.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)))))) #s(literal -1 binary64)))
(neg.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 #s(literal 0 binary64) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
(neg.f64 (/.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)) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.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 (*.f64 re re) (*.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))) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 (*.f64 re re) (*.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 (+.f64 (+.f64 (*.f64 re re) (*.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))))) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (+.f64 (+.f64 (*.f64 re re) (*.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) (neg.f64 (/.f64 (+.f64 (+.f64 (*.f64 re re) (*.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) (neg.f64 (/.f64 (/.f64 (+.f64 (+.f64 (*.f64 re re) (*.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))))) #s(literal 1 binary64))))
(/.f64 (neg.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))) (neg.f64 (-.f64 #s(literal 0 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)))) #s(literal 1 binary64)) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))
(/.f64 (neg.f64 (neg.f64 (*.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))) #s(literal -2 binary64)))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))))))
(/.f64 (neg.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)))) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))))
(pow.f64 (/.f64 (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (+.f64 (+.f64 (*.f64 re re) (*.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))))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #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 (*.f64 re re) (*.f64 im im)) (*.f64 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 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 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 #s(literal 2 binary64) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.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 (*.f64 re re) (*.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))) #s(literal -2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))))
(*.f64 #s(literal 1 binary64) (/.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 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))))
(*.f64 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 re re) (*.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 (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))) (pow.f64 (/.f64 #s(literal 1 binary64) (*.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))))) #s(literal -1 binary64)))
(*.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 im im)) (*.f64 re (-.f64 re (hypot.f64 re im))))) #s(literal 2 binary64))
(*.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 (pow.f64 (*.f64 re (-.f64 re (hypot.f64 re im))) #s(literal 3 binary64)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))))) (+.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 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)))))
(log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))
(+.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 #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 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re (hypot.f64 re im)))))
(-.f64 (log.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)))) (log.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) re) (*.f64 #s(literal 2 binary64) re)) (-.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (hypot.f64 re im)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) re) (*.f64 #s(literal 2 binary64) (hypot.f64 re im)))))))
(-.f64 (log.f64 (-.f64 (*.f64 (*.f64 #s(literal 2 binary64) re) (*.f64 #s(literal 2 binary64) re)) (pow.f64 (*.f64 #s(literal 2 binary64) (hypot.f64 re im)) #s(literal 2 binary64)))) (log.f64 (-.f64 (*.f64 #s(literal 2 binary64) re) (*.f64 #s(literal 2 binary64) (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 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 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))))))
(exp.f64 (*.f64 (log.f64 (/.f64 re (*.f64 im im))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (*.f64 im im) (-.f64 #s(literal 0 binary64) re)))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) re))
(/.f64 (*.f64 im im) re)
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (-.f64 #s(literal 0 binary64) re))
(/.f64 #s(literal 1 binary64) (/.f64 re (*.f64 im im)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 re (*.f64 im im)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 re (*.f64 im im)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 re (*.f64 im im))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 re (*.f64 im im)) #s(literal 1 binary64))))
(/.f64 (*.f64 (*.f64 im im) #s(literal 1 binary64)) re)
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im))) (neg.f64 (-.f64 #s(literal 0 binary64) re)))
(/.f64 (neg.f64 (*.f64 (*.f64 im im) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) re))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) re))))
(pow.f64 (/.f64 re (*.f64 im im)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 re (*.f64 im im)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 im (/.f64 im re))
(*.f64 (*.f64 im im) (/.f64 #s(literal 1 binary64) re))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 im im) re))
(*.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 im im))
(*.f64 (/.f64 #s(literal 1 binary64) re) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) #s(literal -1 binary64)))
(*.f64 (/.f64 im re) im)
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)))
(pow.f64 im #s(literal 2 binary64))
(pow.f64 (*.f64 im im) #s(literal 1 binary64))
(pow.f64 (exp.f64 (log.f64 im)) #s(literal 2 binary64))
(*.f64 im im)
(*.f64 (exp.f64 (log.f64 im)) (exp.f64 (log.f64 im)))
(exp.f64 (*.f64 #s(literal 3 binary64) (log.f64 re)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 re)) #s(literal 3/2 binary64)))
(pow.f64 re #s(literal 3 binary64))
(pow.f64 (*.f64 re re) #s(literal 3/2 binary64))
(pow.f64 (pow.f64 re #s(literal 3/2 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 re)) #s(literal 3 binary64))
(*.f64 re (*.f64 re re))
(*.f64 (*.f64 re re) re)
(*.f64 (pow.f64 re #s(literal 3/2 binary64)) (pow.f64 re #s(literal 3/2 binary64)))
(exp.f64 (*.f64 #s(literal 3/2 binary64) (log.f64 (+.f64 (*.f64 re re) (*.f64 im im)))))
(exp.f64 (*.f64 (log.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im)))) #s(literal 3/4 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #s(literal 3/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (+.f64 (*.f64 (log.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #s(literal 3/4 binary64)) (*.f64 (log.f64 (+.f64 (*.f64 re re) (*.f64 im im))) #s(literal 3/4 binary64))))
(sqrt.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 (pow.f64 (hypot.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) #s(literal 3 binary64)))
(/.f64 (pow.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im)))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) #s(literal 3 binary64)))
(pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64))
(pow.f64 (hypot.f64 re im) #s(literal 3 binary64))
(pow.f64 (*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (+.f64 (*.f64 re re) (*.f64 im im))) #s(literal 3/4 binary64))
(pow.f64 (*.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/2 binary64))
(pow.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 #s(literal 3/2 binary64)) (log.f64 (+.f64 (*.f64 re re) (*.f64 im im))))
(*.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (hypot.f64 re im))
(*.f64 (hypot.f64 re im) (+.f64 (*.f64 re re) (*.f64 im im)))
(*.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/4 binary64)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/4 binary64)))
(*.f64 (pow.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) (*.f64 (*.f64 im im) (*.f64 (*.f64 im im) (*.f64 im im)))) #s(literal 3/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) #s(literal 3/2 binary64)))
(*.f64 (pow.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 im im))) #s(literal 3/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (*.f64 re re) (*.f64 im im))) #s(literal 3/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)) #s(literal 3 binary64)))

simplify430.0ms (3.3%)

Algorithm
1×egg-herbie
Rules
6206×*-lowering-*.f32
6206×*-lowering-*.f64
3380×+-lowering-+.f64
3380×+-lowering-+.f32
1432×*-commutative
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
0152612433
1541910896
0819510896
Stop Event
1×iter limit
1×node limit
Counts
408 → 408
Calls
Call 1
Inputs
(* (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))) (* re (+ (* -5/64 (* (sqrt (/ 1 (pow im 5))) (sqrt 2))) (* 1/64 (* (sqrt (/ 1 (pow im 5))) (sqrt 2))))))))) (* (sqrt im) (sqrt 2)))
(pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2)
(+ (* 1/8 (/ (* (pow im 2) (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2)) (pow re 2))) (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2))
(+ (* 1/256 (/ (* (pow im 4) (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2)) (pow re 4))) (+ (* 1/8 (/ (* (pow im 2) (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2)) (pow re 2))) (+ (* 2 (/ (* (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))) (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2))))
(+ (* 1/256 (/ (* (pow im 4) (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2)) (pow re 4))) (+ (* 1/8 (/ (* (pow im 2) (* (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))))))) (pow re 6))) (+ (* 1/8 (/ (* (pow im 2) (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2)) (pow re 2))) (+ (* 2 (/ (* (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2) (+ (* 1/24576 (pow im 6)) (+ (* 1/2880 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6))))) (* 1/1536 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (pow re 6))) (+ (* 2 (/ (* (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))) (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2))))))
(pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2)
(+ (* -1/8 (/ (* (pow im 2) (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2)) (pow re 2))) (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2))
(+ (* -1/8 (/ (* (pow im 2) (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2)) (pow re 2))) (+ (* 1/256 (/ (* (pow im 4) (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2)) (pow re 4))) (+ (* 2 (/ (* (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))) (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2))))
(+ (* -1/8 (/ (* (pow im 2) (* (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))))) (pow re 6))) (+ (* -1/8 (/ (* (pow im 2) (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2)) (pow re 2))) (+ (* 1/256 (/ (* (pow im 4) (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2)) (pow re 4))) (+ (* 2 (/ (* (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2) (+ (* -1/1536 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/24576 (pow im 6)) (* 1/2880 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6))) (+ (* 2 (/ (* (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))) (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2))))))
(* 2 (sqrt re))
(+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* 2 (sqrt re)))
(+ (* 2 (sqrt re)) (* (pow im 2) (+ (* 1/4 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -11/128 (sqrt (/ 1 (pow re 7)))) (* 1/128 (sqrt (/ 1 (pow re 7)))))))))
(+ (* 2 (sqrt re)) (* (pow im 2) (+ (* 1/4 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -11/128 (sqrt (/ 1 (pow re 7)))) (+ (* 1/128 (sqrt (/ 1 (pow re 7)))) (* (pow im 2) (+ (* -11/2048 (sqrt (/ 1 (pow re 11)))) (* 95/2048 (sqrt (/ 1 (pow re 11))))))))))))
(pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2)
(+ (* 1/2 (/ (* re (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2)) im)) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2))
(+ (* 1/16 (/ (* (pow re 2) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2)) (pow im 2))) (+ (* 1/2 (/ (* re (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2)) im)) (+ (* 2 (/ (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2))))
(+ (* 1/16 (/ (* (pow re 2) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2)) (pow im 2))) (+ (* 1/2 (/ (* re (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2)))))) (pow im 3))) (+ (* 1/2 (/ (* re (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2)) im)) (+ (* 2 (/ (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2) (+ (* 1/384 (pow re 3)) (+ (* 1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (* 1/24 (+ (* -3 (pow re 3)) (* 2 (pow re 3))))))) (pow im 3))) (+ (* 2 (/ (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2))))))
(pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2)
(+ (* -1/2 (/ (* re (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2)) im)) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2))
(+ (* -1 (/ (+ (* -1 (/ (+ (* 1/16 (* (pow re 2) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2))) (* 2 (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))))) im)) (* 1/2 (* re (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2)))) im)) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* re (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))))) (* 2 (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2) (+ (* 1/384 (pow re 3)) (+ (* 1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (* 1/24 (+ (* -3 (pow re 3)) (* 2 (pow re 3))))))))) im)) (+ (* 1/16 (* (pow re 2) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2))) (* 2 (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2)))))))) im)) (* 1/2 (* re (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2)))) im)) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/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/2 (* re (+ (* -5/64 (* (sqrt (/ 1 (pow im 5))) (sqrt 2))) (* 1/64 (* (sqrt (/ 1 (pow im 5))) (sqrt 2)))))))))))
(* 1/2 (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2))
(+ (* 1/16 (/ (* (pow im 2) (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2)) (pow re 2))) (* 1/2 (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2)))
(+ (* 1/16 (/ (* (pow im 2) (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2)) (pow re 2))) (+ (* 1/2 (/ (+ (* 1/256 (* (pow im 4) (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2))) (* 2 (* (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (pow re 4))) (* 1/2 (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2))))
(+ (* 1/16 (/ (* (pow im 2) (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2)) (pow re 2))) (+ (* 1/2 (/ (+ (* 1/256 (* (pow im 4) (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2))) (* 2 (* (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (pow re 4))) (+ (* 1/2 (/ (+ (* 1/8 (* (pow im 2) (* (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (* 2 (* (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2) (+ (* 1/24576 (pow im 6)) (+ (* 1/2880 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6))))) (* 1/1536 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))))) (pow re 6))) (* 1/2 (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2)))))
(* 1/2 (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2))
(+ (* -1/16 (/ (* (pow im 2) (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2)) (pow re 2))) (* 1/2 (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2)))
(+ (* -1/16 (/ (* (pow im 2) (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2)) (pow re 2))) (+ (* 1/2 (/ (+ (* 1/256 (* (pow im 4) (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2))) (* 2 (* (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))))) (pow re 4))) (* 1/2 (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2))))
(+ (* -1/16 (/ (* (pow im 2) (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2)) (pow re 2))) (+ (* 1/2 (/ (+ (* -1/8 (* (pow im 2) (* (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))))) (* 2 (* (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2) (+ (* -1/1536 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/24576 (pow im 6)) (* 1/2880 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))))) (pow re 6))) (+ (* 1/2 (/ (+ (* 1/256 (* (pow im 4) (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2))) (* 2 (* (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))))) (pow re 4))) (* 1/2 (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2)))))
(sqrt re)
(+ (sqrt re) (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 3))))))
(+ (sqrt re) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* 1/2 (* (pow im 2) (+ (* -11/128 (sqrt (/ 1 (pow re 7)))) (* 1/128 (sqrt (/ 1 (pow re 7))))))))))
(+ (sqrt re) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* 1/2 (* (pow im 2) (+ (* -11/2048 (sqrt (/ 1 (pow re 11)))) (* 95/2048 (sqrt (/ 1 (pow re 11))))))) (* 1/2 (+ (* -11/128 (sqrt (/ 1 (pow re 7)))) (* 1/128 (sqrt (/ 1 (pow re 7)))))))))))
(* 1/2 (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2))
(+ (* 1/4 (/ (* re (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2)) im)) (* 1/2 (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2)))
(+ (* 1/4 (/ (* re (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2)) im)) (+ (* 1/2 (/ (+ (* 1/16 (* (pow re 2) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2))) (* 2 (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))))) (pow im 2))) (* 1/2 (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2))))
(+ (* 1/4 (/ (* re (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2)) im)) (+ (* 1/2 (/ (+ (* 1/16 (* (pow re 2) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2))) (* 2 (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))))) (pow im 2))) (+ (* 1/2 (/ (+ (* 1/2 (* re (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))))) (* 2 (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2) (+ (* 1/384 (pow re 3)) (+ (* 1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (* 1/24 (+ (* -3 (pow re 3)) (* 2 (pow re 3))))))))) (pow im 3))) (* 1/2 (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2)))))
(* 1/2 (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2))
(+ (* -1/4 (/ (* re (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2)) im)) (* 1/2 (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2)))
(+ (* -1 (/ (+ (* -1/2 (/ (+ (* 1/16 (* (pow re 2) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2))) (* 2 (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))))) im)) (* 1/4 (* re (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2)))) im)) (* 1/2 (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2)))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (+ (* 1/2 (* re (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))))) (* 2 (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2) (+ (* 1/384 (pow re 3)) (+ (* 1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (* 1/24 (+ (* -3 (pow re 3)) (* 2 (pow re 3))))))))) im)) (* 1/2 (+ (* 1/16 (* (pow re 2) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2))) (* 2 (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))))))) im)) (* 1/4 (* re (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2)))) im)) (* 1/2 (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2)))
(pow (* 2 im) 1/4)
(+ (* 1/4 (* (pow (/ 2 (pow im 3)) 1/4) re)) (pow (* 2 im) 1/4))
(+ (* re (+ (* 1/32 (* (pow (/ 2 (pow im 7)) 1/4) re)) (* 1/4 (pow (/ 2 (pow im 3)) 1/4)))) (pow (* 2 im) 1/4))
(+ (* re (+ (* 1/4 (pow (/ 2 (pow im 3)) 1/4)) (* re (+ (* -5/128 (* (pow (/ 2 (pow im 11)) 1/4) re)) (* 1/32 (pow (/ 2 (pow im 7)) 1/4)))))) (pow (* 2 im) 1/4))
(exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re))))))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/24576 (pow im 6)) (+ (* 1/2880 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6))))) (* 1/1536 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (pow re 6)) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))
(exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2)))))
(+ (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))))
(+ (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))
(+ (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* -1/1536 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/24576 (pow im 6)) (* 1/2880 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))
(pow (* 4 re) 1/4)
(+ (* 1/16 (* (pow (/ 4 (pow re 7)) 1/4) (pow im 2))) (pow (* 4 re) 1/4))
(+ (* (pow im 2) (+ (* -11/512 (* (pow (/ 4 (pow re 15)) 1/4) (pow im 2))) (* 1/16 (pow (/ 4 (pow re 7)) 1/4)))) (pow (* 4 re) 1/4))
(+ (* (pow im 2) (+ (* 1/16 (pow (/ 4 (pow re 7)) 1/4)) (* (pow im 2) (+ (* -11/512 (pow (/ 4 (pow re 15)) 1/4)) (* 95/8192 (* (pow (/ 4 (pow re 23)) 1/4) (pow im 2))))))) (pow (* 4 re) 1/4))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (* 1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/384 (pow re 3)) (+ (* 1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (* 1/24 (+ (* -3 (pow re 3)) (* 2 (pow re 3))))))) (pow im 3)) (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* 1/4 (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/384 (pow re 3)) (+ (* 1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (* 1/24 (+ (* -3 (pow re 3)) (* 2 (pow re 3))))))) im)) (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* 1/4 (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(* 1/2 (* im (sqrt (/ 1 re))))
(/ (+ (* 1/2 (* im (sqrt re))) (* (/ 1 im) (sqrt (pow re 5)))) re)
(/ (+ (* 1/2 (* im (sqrt re))) (* (pow re 3) (+ (* -1 (* (/ 1 (pow im 3)) (sqrt (pow re 3)))) (* (/ 1 im) (sqrt (/ 1 re)))))) re)
(/ (+ (* 1/2 (* im (sqrt re))) (* (pow re 3) (+ (* (/ 1 im) (sqrt (/ 1 re))) (* (pow re 3) (+ (* -1 (* (/ 1 (pow im 3)) (sqrt (/ 1 (pow re 3))))) (* 2 (* (/ 1 (pow im 5)) (sqrt re)))))))) re)
(sqrt re)
(* re (+ (sqrt (/ 1 re)) (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))
(* re (+ (sqrt (/ 1 re)) (+ (* -1/128 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))))))
(* re (+ (sqrt (/ 1 re)) (+ (* -1/128 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/1024 (* (pow im 6) (sqrt (/ 1 (pow re 13))))) (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))))
(* -1/2 (* (sqrt re) (* (sqrt -4) (sqrt -1))))
(* -1 (* re (+ (* 1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt re))) (* 1/16 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt -4) 3)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt -4) 3)) (sqrt (pow re 3)))) (* 1/32 (* (/ (* (pow im 6) (sqrt -1)) (pow (sqrt -4) 5)) (sqrt (/ 1 re))))) (pow re 3))) (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1)))))))
(sqrt re)
(+ (sqrt re) (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 3))))))
(+ (sqrt re) (* (pow im 2) (+ (* -1/128 (* (pow im 2) (sqrt (/ 1 (pow re 7))))) (* 1/8 (sqrt (/ 1 (pow re 3)))))))
(+ (sqrt re) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/128 (sqrt (/ 1 (pow re 7)))) (* 1/1024 (* (pow im 2) (sqrt (/ 1 (pow re 11))))))))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* im (+ (* 1/2 (sqrt (/ 1 re))) (* (/ 1 (pow im 2)) (sqrt (pow re 3)))))
(* im (+ (* -1 (* (/ 1 (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (sqrt (/ 1 re))) (* (/ 1 (pow im 2)) (sqrt (pow re 3))))))
(* im (+ (* -1 (* (/ 1 (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (sqrt (/ 1 re))) (+ (* 2 (* (/ 1 (pow im 6)) (sqrt (pow re 11)))) (* (/ 1 (pow im 2)) (sqrt (pow re 3)))))))
(* -1/2 (* im (sqrt (/ 1 re))))
(* -1 (* im (+ (* 1/2 (sqrt (/ 1 re))) (* (/ 1 (pow im 2)) (sqrt (pow re 3))))))
(* -1 (* im (+ (* -1 (* (/ 1 (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (sqrt (/ 1 re))) (* (/ 1 (pow im 2)) (sqrt (pow re 3)))))))
(* -1 (* im (+ (* -1 (* (/ 1 (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (sqrt (/ 1 re))) (+ (* 2 (* (/ 1 (pow im 6)) (sqrt (pow re 11)))) (* (/ 1 (pow im 2)) (sqrt (pow re 3))))))))
(* im (sqrt (/ 1 re)))
(/ (+ (* 2 (* (/ 1 im) (sqrt (pow re 5)))) (* im (sqrt re))) re)
(/ (+ (* im (sqrt re)) (* (pow re 3) (+ (* -2 (* (/ 1 (pow im 3)) (sqrt (pow re 3)))) (* 2 (* (/ 1 im) (sqrt (/ 1 re))))))) re)
(/ (+ (* im (sqrt re)) (* (pow re 3) (+ (* 2 (* (/ 1 im) (sqrt (/ 1 re)))) (* (pow re 3) (+ (* -2 (* (/ 1 (pow im 3)) (sqrt (/ 1 (pow re 3))))) (* 4 (* (/ 1 (pow im 5)) (sqrt re)))))))) re)
(* 2 (sqrt re))
(* re (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 2 (sqrt (/ 1 re)))))
(* re (+ (* -1/64 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 2 (sqrt (/ 1 re))))))
(* re (+ (* -1/64 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/512 (* (pow im 6) (sqrt (/ 1 (pow re 13))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 2 (sqrt (/ 1 re)))))))
(* -1 (* (sqrt re) (* (sqrt -4) (sqrt -1))))
(* -1 (* re (+ (* 1/2 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/2 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt re))) (* 1/8 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt -4) 3)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt -4) 3)) (sqrt (pow re 3)))) (* 1/16 (* (/ (* (pow im 6) (sqrt -1)) (pow (sqrt -4) 5)) (sqrt (/ 1 re))))) (pow re 3))) (* -1/2 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1))))))
(* 2 (sqrt re))
(+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* 2 (sqrt re)))
(+ (* 2 (sqrt re)) (* (pow im 2) (+ (* -1/64 (* (pow im 2) (sqrt (/ 1 (pow re 7))))) (* 1/4 (sqrt (/ 1 (pow re 3)))))))
(+ (* 2 (sqrt re)) (* (pow im 2) (+ (* 1/4 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/64 (sqrt (/ 1 (pow re 7)))) (* 1/512 (* (pow im 2) (sqrt (/ 1 (pow re 11))))))))))
(* im (sqrt (/ 1 re)))
(* im (+ (sqrt (/ 1 re)) (* 2 (* (/ 1 (pow im 2)) (sqrt (pow re 3))))))
(* im (+ (sqrt (/ 1 re)) (+ (* -2 (* (/ 1 (pow im 4)) (sqrt (pow re 7)))) (* 2 (* (/ 1 (pow im 2)) (sqrt (pow re 3)))))))
(* im (+ (sqrt (/ 1 re)) (+ (* -2 (* (/ 1 (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ 1 (pow im 2)) (sqrt (pow re 3)))) (* 4 (* (/ 1 (pow im 6)) (sqrt (pow re 11))))))))
(* -1 (* im (sqrt (/ 1 re))))
(* -1 (* im (+ (sqrt (/ 1 re)) (* 2 (* (/ 1 (pow im 2)) (sqrt (pow re 3)))))))
(* -1 (* im (+ (sqrt (/ 1 re)) (+ (* -2 (* (/ 1 (pow im 4)) (sqrt (pow re 7)))) (* 2 (* (/ 1 (pow im 2)) (sqrt (pow re 3))))))))
(* -1 (* im (+ (sqrt (/ 1 re)) (+ (* -2 (* (/ 1 (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ 1 (pow im 2)) (sqrt (pow re 3)))) (* 4 (* (/ 1 (pow im 6)) (sqrt (pow re 11)))))))))
(/ (pow im 2) re)
(/ (+ (* 4 (pow re 2)) (pow im 2)) re)
(/ (+ (* 4 (pow re 2)) (pow im 2)) re)
(/ (+ (* 4 (pow re 2)) (pow im 2)) re)
(* 4 re)
(* re (+ 4 (/ (pow im 2) (pow re 2))))
(* re (+ 4 (/ (pow im 2) (pow re 2))))
(* re (+ 4 (/ (pow im 2) (pow re 2))))
(* 4 re)
(* -1 (* re (- (* -1 (/ (pow im 2) (pow re 2))) 4)))
(* -1 (* re (- (* -1 (/ (pow im 2) (pow re 2))) 4)))
(* -1 (* re (- (* -1 (/ (pow im 2) (pow re 2))) 4)))
(* 4 re)
(+ (* 4 re) (/ (pow im 2) re))
(+ (* 4 re) (/ (pow im 2) re))
(+ (* 4 re) (/ (pow im 2) re))
(/ (pow im 2) re)
(* (pow im 2) (+ (* 4 (/ re (pow im 2))) (/ 1 re)))
(* (pow im 2) (+ (* 4 (/ re (pow im 2))) (/ 1 re)))
(* (pow im 2) (+ (* 4 (/ re (pow im 2))) (/ 1 re)))
(/ (pow im 2) re)
(* (pow im 2) (+ (* 4 (/ re (pow im 2))) (/ 1 re)))
(* (pow im 2) (+ (* 4 (/ re (pow im 2))) (/ 1 re)))
(* (pow im 2) (+ (* 4 (/ re (pow im 2))) (/ 1 re)))
(* 4 re)
(* 4 re)
(* 4 re)
(* 4 re)
(* 4 re)
(* 4 re)
(* 4 re)
(* 4 re)
(* 4 re)
(* 4 re)
(* 4 re)
(* 4 re)
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(exp (* 1/4 (+ (log 2) (log im))))
(exp (* 1/4 (+ (log 2) (log im))))
(exp (* 1/4 (+ (log 2) (log im))))
(exp (* 1/4 (+ (log 2) (log im))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp (* 1/4 (+ (log -2) (* -1 (log (/ -1 im))))))
(exp (* 1/4 (+ (log -2) (* -1 (log (/ -1 im))))))
(exp (* 1/4 (+ (log -2) (* -1 (log (/ -1 im))))))
(exp (* 1/4 (+ (log -2) (* -1 (log (/ -1 im))))))
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(pow im 2)
(+ (* -1 (* im re)) (pow im 2))
(+ (* re (+ (* -1 im) (* 2 re))) (pow im 2))
(+ (* re (+ (* -1 im) (* re (+ 2 (* -1/2 (/ re im)))))) (pow im 2))
(pow re 2)
(* (pow re 2) (- (+ 1 (/ (pow im 2) (pow re 2))) (* 1/2 (/ (pow im 2) (pow re 2)))))
(* (pow re 2) (- (+ 1 (+ (* 1/8 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))) (* 1/2 (/ (pow im 2) (pow re 2)))))
(* (pow re 2) (- (+ 1 (+ (* -1/16 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))) (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(* 3 (pow re 2))
(* (pow re 2) (+ 3 (+ (* 1/2 (/ (pow im 2) (pow re 2))) (/ (pow im 2) (pow re 2)))))
(* (pow re 2) (+ 3 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/2 (/ (pow im 2) (pow re 2))) (/ (pow im 2) (pow re 2))))))
(* (pow re 2) (+ 3 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (+ (* 1/2 (/ (pow im 2) (pow re 2))) (/ (pow im 2) (pow re 2)))))))
(pow re 2)
(+ (* 1/2 (pow im 2)) (pow re 2))
(+ (* (pow im 2) (+ 1/2 (* 1/8 (/ (pow im 2) (pow re 2))))) (pow re 2))
(+ (* (pow im 2) (+ 1/2 (* (pow im 2) (+ (* -1/16 (/ (pow im 2) (pow re 4))) (* 1/8 (/ 1 (pow re 2))))))) (pow re 2))
(pow im 2)
(* (pow im 2) (+ 1 (* -1 (/ re im))))
(* (pow im 2) (+ 1 (+ (* -1 (/ re im)) (* 2 (/ (pow re 2) (pow im 2))))))
(* (pow im 2) (+ 1 (+ (* -1 (/ re im)) (+ (* -1/2 (/ (pow re 3) (pow im 3))) (* 2 (/ (pow re 2) (pow im 2)))))))
(pow im 2)
(* (pow im 2) (+ 1 (/ re im)))
(* (pow im 2) (+ 1 (* -1 (/ (+ (* -2 (/ (pow re 2) im)) (* -1 re)) im))))
(* (pow im 2) (+ 1 (* -1 (/ (+ (* -1 re) (* -1 (/ (+ (* 1/2 (/ (pow re 3) im)) (* 2 (pow re 2))) im))) im))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/4 (* (sqrt (/ 1 im)) (* re (* (sqrt 2) (- (* 1/2 (/ (+ (* 2 (pow im 4)) (pow im 4)) (pow im 5))) (* 5/4 (/ 1 im))))))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (* re (* (sqrt 2) (- (/ 1 (pow im 2)) (+ (* -1 (/ (- (* 1/2 (/ (+ (* 2 (pow im 4)) (pow im 4)) (pow im 5))) (/ 1 im)) im)) (+ (* 1/2 (/ (- (* 1/2 (/ (+ (* 2 (pow im 4)) (pow im 4)) (pow im 5))) (* 5/4 (/ 1 im))) im)) (* 3/2 (/ 1 (pow im 2)))))))))) (* 1/4 (* (sqrt (/ 1 im)) (* (sqrt 2) (- (* 1/2 (/ (+ (* 2 (pow im 4)) (pow im 4)) (pow im 5))) (* 5/4 (/ 1 im)))))))))))
(* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))
(* re (+ (* 1/4 (* (sqrt (/ 1 (pow re 5))) (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))
(* re (+ (* 1/4 (* (sqrt (/ 1 (pow re 5))) (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))))) (+ (* 1/4 (* (sqrt (/ 1 (pow re 9))) (- (* 1/2 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (+ (* 1/4 (pow im 4)) (* (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))) (- (pow im 2) (* 1/2 (pow im 2)))))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
(* re (+ (* -1/16 (* (sqrt (/ 1 (pow re 9))) (/ (pow (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))) 2) (pow (sqrt 2) 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow re 5))) (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))))) (+ (* 1/4 (* (sqrt (/ 1 (pow re 9))) (- (* 1/2 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (+ (* 1/4 (pow im 4)) (* (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))) (- (pow im 2) (* 1/2 (pow im 2)))))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
(* 1/2 (* (sqrt (/ (+ (* 2 (pow im 2)) (pow im 2)) re)) (* (sqrt -1) (* (sqrt 1/6) (sqrt 2)))))
(+ (* -1/4 (* (sqrt (/ 1 (* (pow re 5) (+ (* 2 (pow im 2)) (pow im 2))))) (/ (* (sqrt -1) (* (sqrt 2) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))))) (sqrt 1/6)))) (* 1/2 (* (sqrt (/ (+ (* 2 (pow im 2)) (pow im 2)) re)) (* (sqrt -1) (* (sqrt 1/6) (sqrt 2))))))
(+ (* -1 (/ (+ (* 1/4 (* (sqrt (/ 1 (* (pow re 3) (+ (* 2 (pow im 2)) (pow im 2))))) (/ (* (sqrt -1) (* (sqrt 2) (- (* 1/6 (- (pow im 6) (* 1/2 (* (+ (* 2 (pow im 2)) (pow im 2)) (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2))))))) (+ (* -1/144 (* (pow im 4) (+ (* 2 (pow im 2)) (pow im 2)))) (* 1/3 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))))))))) (sqrt 1/6)))) (* 1/4 (* (sqrt (/ re (+ (* 2 (pow im 2)) (pow im 2)))) (/ (* (sqrt -1) (* (sqrt 2) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))))) (sqrt 1/6))))) (pow re 3))) (* 1/2 (* (sqrt (/ (+ (* 2 (pow im 2)) (pow im 2)) re)) (* (sqrt -1) (* (sqrt 1/6) (sqrt 2))))))
(+ (* -1 (/ (+ (* 1/16 (* (sqrt (/ 1 (* (pow re 3) (pow (+ (* 2 (pow im 2)) (pow im 2)) 3)))) (/ (* (sqrt -1) (* (sqrt 2) (pow (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))) 2))) (pow (sqrt 1/6) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow re 3) (+ (* 2 (pow im 2)) (pow im 2))))) (/ (* (sqrt -1) (* (sqrt 2) (- (* 1/6 (- (pow im 6) (* 1/2 (* (+ (* 2 (pow im 2)) (pow im 2)) (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2))))))) (+ (* -1/144 (* (pow im 4) (+ (* 2 (pow im 2)) (pow im 2)))) (* 1/3 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))))))))) (sqrt 1/6)))) (* 1/4 (* (sqrt (/ re (+ (* 2 (pow im 2)) (pow im 2)))) (/ (* (sqrt -1) (* (sqrt 2) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))))) (sqrt 1/6)))))) (pow re 3))) (* 1/2 (* (sqrt (/ (+ (* 2 (pow im 2)) (pow im 2)) re)) (* (sqrt -1) (* (sqrt 1/6) (sqrt 2))))))
(* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))
(+ (* 1/4 (* (* (pow im 2) (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re))) (sqrt (/ 1 re)))) (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))))
(+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* 1/4 (* (sqrt (/ 1 re)) (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)))) (* 1/4 (* (* (pow im 2) (- (* 1/2 (/ (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6)))) (pow re 5))) (+ (* 1/4 (/ 1 (pow re 3))) (+ (* 1/4 (/ (pow (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) 2) (* re (pow (sqrt 2) 2)))) (* 1/2 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 2))))))) (sqrt (/ 1 re)))))))
(+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* 1/4 (* (sqrt (/ 1 re)) (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)))) (* (pow im 2) (+ (* 1/4 (* (sqrt (/ 1 re)) (- (* 1/2 (/ (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6)))) (pow re 5))) (+ (* 1/4 (/ 1 (pow re 3))) (+ (* 1/4 (/ (pow (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) 2) (* re (pow (sqrt 2) 2)))) (* 1/2 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 2)))))))) (* 1/4 (* (* (pow im 2) (- (+ (* 1/8 (/ 1 (pow re 5))) (* 1/2 (/ (- 1 (* 1/2 (/ (* (+ (* 2 (pow re 4)) (pow re 4)) (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6))))) (pow re 6)))) (pow re 5)))) (+ (* 1/8 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 4))) (+ (* 1/2 (/ (* (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (- (* 1/2 (/ (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6)))) (pow re 5))) (+ (* 1/4 (/ 1 (pow re 3))) (+ (* 1/4 (/ (pow (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) 2) (* re (pow (sqrt 2) 2)))) (* 1/2 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 2))))))) (* re (pow (sqrt 2) 2)))) (* 1/2 (/ (- (* 1/2 (/ (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6)))) (pow re 5))) (+ (* 1/4 (/ 1 (pow re 3))) (* 1/2 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 2))))) (pow re 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/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2))))))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2))))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 7))) (* (sqrt 2) (- (pow re 3) (+ (* -1 (* re (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2)))))) (+ (* -1/2 (pow re 3)) (+ (* 1/4 (* im (pow re 2))) (* 2 (pow re 3))))))))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (sqrt -1) (* (sqrt 2) (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 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/4 (* (sqrt (/ 1 im)) (* (sqrt -1) (* (sqrt 2) (- (pow re 3) (+ (* -1 (* re (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2)))))) (+ (* -1/2 (pow re 3)) (+ (* -1/4 (* im (pow re 2))) (* 2 (pow re 3)))))))))) (* 1/4 (* (sqrt im) (* (sqrt -1) (* (sqrt 2) (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2))))))))) (pow im 3))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* (sqrt im) (sqrt 2))
(+ (* 1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 im)) (* re (* (sqrt 2) (- (* 1/2 (/ (+ (* 2 (pow im 4)) (pow im 4)) (pow im 5))) (* 5/4 (/ 1 im))))))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (* re (* (sqrt 2) (- (/ 1 (pow im 2)) (+ (* -1 (/ (- (* 1/2 (/ (+ (* 2 (pow im 4)) (pow im 4)) (pow im 5))) (/ 1 im)) im)) (+ (* 1/2 (/ (- (* 1/2 (/ (+ (* 2 (pow im 4)) (pow im 4)) (pow im 5))) (* 5/4 (/ 1 im))) im)) (* 3/2 (/ 1 (pow im 2)))))))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt 2) (- (* 1/2 (/ (+ (* 2 (pow im 4)) (pow im 4)) (pow im 5))) (* 5/4 (/ 1 im)))))))))) (* (sqrt im) (sqrt 2)))
(* (sqrt re) (pow (sqrt 2) 2))
(* re (+ (* 1/2 (* (sqrt (/ 1 (pow re 5))) (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))
(* re (+ (* 1/2 (* (sqrt (/ 1 (pow re 5))) (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))))) (+ (* 1/2 (* (sqrt (/ 1 (pow re 9))) (- (* 1/2 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (+ (* 1/4 (pow im 4)) (* (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))) (- (pow im 2) (* 1/2 (pow im 2)))))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))
(* re (+ (* -1/8 (* (sqrt (/ 1 (pow re 9))) (/ (pow (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))) 2) (pow (sqrt 2) 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow re 5))) (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))))) (+ (* 1/2 (* (sqrt (/ 1 (pow re 9))) (- (* 1/2 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (+ (* 1/4 (pow im 4)) (* (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))) (- (pow im 2) (* 1/2 (pow im 2)))))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
(* (sqrt (/ (+ (* 2 (pow im 2)) (pow im 2)) re)) (* (sqrt -1) (* (sqrt 1/6) (sqrt 2))))
(+ (* -1/2 (* (sqrt (/ 1 (* (pow re 5) (+ (* 2 (pow im 2)) (pow im 2))))) (/ (* (sqrt -1) (* (sqrt 2) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))))) (sqrt 1/6)))) (* (sqrt (/ (+ (* 2 (pow im 2)) (pow im 2)) re)) (* (sqrt -1) (* (sqrt 1/6) (sqrt 2)))))
(+ (* -1 (/ (+ (* 1/2 (* (sqrt (/ 1 (* (pow re 3) (+ (* 2 (pow im 2)) (pow im 2))))) (/ (* (sqrt -1) (* (sqrt 2) (- (* 1/6 (- (pow im 6) (* 1/2 (* (+ (* 2 (pow im 2)) (pow im 2)) (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2))))))) (+ (* -1/144 (* (pow im 4) (+ (* 2 (pow im 2)) (pow im 2)))) (* 1/3 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))))))))) (sqrt 1/6)))) (* 1/2 (* (sqrt (/ re (+ (* 2 (pow im 2)) (pow im 2)))) (/ (* (sqrt -1) (* (sqrt 2) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))))) (sqrt 1/6))))) (pow re 3))) (* (sqrt (/ (+ (* 2 (pow im 2)) (pow im 2)) re)) (* (sqrt -1) (* (sqrt 1/6) (sqrt 2)))))
(+ (* -1 (/ (+ (* 1/8 (* (sqrt (/ 1 (* (pow re 3) (pow (+ (* 2 (pow im 2)) (pow im 2)) 3)))) (/ (* (sqrt -1) (* (sqrt 2) (pow (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))) 2))) (pow (sqrt 1/6) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow re 3) (+ (* 2 (pow im 2)) (pow im 2))))) (/ (* (sqrt -1) (* (sqrt 2) (- (* 1/6 (- (pow im 6) (* 1/2 (* (+ (* 2 (pow im 2)) (pow im 2)) (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2))))))) (+ (* -1/144 (* (pow im 4) (+ (* 2 (pow im 2)) (pow im 2)))) (* 1/3 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))))))))) (sqrt 1/6)))) (* 1/2 (* (sqrt (/ re (+ (* 2 (pow im 2)) (pow im 2)))) (/ (* (sqrt -1) (* (sqrt 2) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))))) (sqrt 1/6)))))) (pow re 3))) (* (sqrt (/ (+ (* 2 (pow im 2)) (pow im 2)) re)) (* (sqrt -1) (* (sqrt 1/6) (sqrt 2)))))
(* (sqrt re) (pow (sqrt 2) 2))
(+ (* 1/2 (* (* (pow im 2) (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re))) (sqrt (/ 1 re)))) (* (sqrt re) (pow (sqrt 2) 2)))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* 1/2 (* (sqrt (/ 1 re)) (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)))) (* 1/2 (* (* (pow im 2) (- (* 1/2 (/ (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6)))) (pow re 5))) (+ (* 1/4 (/ 1 (pow re 3))) (+ (* 1/4 (/ (pow (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) 2) (* re (pow (sqrt 2) 2)))) (* 1/2 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 2))))))) (sqrt (/ 1 re)))))))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* 1/2 (* (sqrt (/ 1 re)) (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)))) (* (pow im 2) (+ (* 1/2 (* (sqrt (/ 1 re)) (- (* 1/2 (/ (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6)))) (pow re 5))) (+ (* 1/4 (/ 1 (pow re 3))) (+ (* 1/4 (/ (pow (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) 2) (* re (pow (sqrt 2) 2)))) (* 1/2 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 2)))))))) (* 1/2 (* (* (pow im 2) (- (+ (* 1/8 (/ 1 (pow re 5))) (* 1/2 (/ (- 1 (* 1/2 (/ (* (+ (* 2 (pow re 4)) (pow re 4)) (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6))))) (pow re 6)))) (pow re 5)))) (+ (* 1/8 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 4))) (+ (* 1/2 (/ (* (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (- (* 1/2 (/ (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6)))) (pow re 5))) (+ (* 1/4 (/ 1 (pow re 3))) (+ (* 1/4 (/ (pow (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) 2) (* re (pow (sqrt 2) 2)))) (* 1/2 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 2))))))) (* re (pow (sqrt 2) 2)))) (* 1/2 (/ (- (* 1/2 (/ (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6)))) (pow re 5))) (+ (* 1/4 (/ 1 (pow re 3))) (* 1/2 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 2))))) (pow re 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/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2))))))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2))))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 7))) (* (sqrt 2) (- (pow re 3) (+ (* -1 (* re (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2)))))) (+ (* -1/2 (pow re 3)) (+ (* 1/4 (* im (pow re 2))) (* 2 (pow re 3))))))))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (* (sqrt -1) (* (sqrt 2) (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2)))))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1 (/ (+ (* -1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (* (sqrt 2) (- (pow re 3) (+ (* -1 (* re (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2)))))) (+ (* -1/2 (pow re 3)) (+ (* -1/4 (* im (pow re 2))) (* 2 (pow re 3)))))))))) (* 1/2 (* (sqrt im) (* (sqrt -1) (* (sqrt 2) (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 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 (* 2 (* re (- (* 1/2 (/ (+ (* 2 (pow im 4)) (pow im 4)) (pow im 5))) (/ 1 im)))))))
(+ (* 2 im) (* re (+ 2 (* re (+ (* 2 (* re (- (/ 1 (pow im 2)) (+ (* -1 (/ (- (* 1/2 (/ (+ (* 2 (pow im 4)) (pow im 4)) (pow im 5))) (/ 1 im)) im)) (* 3/2 (/ 1 (pow im 2))))))) (* 2 (- (* 1/2 (/ (+ (* 2 (pow im 4)) (pow im 4)) (pow im 5))) (/ 1 im))))))))
(* 4 re)
(* re (+ 4 (* 2 (/ (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))) (pow re 2)))))
(* re (+ 4 (+ (* 2 (/ (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))) (pow re 2))) (* 2 (/ (- (* 1/2 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (+ (* 1/4 (pow im 4)) (* (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))) (- (pow im 2) (* 1/2 (pow im 2)))))) (pow re 4))))))
(* re (+ 4 (+ (* 2 (/ (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))) (pow re 2))) (+ (* 2 (/ (- (* 1/2 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (+ (* 1/4 (pow im 4)) (* (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))) (- (pow im 2) (* 1/2 (pow im 2)))))) (pow re 4))) (* 2 (/ (- (* 1/2 (- (pow im 6) (* 1/2 (* (+ (* 2 (pow im 2)) (pow im 2)) (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2))))))) (+ (* -1/8 (pow im 6)) (+ (* 1/8 (* (pow im 4) (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))))) (* (- (* 1/2 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (+ (* 1/4 (pow im 4)) (* (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))) (- (pow im 2) (* 1/2 (pow im 2)))))) (- (pow im 2) (* 1/2 (pow im 2))))))) (pow re 6)))))))
(* -1/3 (/ (+ (* 2 (pow im 2)) (pow im 2)) re))
(* -1 (/ (+ (* 1/3 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (/ (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))) (pow re 2)))) re))
(* -1 (/ (+ (* 1/3 (+ (* 2 (pow im 2)) (pow im 2))) (+ (* 2 (/ (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))) (pow re 2))) (* 2 (/ (- (* 1/6 (- (pow im 6) (* 1/2 (* (+ (* 2 (pow im 2)) (pow im 2)) (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2))))))) (+ (* -1/144 (* (pow im 4) (+ (* 2 (pow im 2)) (pow im 2)))) (* 1/3 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))))))) (pow re 4))))) re))
(* -1 (/ (+ (* 1/3 (+ (* 2 (pow im 2)) (pow im 2))) (+ (* 2 (/ (- (* -1/6 (+ (* 1/4 (pow (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2))) 2)) (* 1/2 (* (+ (* 2 (pow im 2)) (pow im 2)) (- (pow im 6) (* 1/2 (* (+ (* 2 (pow im 2)) (pow im 2)) (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))))))))) (+ (* -1/24 (* (pow im 4) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))))) (+ (* 1/288 (* (pow im 6) (+ (* 2 (pow im 2)) (pow im 2)))) (* 1/3 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (- (* 1/6 (- (pow im 6) (* 1/2 (* (+ (* 2 (pow im 2)) (pow im 2)) (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2))))))) (+ (* -1/144 (* (pow im 4) (+ (* 2 (pow im 2)) (pow im 2)))) (* 1/3 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2)))))))))))))) (pow re 6))) (+ (* 2 (/ (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))) (pow re 2))) (* 2 (/ (- (* 1/6 (- (pow im 6) (* 1/2 (* (+ (* 2 (pow im 2)) (pow im 2)) (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2))))))) (+ (* -1/144 (* (pow im 4) (+ (* 2 (pow im 2)) (pow im 2)))) (* 1/3 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))))))) (pow re 4)))))) re))
(* 4 re)
(+ (* 2 (* (pow im 2) (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)))) (* 4 re))
(+ (* 4 re) (* (pow im 2) (+ (* 2 (* (pow im 2) (- (* 1/2 (/ (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6)))) (pow re 5))) (+ (* 1/4 (/ 1 (pow re 3))) (* 1/2 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 2))))))) (* 2 (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re))))))
(+ (* 4 re) (* (pow im 2) (+ (* 2 (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re))) (* (pow im 2) (+ (* 2 (* (pow im 2) (- (+ (* 1/8 (/ 1 (pow re 5))) (* 1/2 (/ (- 1 (* 1/2 (/ (* (+ (* 2 (pow re 4)) (pow re 4)) (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6))))) (pow re 6)))) (pow re 5)))) (+ (* 1/8 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 4))) (* 1/2 (/ (- (* 1/2 (/ (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6)))) (pow re 5))) (+ (* 1/4 (/ 1 (pow re 3))) (* 1/2 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 2))))) (pow re 2))))))) (* 2 (- (* 1/2 (/ (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6)))) (pow re 5))) (+ (* 1/4 (/ 1 (pow re 3))) (* 1/2 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 2)))))))))))
(* 2 im)
(* im (+ 2 (* 2 (/ re im))))
(* im (+ 2 (+ (* 2 (/ re im)) (* 2 (/ (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2)))) (pow im 2))))))
(* im (+ 2 (+ (* 2 (/ re im)) (+ (* 2 (/ (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2)))) (pow im 2))) (* 2 (/ (- (pow re 3) (+ (* -1 (* re (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2)))))) (+ (* -1/2 (pow re 3)) (* 2 (pow re 3))))) (pow im 3)))))))
(* -2 im)
(* -1 (* im (+ 2 (* -2 (/ re im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 (/ (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2)))) im)) (* 2 re)) im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (+ (* -2 (/ (- (pow re 3) (+ (* -1 (* re (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2)))))) (+ (* -1/2 (pow re 3)) (* 2 (pow re 3))))) im)) (* 2 (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2)))))) im)) (* 2 re)) 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))))
(/ (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)
(pow re 3)
(pow re 3)
(pow re 3)
(pow re 3)
(pow re 3)
(pow re 3)
(pow re 3)
(pow re 3)
(pow re 3)
(pow re 3)
(pow re 3)
(pow re 3)
(pow im 3)
(+ (* 1/2 (/ (* (pow re 2) (+ (* 2 (pow im 4)) (pow im 4))) (pow im 3))) (pow im 3))
(+ (* (pow re 2) (+ (* 1/2 (/ (* (pow re 2) (- (+ (* 2 (pow im 2)) (pow im 2)) (* 1/4 (/ (pow (+ (* 2 (pow im 4)) (pow im 4)) 2) (pow im 6))))) (pow im 3))) (* 1/2 (/ (+ (* 2 (pow im 4)) (pow im 4)) (pow im 3))))) (pow im 3))
(+ (* (pow re 2) (+ (* 1/2 (/ (+ (* 2 (pow im 4)) (pow im 4)) (pow im 3))) (* (pow re 2) (+ (* 1/2 (/ (* (pow re 2) (- 1 (* 1/2 (/ (* (+ (* 2 (pow im 4)) (pow im 4)) (- (+ (* 2 (pow im 2)) (pow im 2)) (* 1/4 (/ (pow (+ (* 2 (pow im 4)) (pow im 4)) 2) (pow im 6))))) (pow im 6))))) (pow im 3))) (* 1/2 (/ (- (+ (* 2 (pow im 2)) (pow im 2)) (* 1/4 (/ (pow (+ (* 2 (pow im 4)) (pow im 4)) 2) (pow im 6)))) (pow im 3))))))) (pow im 3))
(pow re 3)
(* (pow re 3) (+ 1 (* 1/2 (/ (+ (* 2 (pow im 2)) (pow im 2)) (pow re 2)))))
(* (pow re 3) (+ 1 (+ (* 1/2 (/ (+ (* 2 (pow im 2)) (pow im 2)) (pow re 2))) (* 1/2 (/ (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2))) (pow re 4))))))
(* (pow re 3) (+ 1 (+ (* 1/2 (/ (+ (* 2 (pow im 2)) (pow im 2)) (pow re 2))) (+ (* 1/2 (/ (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2))) (pow re 4))) (* 1/2 (/ (- (pow im 6) (* 1/2 (* (+ (* 2 (pow im 2)) (pow im 2)) (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))))) (pow re 6)))))))
(* -1 (pow re 3))
(* -1 (* (pow re 3) (+ 1 (* 1/2 (/ (+ (* 2 (pow im 2)) (pow im 2)) (pow re 2))))))
(* -1 (* (pow re 3) (+ 1 (+ (* 1/2 (/ (+ (* 2 (pow im 2)) (pow im 2)) (pow re 2))) (* 1/2 (/ (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2))) (pow re 4)))))))
(* -1 (* (pow re 3) (+ 1 (+ (* 1/2 (/ (+ (* 2 (pow im 2)) (pow im 2)) (pow re 2))) (+ (* 1/2 (/ (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2))) (pow re 4))) (* 1/2 (/ (- (pow im 6) (* 1/2 (* (+ (* 2 (pow im 2)) (pow im 2)) (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))))) (pow re 6))))))))
(pow re 3)
(+ (* 1/2 (/ (* (pow im 2) (+ (* 2 (pow re 4)) (pow re 4))) (pow re 3))) (pow re 3))
(+ (* (pow im 2) (+ (* 1/2 (/ (* (pow im 2) (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6))))) (pow re 3))) (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 3))))) (pow re 3))
(+ (* (pow im 2) (+ (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 3))) (* (pow im 2) (+ (* 1/2 (/ (* (pow im 2) (- 1 (* 1/2 (/ (* (+ (* 2 (pow re 4)) (pow re 4)) (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6))))) (pow re 6))))) (pow re 3))) (* 1/2 (/ (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6)))) (pow re 3))))))) (pow re 3))
(pow im 3)
(* (pow im 3) (+ 1 (* 1/2 (/ (+ (* 2 (pow re 2)) (pow re 2)) (pow im 2)))))
(* (pow im 3) (+ 1 (+ (* 1/2 (/ (+ (* 2 (pow re 2)) (pow re 2)) (pow im 2))) (* 1/2 (/ (- (+ (* 2 (pow re 4)) (pow re 4)) (* 1/4 (pow (+ (* 2 (pow re 2)) (pow re 2)) 2))) (pow im 4))))))
(* (pow im 3) (+ 1 (+ (* 1/2 (/ (+ (* 2 (pow re 2)) (pow re 2)) (pow im 2))) (+ (* 1/2 (/ (- (+ (* 2 (pow re 4)) (pow re 4)) (* 1/4 (pow (+ (* 2 (pow re 2)) (pow re 2)) 2))) (pow im 4))) (* 1/2 (/ (- (pow re 6) (* 1/2 (* (+ (* 2 (pow re 2)) (pow re 2)) (- (+ (* 2 (pow re 4)) (pow re 4)) (* 1/4 (pow (+ (* 2 (pow re 2)) (pow re 2)) 2)))))) (pow im 6)))))))
(* -1 (pow im 3))
(* -1 (* (pow im 3) (+ 1 (* 1/2 (/ (+ (* 2 (pow re 2)) (pow re 2)) (pow im 2))))))
(* -1 (* (pow im 3) (+ 1 (+ (* 1/2 (/ (+ (* 2 (pow re 2)) (pow re 2)) (pow im 2))) (* 1/2 (/ (- (+ (* 2 (pow re 4)) (pow re 4)) (* 1/4 (pow (+ (* 2 (pow re 2)) (pow re 2)) 2))) (pow im 4)))))))
(* -1 (* (pow im 3) (+ 1 (+ (* 1/2 (/ (+ (* 2 (pow re 2)) (pow re 2)) (pow im 2))) (+ (* 1/2 (/ (- (+ (* 2 (pow re 4)) (pow re 4)) (* 1/4 (pow (+ (* 2 (pow re 2)) (pow re 2)) 2))) (pow im 4))) (* 1/2 (/ (- (pow re 6) (* 1/2 (* (+ (* 2 (pow re 2)) (pow re 2)) (- (+ (* 2 (pow re 4)) (pow re 4)) (* 1/4 (pow (+ (* 2 (pow re 2)) (pow re 2)) 2)))))) (pow im 6))))))))
Outputs
(* (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/8 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)))))))
(+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))) (* re (+ (* -5/64 (* (sqrt (/ 1 (pow im 5))) (sqrt 2))) (* 1/64 (* (sqrt (/ 1 (pow im 5))) (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 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))))) (*.f64 re (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) #s(literal -1/16 binary64))))))))
(pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2)
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re))))
(+ (* 1/8 (/ (* (pow im 2) (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2)) (pow re 2))) (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2))
(+.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (*.f64 im im))) (*.f64 re re)))
(+ (* 1/256 (/ (* (pow im 4) (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2)) (pow re 4))) (+ (* 1/8 (/ (* (pow im 2) (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2)) (pow re 2))) (+ (* 2 (/ (* (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))) (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2))))
(+.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/256 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re))))) (pow.f64 re #s(literal 4 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (*.f64 im im))) (*.f64 re re)) (+.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re))))) (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64))))) (pow.f64 re #s(literal 4 binary64))))))
(+ (* 1/256 (/ (* (pow im 4) (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2)) (pow re 4))) (+ (* 1/8 (/ (* (pow im 2) (* (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))))))) (pow re 6))) (+ (* 1/8 (/ (* (pow im 2) (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2)) (pow re 2))) (+ (* 2 (/ (* (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2) (+ (* 1/24576 (pow im 6)) (+ (* 1/2880 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6))))) (* 1/1536 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (pow re 6))) (+ (* 2 (/ (* (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))) (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2))))))
(+.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/256 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re))))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64)))))) (pow.f64 re #s(literal 6 binary64)))) (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (*.f64 im im))) (*.f64 re re)) (+.f64 (+.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re))))) (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64))))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re))))) (+.f64 (*.f64 #s(literal 1/24576 binary64) (pow.f64 im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/2880 binary64) (+.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 15/4 binary64)) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 135/4 binary64)))) (*.f64 (*.f64 #s(literal 1/1536 binary64) (*.f64 im im)) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64)))))) (pow.f64 re #s(literal 6 binary64))))))
(pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2)
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im)))))
(+ (* -1/8 (/ (* (pow im 2) (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2)) (pow re 2))) (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2))
(+.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 im im) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))))) (*.f64 re re)))
(+ (* -1/8 (/ (* (pow im 2) (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2)) (pow re 2))) (+ (* 1/256 (/ (* (pow im 4) (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2)) (pow re 4))) (+ (* 2 (/ (* (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))) (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2))))
(+.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 im im) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))))) (*.f64 re re)) (/.f64 (*.f64 (*.f64 #s(literal 1/256 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im)))))) (pow.f64 re #s(literal 4 binary64)))) (+.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (/.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64)))) (pow.f64 re #s(literal 4 binary64)))))))
(+ (* -1/8 (/ (* (pow im 2) (* (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))))) (pow re 6))) (+ (* -1/8 (/ (* (pow im 2) (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2)) (pow re 2))) (+ (* 1/256 (/ (* (pow im 4) (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2)) (pow re 4))) (+ (* 2 (/ (* (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2) (+ (* -1/1536 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/24576 (pow im 6)) (* 1/2880 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6))) (+ (* 2 (/ (* (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))) (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2))))))
(+.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64)))))) (pow.f64 re #s(literal 6 binary64))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (*.f64 im im) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))))) (*.f64 re re))) (+.f64 (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/256 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im)))))) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (/.f64 (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/1536 binary64) (*.f64 im im)) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64))) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal -1/24576 binary64))) (*.f64 #s(literal 1/2880 binary64) (+.f64 (*.f64 #s(literal -720 binary64) (*.f64 (/.f64 (pow.f64 im #s(literal 8 binary64)) im) (/.f64 #s(literal 5/64 binary64) im))) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 75/4 binary64))))) (pow.f64 re #s(literal 6 binary64)))))) (+.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (/.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64)))) (pow.f64 re #s(literal 4 binary64))))))))
(* 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) (+ (* 1/4 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -11/128 (sqrt (/ 1 (pow re 7)))) (* 1/128 (sqrt (/ 1 (pow re 7)))))))))
(+.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) #s(literal -5/64 binary64))))))
(+ (* 2 (sqrt re)) (* (pow im 2) (+ (* 1/4 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -11/128 (sqrt (/ 1 (pow re 7)))) (+ (* 1/128 (sqrt (/ 1 (pow re 7)))) (* (pow im 2) (+ (* -11/2048 (sqrt (/ 1 (pow re 11)))) (* 95/2048 (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 im im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 11 binary64)))) #s(literal 21/512 binary64))))))))
(pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2)
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))
(+ (* 1/2 (/ (* re (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2)) im)) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2))
(+.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))) im))
(+ (* 1/16 (/ (* (pow re 2) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2)) (pow im 2))) (+ (* 1/2 (/ (* re (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2)) im)) (+ (* 2 (/ (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2))))
(+.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 re re)) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))) (*.f64 im im)) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))) im) (+.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 1/32 binary64)) #s(literal 0 binary64)))) (*.f64 im im)))))
(+ (* 1/16 (/ (* (pow re 2) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2)) (pow im 2))) (+ (* 1/2 (/ (* re (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2)))))) (pow im 3))) (+ (* 1/2 (/ (* re (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2)) im)) (+ (* 2 (/ (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2) (+ (* 1/384 (pow re 3)) (+ (* 1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (* 1/24 (+ (* -3 (pow re 3)) (* 2 (pow re 3))))))) (pow im 3))) (+ (* 2 (/ (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2))))))
(+.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 re re)) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))) (*.f64 im im)) (+.f64 (/.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) re) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 1/32 binary64)) #s(literal 0 binary64)))) (*.f64 im (*.f64 im im))) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))) im) (+.f64 (+.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 1/32 binary64)) #s(literal 0 binary64)))) (*.f64 im im))) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/384 binary64)) (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 re #s(literal 0 binary64))) (neg.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/24 binary64))))))) (*.f64 im (*.f64 im im)))))))
(pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2)
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))
(+ (* -1/2 (/ (* re (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2)) im)) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2))
(+.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 re (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))))) im))
(+ (* -1 (/ (+ (* -1 (/ (+ (* 1/16 (* (pow re 2) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2))) (* 2 (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))))) im)) (* 1/2 (* re (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2)))) im)) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2))
(-.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) re) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 re re)) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/32 binary64)) #s(literal 0 binary64)) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))))) im)) im))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (* re (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))))) (* 2 (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2) (+ (* 1/384 (pow re 3)) (+ (* 1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (* 1/24 (+ (* -3 (pow re 3)) (* 2 (pow re 3))))))))) im)) (+ (* 1/16 (* (pow re 2) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2))) (* 2 (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2)))))))) im)) (* 1/2 (* re (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2)))) im)) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2))
(-.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) re) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (-.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 re re)) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/32 binary64)) #s(literal 0 binary64)) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) re) (*.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/32 binary64)) #s(literal 0 binary64)) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/384 binary64)) (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 re #s(literal 0 binary64))) (neg.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/24 binary64))))) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))))) im)) 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/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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.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 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) #s(literal 1/16 binary64)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) #s(literal 1/4 binary64)))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))) (* 1/2 (* re (+ (* -5/64 (* (sqrt (/ 1 (pow im 5))) (sqrt 2))) (* 1/64 (* (sqrt (/ 1 (pow im 5))) (sqrt 2)))))))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) #s(literal 1/4 binary64)) (*.f64 re (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) #s(literal 1/16 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) re) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) #s(literal -1/16 binary64))))))))
(* 1/2 (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))))
(+ (* 1/16 (/ (* (pow im 2) (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2)) (pow re 2))) (* 1/2 (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re))))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (*.f64 im im))) (*.f64 re re)))
(+ (* 1/16 (/ (* (pow im 2) (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2)) (pow re 2))) (+ (* 1/2 (/ (+ (* 1/256 (* (pow im 4) (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2))) (* 2 (* (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (pow re 4))) (* 1/2 (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2))))
(+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 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 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/256 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re))))) (*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re))))) (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64)))))) (pow.f64 re #s(literal 4 binary64))) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))))))
(+ (* 1/16 (/ (* (pow im 2) (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2)) (pow re 2))) (+ (* 1/2 (/ (+ (* 1/256 (* (pow im 4) (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2))) (* 2 (* (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (pow re 4))) (+ (* 1/2 (/ (+ (* 1/8 (* (pow im 2) (* (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (* 2 (* (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2) (+ (* 1/24576 (pow im 6)) (+ (* 1/2880 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6))))) (* 1/1536 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))))) (pow re 6))) (* 1/2 (pow (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) 2)))))
(+.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (*.f64 im im))) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal 1/256 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re))))) (*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re))))) (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64))))))) (pow.f64 re #s(literal 4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64)))))) (*.f64 (*.f64 #s(literal 2 binary64) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re))))) (+.f64 (*.f64 #s(literal 1/24576 binary64) (pow.f64 im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/2880 binary64) (+.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 15/4 binary64)) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 135/4 binary64)))) (*.f64 (*.f64 #s(literal 1/1536 binary64) (*.f64 im im)) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64))))))) (pow.f64 re #s(literal 6 binary64))) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))))))
(* 1/2 (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))))
(+ (* -1/16 (/ (* (pow im 2) (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2)) (pow re 2))) (* 1/2 (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im)))))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))))) (*.f64 re re)))
(+ (* -1/16 (/ (* (pow im 2) (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2)) (pow re 2))) (+ (* 1/2 (/ (+ (* 1/256 (* (pow im 4) (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2))) (* 2 (* (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))))) (pow re 4))) (* 1/2 (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2))))
(+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 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 (+.f64 (*.f64 (*.f64 #s(literal 1/256 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im)))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64))))))) (pow.f64 re #s(literal 4 binary64))) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))))))
(+ (* -1/16 (/ (* (pow im 2) (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2)) (pow re 2))) (+ (* 1/2 (/ (+ (* -1/8 (* (pow im 2) (* (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))))) (* 2 (* (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2) (+ (* -1/1536 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/24576 (pow im 6)) (* 1/2880 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))))) (pow re 6))) (+ (* 1/2 (/ (+ (* 1/256 (* (pow im 4) (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2))) (* 2 (* (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))))) (pow re 4))) (* 1/2 (pow (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) 2)))))
(+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))))) (*.f64 re re)) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/256 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im)))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64))))))) (pow.f64 re #s(literal 4 binary64))) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64)))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/1536 binary64) (*.f64 im im)) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64))) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal -1/24576 binary64))) (*.f64 #s(literal 1/2880 binary64) (+.f64 (*.f64 #s(literal -720 binary64) (*.f64 (/.f64 (pow.f64 im #s(literal 8 binary64)) im) (/.f64 #s(literal 5/64 binary64) im))) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 75/4 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 #s(literal 1/8 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))))
(+ (sqrt re) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* 1/2 (* (pow im 2) (+ (* -11/128 (sqrt (/ 1 (pow re 7)))) (* 1/128 (sqrt (/ 1 (pow re 7))))))))))
(+.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 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) #s(literal -5/64 binary64))))))
(+ (sqrt re) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* 1/2 (* (pow im 2) (+ (* -11/2048 (sqrt (/ 1 (pow re 11)))) (* 95/2048 (sqrt (/ 1 (pow re 11))))))) (* 1/2 (+ (* -11/128 (sqrt (/ 1 (pow re 7)))) (* 1/128 (sqrt (/ 1 (pow re 7)))))))))))
(+.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 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 11 binary64)))) #s(literal 21/512 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) #s(literal -5/64 binary64))))))))
(* 1/2 (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))
(+ (* 1/4 (/ (* re (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2)) im)) (* 1/2 (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 re (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))) im))
(+ (* 1/4 (/ (* re (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2)) im)) (+ (* 1/2 (/ (+ (* 1/16 (* (pow re 2) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2))) (* 2 (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))))) (pow im 2))) (* 1/2 (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2))))
(+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 re (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))) im) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 re re)) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 1/32 binary64)) #s(literal 0 binary64))))) (*.f64 im im)) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))))
(+ (* 1/4 (/ (* re (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2)) im)) (+ (* 1/2 (/ (+ (* 1/16 (* (pow re 2) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2))) (* 2 (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))))) (pow im 2))) (+ (* 1/2 (/ (+ (* 1/2 (* re (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))))) (* 2 (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2) (+ (* 1/384 (pow re 3)) (+ (* 1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (* 1/24 (+ (* -3 (pow re 3)) (* 2 (pow re 3))))))))) (pow im 3))) (* 1/2 (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) 2)))))
(+.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 re (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))) im) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 re re)) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 1/32 binary64)) #s(literal 0 binary64)))))) (*.f64 im im))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) re) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 1/32 binary64)) #s(literal 0 binary64)))) (*.f64 #s(literal 2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/384 binary64)) (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 re #s(literal 0 binary64))) (neg.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/24 binary64)))))))) (*.f64 im (*.f64 im im))) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))))
(* 1/2 (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))))
(+ (* -1/4 (/ (* re (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2)) im)) (* 1/2 (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2)))
(+.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))))) im))
(+ (* -1 (/ (+ (* -1/2 (/ (+ (* 1/16 (* (pow re 2) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2))) (* 2 (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))))) im)) (* 1/4 (* re (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2)))) im)) (* 1/2 (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2)))
(-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 re re)) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/32 binary64)) #s(literal 0 binary64)) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))))))) im) (*.f64 (*.f64 #s(literal 1/4 binary64) re) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))))) im))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (+ (* 1/2 (* re (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))))) (* 2 (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2) (+ (* 1/384 (pow re 3)) (+ (* 1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (* 1/24 (+ (* -3 (pow re 3)) (* 2 (pow re 3))))))))) im)) (* 1/2 (+ (* 1/16 (* (pow re 2) (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2))) (* 2 (* (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))))))) im)) (* 1/4 (* re (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2)))) im)) (* 1/2 (pow (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) 2)))
(-.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) re) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) re) (*.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/32 binary64)) #s(literal 0 binary64)) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/384 binary64)) (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 re #s(literal 0 binary64))) (neg.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/24 binary64))))) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))))))) im) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 re re)) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (*.f64 #s(literal 2 binary64) (*.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/32 binary64)) #s(literal 0 binary64)) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))))))) im)) im))
(pow (* 2 im) 1/4)
(pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64))
(+ (* 1/4 (* (pow (/ 2 (pow im 3)) 1/4) re)) (pow (* 2 im) 1/4))
(+.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/4 binary64) (*.f64 re (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 im (*.f64 im im))) #s(literal 1/4 binary64)))))
(+ (* re (+ (* 1/32 (* (pow (/ 2 (pow im 7)) 1/4) re)) (* 1/4 (pow (/ 2 (pow im 3)) 1/4)))) (pow (* 2 im) 1/4))
(+.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) (*.f64 re (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 re (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 7 binary64))) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 im (*.f64 im im))) #s(literal 1/4 binary64))))))
(+ (* re (+ (* 1/4 (pow (/ 2 (pow im 3)) 1/4)) (* re (+ (* -5/128 (* (pow (/ 2 (pow im 11)) 1/4) re)) (* 1/32 (pow (/ 2 (pow im 7)) 1/4)))))) (pow (* 2 im) 1/4))
(+.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) (*.f64 re (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (*.f64 im (*.f64 im im))) #s(literal 1/4 binary64))) (*.f64 re (+.f64 (*.f64 #s(literal -5/128 binary64) (*.f64 re (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 11 binary64))) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/32 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 7 binary64))) #s(literal 1/4 binary64))))))))
(exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re))))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (*.f64 im im))) (*.f64 re re)))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (*.f64 im im))) (*.f64 re re)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64))))) (pow.f64 re #s(literal 4 binary64)))))
(+ (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/24576 (pow im 6)) (+ (* 1/2880 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6))))) (* 1/1536 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))))) (pow re 6)) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ 1 re)))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (+.f64 (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (*.f64 im im))) (*.f64 re re)) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 4 binary64)) (log.f64 re)))) (+.f64 (*.f64 #s(literal 1/24576 binary64) (pow.f64 im #s(literal 6 binary64))) (+.f64 (*.f64 #s(literal 1/2880 binary64) (+.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 15/4 binary64)) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 135/4 binary64)))) (*.f64 (*.f64 #s(literal 1/1536 binary64) (*.f64 im im)) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64)))))) (pow.f64 re #s(literal 6 binary64))))))
(exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2)))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im)))))
(+ (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))))) (*.f64 re re)))
(+ (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 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/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (/.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64)))) (pow.f64 re #s(literal 4 binary64))))))
(+ (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* -1/1536 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/24576 (pow im 6)) (* 1/2880 (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (log (pow im 2))))) (+ (* 1/512 (pow im 4)) (* 1/96 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))
(+.f64 (+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))))) (*.f64 re re))) (+.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (/.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/512 binary64)) (*.f64 #s(literal 1/96 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64)))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/1536 binary64) (*.f64 im im)) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64))) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal -1/24576 binary64))) (*.f64 #s(literal 1/2880 binary64) (+.f64 (*.f64 #s(literal -720 binary64) (*.f64 (/.f64 (pow.f64 im #s(literal 8 binary64)) im) (/.f64 #s(literal 5/64 binary64) im))) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 75/4 binary64)))))) (pow.f64 re #s(literal 6 binary64)))))
(pow (* 4 re) 1/4)
(pow.f64 (*.f64 re #s(literal 4 binary64)) #s(literal 1/4 binary64))
(+ (* 1/16 (* (pow (/ 4 (pow re 7)) 1/4) (pow im 2))) (pow (* 4 re) 1/4))
(+.f64 (pow.f64 (*.f64 re #s(literal 4 binary64)) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/16 binary64) (*.f64 (*.f64 im im) (pow.f64 (/.f64 #s(literal 4 binary64) (pow.f64 re #s(literal 7 binary64))) #s(literal 1/4 binary64)))))
(+ (* (pow im 2) (+ (* -11/512 (* (pow (/ 4 (pow re 15)) 1/4) (pow im 2))) (* 1/16 (pow (/ 4 (pow re 7)) 1/4)))) (pow (* 4 re) 1/4))
(+.f64 (pow.f64 (*.f64 re #s(literal 4 binary64)) #s(literal 1/4 binary64)) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -11/512 binary64) (*.f64 (*.f64 im im) (pow.f64 (/.f64 #s(literal 4 binary64) (pow.f64 re #s(literal 15 binary64))) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/16 binary64) (pow.f64 (/.f64 #s(literal 4 binary64) (pow.f64 re #s(literal 7 binary64))) #s(literal 1/4 binary64))))))
(+ (* (pow im 2) (+ (* 1/16 (pow (/ 4 (pow re 7)) 1/4)) (* (pow im 2) (+ (* -11/512 (pow (/ 4 (pow re 15)) 1/4)) (* 95/8192 (* (pow (/ 4 (pow re 23)) 1/4) (pow im 2))))))) (pow (* 4 re) 1/4))
(+.f64 (pow.f64 (*.f64 re #s(literal 4 binary64)) #s(literal 1/4 binary64)) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 (/.f64 #s(literal 4 binary64) (pow.f64 re #s(literal 7 binary64))) #s(literal 1/4 binary64))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -11/512 binary64) (pow.f64 (/.f64 #s(literal 4 binary64) (pow.f64 re #s(literal 15 binary64))) #s(literal 1/4 binary64))) (*.f64 #s(literal 95/8192 binary64) (*.f64 (*.f64 im im) (pow.f64 (/.f64 #s(literal 4 binary64) (pow.f64 re #s(literal 23 binary64))) #s(literal 1/4 binary64)))))))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (* 1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))) im))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))) im) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 1/32 binary64)) #s(literal 0 binary64))) (*.f64 im im))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/384 (pow re 3)) (+ (* 1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (* 1/24 (+ (* -3 (pow re 3)) (* 2 (pow re 3))))))) (pow im 3)) (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))) im) (+.f64 (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 1/32 binary64)) #s(literal 0 binary64))) (*.f64 im im)) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/384 binary64)) (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 re #s(literal 0 binary64))) (neg.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/24 binary64)))))) (*.f64 im (*.f64 im im))))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1/4 (/ (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))
(+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 re (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))))) im))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* 1/4 (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(-.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) re) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/32 binary64)) #s(literal 0 binary64)) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) im)) im))
(+ (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/384 (pow re 3)) (+ (* 1/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (* 1/24 (+ (* -3 (pow re 3)) (* 2 (pow re 3))))))) im)) (* (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/32 (pow re 2)) (* 1/8 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* 1/4 (* re (exp (* 1/4 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(-.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (-.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) re) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/32 binary64)) #s(literal 0 binary64)) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (*.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/384 binary64)) (+.f64 (*.f64 #s(literal 1/32 binary64) (*.f64 re #s(literal 0 binary64))) (neg.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 1/24 binary64))))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) im)) im)) im))
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(sqrt.f64 re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(sqrt.f64 re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(sqrt.f64 re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(sqrt.f64 re)
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(/ (+ (* 1/2 (* im (sqrt re))) (* (/ 1 im) (sqrt (pow re 5)))) re)
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 re))) (/.f64 (sqrt.f64 (pow.f64 re #s(literal 5 binary64))) im)) re)
(/ (+ (* 1/2 (* im (sqrt re))) (* (pow re 3) (+ (* -1 (* (/ 1 (pow im 3)) (sqrt (pow re 3)))) (* (/ 1 im) (sqrt (/ 1 re)))))) re)
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 re))) (*.f64 (*.f64 re (*.f64 re re)) (-.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (/.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im im)))))) re)
(/ (+ (* 1/2 (* im (sqrt re))) (* (pow re 3) (+ (* (/ 1 im) (sqrt (/ 1 re))) (* (pow re 3) (+ (* -1 (* (/ 1 (pow im 3)) (sqrt (/ 1 (pow re 3))))) (* 2 (* (/ 1 (pow im 5)) (sqrt re)))))))) re)
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 re))) (*.f64 (*.f64 re (*.f64 re re)) (+.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im) (*.f64 (*.f64 re (*.f64 re re)) (-.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 re) (pow.f64 im #s(literal 5 binary64)))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 im (*.f64 im im)))))))) re)
(sqrt re)
(sqrt.f64 re)
(* re (+ (sqrt (/ 1 re)) (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))
(*.f64 re (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* re (+ (sqrt (/ 1 re)) (+ (* -1/128 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))))))
(*.f64 re (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) 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 (*.f64 #s(literal -1/128 binary64) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))))))
(* re (+ (sqrt (/ 1 re)) (+ (* -1/128 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/1024 (* (pow im 6) (sqrt (/ 1 (pow re 13))))) (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))))
(*.f64 re (+.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 #s(literal -1/128 binary64) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))) (+.f64 (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (*.f64 (*.f64 #s(literal 1/1024 binary64) (pow.f64 im #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 13 binary64))))))))
(* -1/2 (* (sqrt re) (* (sqrt -4) (sqrt -1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -4 binary64))))
(* -1 (* re (+ (* 1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1)))))))
(*.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 (*.f64 im im) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -4 binary64))))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -4 binary64)))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt re))) (* 1/16 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt -4) 3)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1)))))))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -4 binary64))))) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))) (*.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -4 binary64) (sqrt.f64 #s(literal -4 binary64))))))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt -4) 3)) (sqrt (pow re 3)))) (* 1/32 (* (/ (* (pow im 6) (sqrt -1)) (pow (sqrt -4) 5)) (sqrt (/ 1 re))))) (pow re 3))) (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1)))))))
(*.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -4 binary64))))) (/.f64 (-.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))) (/.f64 (+.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -4 binary64) (sqrt.f64 #s(literal -4 binary64)))))) (*.f64 #s(literal 1/32 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 5 binary64)))))) (*.f64 re (*.f64 re re)))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(sqrt re)
(sqrt.f64 re)
(+ (sqrt re) (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 3))))))
(+.f64 (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))))))
(+ (sqrt re) (* (pow im 2) (+ (* -1/128 (* (pow im 2) (sqrt (/ 1 (pow re 7))))) (* 1/8 (sqrt (/ 1 (pow re 3)))))))
(+.f64 (sqrt.f64 re) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 #s(literal -1/128 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64))))))))
(+ (sqrt re) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/128 (sqrt (/ 1 (pow re 7)))) (* 1/1024 (* (pow im 2) (sqrt (/ 1 (pow re 11))))))))))
(+.f64 (sqrt.f64 re) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal 1/8 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 -1/128 binary64)) (*.f64 (*.f64 #s(literal 1/1024 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 11 binary64))))))))))
(* 1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (+ (* 1/2 (sqrt (/ 1 re))) (* (/ 1 (pow im 2)) (sqrt (pow re 3)))))
(*.f64 im (+.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (/.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 im im))))
(* im (+ (* -1 (* (/ 1 (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (sqrt (/ 1 re))) (* (/ 1 (pow im 2)) (sqrt (pow re 3))))))
(*.f64 im (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (/.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 im im))) (/.f64 (sqrt.f64 (pow.f64 re #s(literal 7 binary64))) (pow.f64 im #s(literal 4 binary64)))))
(* im (+ (* -1 (* (/ 1 (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (sqrt (/ 1 re))) (+ (* 2 (* (/ 1 (pow im 6)) (sqrt (pow re 11)))) (* (/ 1 (pow im 2)) (sqrt (pow re 3)))))))
(*.f64 im (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (+.f64 (/.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 im im)) (*.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (pow.f64 re #s(literal 11 binary64))) (pow.f64 im #s(literal 6 binary64)))))) (/.f64 (sqrt.f64 (pow.f64 re #s(literal 7 binary64))) (pow.f64 im #s(literal 4 binary64)))))
(* -1/2 (* im (sqrt (/ 1 re))))
(*.f64 (*.f64 #s(literal -1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* -1 (* im (+ (* 1/2 (sqrt (/ 1 re))) (* (/ 1 (pow im 2)) (sqrt (pow re 3))))))
(*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (/.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 im im))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (* (/ 1 (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (sqrt (/ 1 re))) (* (/ 1 (pow im 2)) (sqrt (pow re 3)))))))
(*.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (/.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 im im))) (/.f64 (sqrt.f64 (pow.f64 re #s(literal 7 binary64))) (pow.f64 im #s(literal 4 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (* (/ 1 (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (sqrt (/ 1 re))) (+ (* 2 (* (/ 1 (pow im 6)) (sqrt (pow re 11)))) (* (/ 1 (pow im 2)) (sqrt (pow re 3))))))))
(*.f64 im (neg.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (+.f64 (/.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 im im)) (*.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (pow.f64 re #s(literal 11 binary64))) (pow.f64 im #s(literal 6 binary64)))))) (/.f64 (sqrt.f64 (pow.f64 re #s(literal 7 binary64))) (pow.f64 im #s(literal 4 binary64))))))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(/ (+ (* 2 (* (/ 1 im) (sqrt (pow re 5)))) (* im (sqrt re))) re)
(/.f64 (+.f64 (*.f64 im (sqrt.f64 re)) (*.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (pow.f64 re #s(literal 5 binary64))) im))) re)
(/ (+ (* im (sqrt re)) (* (pow re 3) (+ (* -2 (* (/ 1 (pow im 3)) (sqrt (pow re 3)))) (* 2 (* (/ 1 im) (sqrt (/ 1 re))))))) re)
(/.f64 (+.f64 (*.f64 im (sqrt.f64 re)) (*.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 (/.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im im))) #s(literal -2 binary64)) (*.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im))))) re)
(/ (+ (* im (sqrt re)) (* (pow re 3) (+ (* 2 (* (/ 1 im) (sqrt (/ 1 re)))) (* (pow re 3) (+ (* -2 (* (/ 1 (pow im 3)) (sqrt (/ 1 (pow re 3))))) (* 4 (* (/ 1 (pow im 5)) (sqrt re)))))))) re)
(/.f64 (+.f64 (*.f64 im (sqrt.f64 re)) (*.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im)) (*.f64 (*.f64 re (*.f64 re re)) (+.f64 (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 im (*.f64 im im))) #s(literal -2 binary64)) (*.f64 #s(literal 4 binary64) (/.f64 (sqrt.f64 re) (pow.f64 im #s(literal 5 binary64))))))))) re)
(* 2 (sqrt re))
(*.f64 #s(literal 2 binary64) (sqrt.f64 re))
(* re (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 2 (sqrt (/ 1 re)))))
(*.f64 re (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 im im) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* re (+ (* -1/64 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 2 (sqrt (/ 1 re))))))
(*.f64 re (+.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 im im) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.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)))))))
(* re (+ (* -1/64 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/512 (* (pow im 6) (sqrt (/ 1 (pow re 13))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 2 (sqrt (/ 1 re)))))))
(*.f64 re (+.f64 (*.f64 (*.f64 #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))))) (+.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 im im) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.f64 (*.f64 #s(literal 1/512 binary64) (pow.f64 im #s(literal 6 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 13 binary64))))))))
(* -1 (* (sqrt re) (* (sqrt -4) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -4 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(* -1 (* re (+ (* 1/2 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1))))))
(*.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -4 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 (*.f64 im im) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -4 binary64)))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/2 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt re))) (* 1/8 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt -4) 3)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -4 binary64)))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))) (*.f64 #s(literal 1/8 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -4 binary64) (sqrt.f64 #s(literal -4 binary64))))))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/8 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt -4) 3)) (sqrt (pow re 3)))) (* 1/16 (* (/ (* (pow im 6) (sqrt -1)) (pow (sqrt -4) 5)) (sqrt (/ 1 re))))) (pow re 3))) (* -1/2 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1))))))
(*.f64 (-.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -4 binary64)))) (/.f64 (-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -4 binary64) (sqrt.f64 #s(literal -4 binary64))))) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (/.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 5 binary64)))))) (*.f64 re (*.f64 re re)))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) 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) (+ (* -1/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 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 #s(literal -1/64 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64))))))))
(+ (* 2 (sqrt re)) (* (pow im 2) (+ (* 1/4 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/64 (sqrt (/ 1 (pow re 7)))) (* 1/512 (* (pow im 2) (sqrt (/ 1 (pow re 11))))))))))
(+.f64 (*.f64 #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 -1/64 binary64)) (*.f64 (*.f64 #s(literal 1/512 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 11 binary64))))))))))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (+ (sqrt (/ 1 re)) (* 2 (* (/ 1 (pow im 2)) (sqrt (pow re 3))))))
(*.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 im im)))))
(* im (+ (sqrt (/ 1 re)) (+ (* -2 (* (/ 1 (pow im 4)) (sqrt (pow re 7)))) (* 2 (* (/ 1 (pow im 2)) (sqrt (pow re 3)))))))
(*.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 im im))) (*.f64 (/.f64 (sqrt.f64 (pow.f64 re #s(literal 7 binary64))) (pow.f64 im #s(literal 4 binary64))) #s(literal -2 binary64)))))
(* im (+ (sqrt (/ 1 re)) (+ (* -2 (* (/ 1 (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ 1 (pow im 2)) (sqrt (pow re 3)))) (* 4 (* (/ 1 (pow im 6)) (sqrt (pow re 11))))))))
(*.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (+.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 im im))) (*.f64 (/.f64 (sqrt.f64 (pow.f64 re #s(literal 7 binary64))) (pow.f64 im #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (sqrt.f64 (pow.f64 re #s(literal 11 binary64))) (pow.f64 im #s(literal 6 binary64)))))))
(* -1 (* im (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (sqrt (/ 1 re)) (* 2 (* (/ 1 (pow im 2)) (sqrt (pow re 3)))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (sqrt (/ 1 re)) (+ (* -2 (* (/ 1 (pow im 4)) (sqrt (pow re 7)))) (* 2 (* (/ 1 (pow im 2)) (sqrt (pow re 3))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 im im))) (*.f64 (/.f64 (sqrt.f64 (pow.f64 re #s(literal 7 binary64))) (pow.f64 im #s(literal 4 binary64))) #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (sqrt (/ 1 re)) (+ (* -2 (* (/ 1 (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ 1 (pow im 2)) (sqrt (pow re 3)))) (* 4 (* (/ 1 (pow im 6)) (sqrt (pow re 11)))))))))
(*.f64 (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (+.f64 (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (*.f64 re (*.f64 re re))) (*.f64 im im))) (*.f64 (/.f64 (sqrt.f64 (pow.f64 re #s(literal 7 binary64))) (pow.f64 im #s(literal 4 binary64))) #s(literal -2 binary64))) (*.f64 #s(literal 4 binary64) (/.f64 (sqrt.f64 (pow.f64 re #s(literal 11 binary64))) (pow.f64 im #s(literal 6 binary64)))))) (-.f64 #s(literal 0 binary64) im))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (+ (* 4 (pow re 2)) (pow im 2)) re)
(/.f64 (+.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 re re))) re)
(/ (+ (* 4 (pow re 2)) (pow im 2)) re)
(/.f64 (+.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 re re))) re)
(/ (+ (* 4 (pow re 2)) (pow im 2)) re)
(/.f64 (+.f64 (*.f64 im im) (*.f64 #s(literal 4 binary64) (*.f64 re re))) re)
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(* re (+ 4 (/ (pow im 2) (pow re 2))))
(*.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))
(* re (+ 4 (/ (pow im 2) (pow re 2))))
(*.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))
(* re (+ 4 (/ (pow im 2) (pow re 2))))
(*.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(* -1 (* re (- (* -1 (/ (pow im 2) (pow re 2))) 4)))
(*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) (*.f64 re re)) #s(literal -4 binary64)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (- (* -1 (/ (pow im 2) (pow re 2))) 4)))
(*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) (*.f64 re re)) #s(literal -4 binary64)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (- (* -1 (/ (pow im 2) (pow re 2))) 4)))
(*.f64 (+.f64 (/.f64 (*.f64 #s(literal -1 binary64) (*.f64 im im)) (*.f64 re re)) #s(literal -4 binary64)) (-.f64 #s(literal 0 binary64) re))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(+ (* 4 re) (/ (pow im 2) re))
(+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))
(+ (* 4 re) (/ (pow im 2) re))
(+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))
(+ (* 4 re) (/ (pow im 2) re))
(+.f64 (*.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(* (pow im 2) (+ (* 4 (/ re (pow im 2))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 im im))))
(* (pow im 2) (+ (* 4 (/ re (pow im 2))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 im im))))
(* (pow im 2) (+ (* 4 (/ re (pow im 2))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 im im))))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(* (pow im 2) (+ (* 4 (/ re (pow im 2))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 im im))))
(* (pow im 2) (+ (* 4 (/ re (pow im 2))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 im im))))
(* (pow im 2) (+ (* 4 (/ re (pow im 2))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 im im))))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))
(exp (* 1/4 (+ (log 2) (log im))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))
(exp (* 1/4 (+ (log 2) (log im))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))
(exp (* 1/4 (+ (log 2) (log im))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))
(exp (* 1/4 (+ (log 2) (log im))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))
(exp (* 1/4 (+ (log -2) (* -1 (log (/ -1 im))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal -2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))
(exp (* 1/4 (+ (log -2) (* -1 (log (/ -1 im))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal -2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))
(exp (* 1/4 (+ (log -2) (* -1 (log (/ -1 im))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal -2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))
(exp (* 1/4 (+ (log -2) (* -1 (log (/ -1 im))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal -2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(pow im 2)
(*.f64 im im)
(+ (* -1 (* im re)) (pow im 2))
(-.f64 (*.f64 im im) (*.f64 im re))
(+ (* re (+ (* -1 im) (* 2 re))) (pow im 2))
(+.f64 (*.f64 im im) (*.f64 re (-.f64 (*.f64 #s(literal 2 binary64) re) im)))
(+ (* re (+ (* -1 im) (* re (+ 2 (* -1/2 (/ re im)))))) (pow im 2))
(+.f64 (*.f64 im im) (*.f64 re (-.f64 (*.f64 re (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 re im)))) im)))
(pow re 2)
(*.f64 re re)
(* (pow re 2) (- (+ 1 (/ (pow im 2) (pow re 2))) (* 1/2 (/ (pow im 2) (pow re 2)))))
(*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))))
(* (pow re 2) (- (+ 1 (+ (* 1/8 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))) (* 1/2 (/ (pow im 2) (pow re 2)))))
(*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))))
(* (pow re 2) (- (+ 1 (+ (* -1/16 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))) (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(*.f64 (*.f64 re re) (-.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.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 (/.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))))))
(* 3 (pow re 2))
(*.f64 #s(literal 3 binary64) (*.f64 re re))
(* (pow re 2) (+ 3 (+ (* 1/2 (/ (pow im 2) (pow re 2))) (/ (pow im 2) (pow re 2)))))
(*.f64 (*.f64 re re) (+.f64 #s(literal 3 binary64) (*.f64 #s(literal 3/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))))
(* (pow re 2) (+ 3 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/2 (/ (pow im 2) (pow re 2))) (/ (pow im 2) (pow re 2))))))
(*.f64 (*.f64 re re) (+.f64 #s(literal 3 binary64) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal 3/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))))
(* (pow re 2) (+ 3 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (+ (* 1/2 (/ (pow im 2) (pow re 2))) (/ (pow im 2) (pow re 2)))))))
(*.f64 (*.f64 re re) (+.f64 #s(literal 3 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 #s(literal 3/2 binary64) (/.f64 (*.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)))))))
(pow re 2)
(*.f64 re re)
(+ (* 1/2 (pow im 2)) (pow re 2))
(+.f64 (*.f64 re re) (*.f64 #s(literal 1/2 binary64) (*.f64 im im)))
(+ (* (pow im 2) (+ 1/2 (* 1/8 (/ (pow im 2) (pow re 2))))) (pow re 2))
(+.f64 (*.f64 re re) (*.f64 (*.f64 im im) (+.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (*.f64 re re)))))
(+ (* (pow im 2) (+ 1/2 (* (pow im 2) (+ (* -1/16 (/ (pow im 2) (pow re 4))) (* 1/8 (/ 1 (pow re 2))))))) (pow re 2))
(+.f64 (*.f64 re re) (*.f64 (*.f64 im im) (+.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 im im)) (pow.f64 re #s(literal 4 binary64))) (/.f64 #s(literal 1/8 binary64) (*.f64 re re)))))))
(pow im 2)
(*.f64 im im)
(* (pow im 2) (+ 1 (* -1 (/ re im))))
(*.f64 (*.f64 im im) (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(* (pow im 2) (+ 1 (+ (* -1 (/ re im)) (* 2 (/ (pow re 2) (pow im 2))))))
(*.f64 (*.f64 im im) (+.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 re re)) (*.f64 im im))))
(* (pow im 2) (+ 1 (+ (* -1 (/ re im)) (+ (* -1/2 (/ (pow re 3) (pow im 3))) (* 2 (/ (pow re 2) (pow im 2)))))))
(*.f64 (*.f64 im im) (+.f64 #s(literal 1 binary64) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal 2 binary64) (*.f64 re re)) (*.f64 im im)) (/.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/2 binary64)) (*.f64 im (*.f64 im im)))) (/.f64 re im))))
(pow im 2)
(*.f64 im im)
(* (pow im 2) (+ 1 (/ re im)))
(*.f64 (*.f64 im im) (+.f64 #s(literal 1 binary64) (/.f64 re im)))
(* (pow im 2) (+ 1 (* -1 (/ (+ (* -2 (/ (pow re 2) im)) (* -1 re)) im))))
(*.f64 (*.f64 im im) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal -2 binary64) (*.f64 re re)) im) re) im)))
(* (pow im 2) (+ 1 (* -1 (/ (+ (* -1 re) (* -1 (/ (+ (* 1/2 (/ (pow re 3) im)) (* 2 (pow re 2))) im))) im))))
(*.f64 (*.f64 im im) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re (*.f64 re re))) im) (*.f64 #s(literal 2 binary64) (*.f64 re re))) 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/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 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)) #s(literal 1/4 binary64)))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/4 (* (sqrt (/ 1 im)) (* re (* (sqrt 2) (- (* 1/2 (/ (+ (* 2 (pow im 4)) (pow im 4)) (pow im 5))) (* 5/4 (/ 1 im))))))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (*.f64 #s(literal 1/4 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) im)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal 5/4 binary64) im))))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (* re (* (sqrt 2) (- (/ 1 (pow im 2)) (+ (* -1 (/ (- (* 1/2 (/ (+ (* 2 (pow im 4)) (pow im 4)) (pow im 5))) (/ 1 im)) im)) (+ (* 1/2 (/ (- (* 1/2 (/ (+ (* 2 (pow im 4)) (pow im 4)) (pow im 5))) (* 5/4 (/ 1 im))) im)) (* 3/2 (/ 1 (pow im 2)))))))))) (* 1/4 (* (sqrt (/ 1 im)) (* (sqrt 2) (- (* 1/2 (/ (+ (* 2 (pow im 4)) (pow im 4)) (pow im 5))) (* 5/4 (/ 1 im)))))))))))
(+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) #s(literal 1/4 binary64)) (*.f64 re (*.f64 #s(literal 1/4 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal 5/4 binary64) im))) im) (/.f64 #s(literal 3/2 binary64) (*.f64 im im))) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) im)) im))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal 5/4 binary64) 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/4 (* (sqrt (/ 1 (pow re 5))) (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))
(*.f64 re (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 im im))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64))))))) (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))))
(* re (+ (* 1/4 (* (sqrt (/ 1 (pow re 5))) (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))))) (+ (* 1/4 (* (sqrt (/ 1 (pow re 9))) (- (* 1/2 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (+ (* 1/4 (pow im 4)) (* (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))) (- (pow im 2) (* 1/2 (pow im 2)))))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
(*.f64 re (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 im im))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im)))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 im im))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64))))))))))))
(* re (+ (* -1/16 (* (sqrt (/ 1 (pow re 9))) (/ (pow (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))) 2) (pow (sqrt 2) 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow re 5))) (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))))) (+ (* 1/4 (* (sqrt (/ 1 (pow re 9))) (- (* 1/2 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (+ (* 1/4 (pow im 4)) (* (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))) (- (pow im 2) (* 1/2 (pow im 2)))))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
(*.f64 re (+.f64 (+.f64 (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 im im))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 im im))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64))))))) #s(literal 2 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 im im))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64)))))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im)))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 im im))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64))))))))))))
(* 1/2 (* (sqrt (/ (+ (* 2 (pow im 2)) (pow im 2)) re)) (* (sqrt -1) (* (sqrt 1/6) (sqrt 2)))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/6 binary64))))))
(+ (* -1/4 (* (sqrt (/ 1 (* (pow re 5) (+ (* 2 (pow im 2)) (pow im 2))))) (/ (* (sqrt -1) (* (sqrt 2) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))))) (sqrt 1/6)))) (* 1/2 (* (sqrt (/ (+ (* 2 (pow im 2)) (pow im 2)) re)) (* (sqrt -1) (* (sqrt 1/6) (sqrt 2))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/6 binary64)))))) (*.f64 (*.f64 #s(literal -1/4 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))) (*.f64 #s(literal 3 binary64) (*.f64 im im))))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))) #s(literal 1/6 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (*.f64 #s(literal 3/2 binary64) (*.f64 im im))) #s(literal -1/18 binary64)))) (sqrt.f64 #s(literal 1/6 binary64)))))
(+ (* -1 (/ (+ (* 1/4 (* (sqrt (/ 1 (* (pow re 3) (+ (* 2 (pow im 2)) (pow im 2))))) (/ (* (sqrt -1) (* (sqrt 2) (- (* 1/6 (- (pow im 6) (* 1/2 (* (+ (* 2 (pow im 2)) (pow im 2)) (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2))))))) (+ (* -1/144 (* (pow im 4) (+ (* 2 (pow im 2)) (pow im 2)))) (* 1/3 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))))))))) (sqrt 1/6)))) (* 1/4 (* (sqrt (/ re (+ (* 2 (pow im 2)) (pow im 2)))) (/ (* (sqrt -1) (* (sqrt 2) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))))) (sqrt 1/6))))) (pow re 3))) (* 1/2 (* (sqrt (/ (+ (* 2 (pow im 2)) (pow im 2)) re)) (* (sqrt -1) (* (sqrt 1/6) (sqrt 2))))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/6 binary64)))))) (/.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))) (*.f64 #s(literal 3 binary64) (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (-.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (+.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))))))) (*.f64 #s(literal 1/144 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 3 binary64) (*.f64 im im))))) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 3/2 binary64) (*.f64 im im))) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))) #s(literal 1/6 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (*.f64 #s(literal 3/2 binary64) (*.f64 im im))) #s(literal -1/18 binary64))))))) (sqrt.f64 #s(literal 1/6 binary64))) (/.f64 (*.f64 (sqrt.f64 (/.f64 re (*.f64 #s(literal 3 binary64) (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))) #s(literal 1/6 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (*.f64 #s(literal 3/2 binary64) (*.f64 im im))) #s(literal -1/18 binary64))))) (sqrt.f64 #s(literal 1/6 binary64))))) (*.f64 re (*.f64 re re))))
(+ (* -1 (/ (+ (* 1/16 (* (sqrt (/ 1 (* (pow re 3) (pow (+ (* 2 (pow im 2)) (pow im 2)) 3)))) (/ (* (sqrt -1) (* (sqrt 2) (pow (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))) 2))) (pow (sqrt 1/6) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (* (pow re 3) (+ (* 2 (pow im 2)) (pow im 2))))) (/ (* (sqrt -1) (* (sqrt 2) (- (* 1/6 (- (pow im 6) (* 1/2 (* (+ (* 2 (pow im 2)) (pow im 2)) (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2))))))) (+ (* -1/144 (* (pow im 4) (+ (* 2 (pow im 2)) (pow im 2)))) (* 1/3 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))))))))) (sqrt 1/6)))) (* 1/4 (* (sqrt (/ re (+ (* 2 (pow im 2)) (pow im 2)))) (/ (* (sqrt -1) (* (sqrt 2) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))))) (sqrt 1/6)))))) (pow re 3))) (* 1/2 (* (sqrt (/ (+ (* 2 (pow im 2)) (pow im 2)) re)) (* (sqrt -1) (* (sqrt 1/6) (sqrt 2))))))
(-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/6 binary64)))))) (/.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))) (*.f64 #s(literal 3 binary64) (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (-.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (+.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))))))) (*.f64 #s(literal 1/144 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 3 binary64) (*.f64 im im))))) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 3/2 binary64) (*.f64 im im))) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))) #s(literal 1/6 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (*.f64 #s(literal 3/2 binary64) (*.f64 im im))) #s(literal -1/18 binary64))))))) (sqrt.f64 #s(literal 1/6 binary64))) (/.f64 (*.f64 (sqrt.f64 (/.f64 re (*.f64 #s(literal 3 binary64) (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))) #s(literal 1/6 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (*.f64 #s(literal 3/2 binary64) (*.f64 im im))) #s(literal -1/18 binary64))))) (sqrt.f64 #s(literal 1/6 binary64))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im)))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))) #s(literal 1/6 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (*.f64 #s(literal 3/2 binary64) (*.f64 im im))) #s(literal -1/18 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (sqrt.f64 #s(literal 1/6 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/4 (* (* (pow im 2) (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re))) (sqrt (/ 1 re)))) (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (sqrt.f64 re))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re))))))
(+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* 1/4 (* (sqrt (/ 1 re)) (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)))) (* 1/4 (* (* (pow im 2) (- (* 1/2 (/ (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6)))) (pow re 5))) (+ (* 1/4 (/ 1 (pow re 3))) (+ (* 1/4 (/ (pow (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) 2) (* re (pow (sqrt 2) 2)))) (* 1/2 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 2))))))) (sqrt (/ 1 re)))))))
(+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (sqrt.f64 re))) (*.f64 (*.f64 im im) (*.f64 #s(literal 1/4 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 re #s(literal 6 binary64))))) (pow.f64 re #s(literal 5 binary64))) (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re)) #s(literal 2 binary64)) re)) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re))) (*.f64 re re)))))))))))
(+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* 1/4 (* (sqrt (/ 1 re)) (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)))) (* (pow im 2) (+ (* 1/4 (* (sqrt (/ 1 re)) (- (* 1/2 (/ (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6)))) (pow re 5))) (+ (* 1/4 (/ 1 (pow re 3))) (+ (* 1/4 (/ (pow (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) 2) (* re (pow (sqrt 2) 2)))) (* 1/2 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 2)))))))) (* 1/4 (* (* (pow im 2) (- (+ (* 1/8 (/ 1 (pow re 5))) (* 1/2 (/ (- 1 (* 1/2 (/ (* (+ (* 2 (pow re 4)) (pow re 4)) (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6))))) (pow re 6)))) (pow re 5)))) (+ (* 1/8 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 4))) (+ (* 1/2 (/ (* (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (- (* 1/2 (/ (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6)))) (pow re 5))) (+ (* 1/4 (/ 1 (pow re 3))) (+ (* 1/4 (/ (pow (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) 2) (* re (pow (sqrt 2) 2)))) (* 1/2 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 2))))))) (* re (pow (sqrt 2) 2)))) (* 1/2 (/ (- (* 1/2 (/ (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6)))) (pow re 5))) (+ (* 1/4 (/ 1 (pow re 3))) (* 1/2 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 2))))) (pow re 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/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re)))) (*.f64 (*.f64 im im) (*.f64 #s(literal 1/4 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 re #s(literal 6 binary64))))) (pow.f64 re #s(literal 5 binary64))) (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re)) #s(literal 2 binary64)) re)) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re))) (*.f64 re re)))))) (*.f64 (*.f64 im im) (*.f64 (+.f64 (/.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal 5 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 re #s(literal 6 binary64))))) (pow.f64 re #s(literal 6 binary64)))))) (pow.f64 re #s(literal 5 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re))) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re)) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 re #s(literal 6 binary64))))) (pow.f64 re #s(literal 5 binary64))) (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re)) #s(literal 2 binary64)) re)) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re))) (*.f64 re re)))))) (*.f64 #s(literal 2 binary64) re)) (/.f64 (+.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 re #s(literal 6 binary64))))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/4 binary64) (*.f64 re (*.f64 re re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) 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/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/4 binary64))))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2))))))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) #s(literal 1/4 binary64)) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 re re))) (*.f64 re re)))))))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2))))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 7))) (* (sqrt 2) (- (pow re 3) (+ (* -1 (* re (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2)))))) (+ (* -1/2 (pow re 3)) (+ (* 1/4 (* im (pow re 2))) (* 2 (pow re 3))))))))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(*.f64 im (+.f64 (*.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im))))) #s(literal 1/4 binary64)) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 re re))) (*.f64 re re)))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (*.f64 #s(literal 1/4 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 re (*.f64 re re)) (-.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 re (*.f64 re re))) (*.f64 #s(literal 1/4 binary64) (*.f64 im (*.f64 re re))))) (*.f64 re (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 re re))) (*.f64 re re)))))))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (sqrt -1) (* (sqrt 2) (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2)))))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 re re))) (*.f64 re re))))))))
(* -1 (* im (+ (* -1 (/ (+ (* -1/4 (* (sqrt (/ 1 im)) (* (sqrt -1) (* (sqrt 2) (- (pow re 3) (+ (* -1 (* re (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2)))))) (+ (* -1/2 (pow re 3)) (+ (* -1/4 (* im (pow re 2))) (* 2 (pow re 3)))))))))) (* 1/4 (* (sqrt im) (* (sqrt -1) (* (sqrt 2) (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 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 #s(literal 0 binary64) im) (-.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (-.f64 (+.f64 (*.f64 re (*.f64 re re)) (*.f64 re (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 re re))) (*.f64 re re)))) (+.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 re re)))) (*.f64 #s(literal 2 binary64) (*.f64 re (*.f64 re re)))))))) (*.f64 (*.f64 #s(literal 1/4 binary64) (sqrt.f64 im)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 re re))) (*.f64 re re))))) (*.f64 im (*.f64 im im)))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* 1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))))
(+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 im)) (* re (* (sqrt 2) (- (* 1/2 (/ (+ (* 2 (pow im 4)) (pow im 4)) (pow im 5))) (* 5/4 (/ 1 im))))))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (*.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) im)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal 5/4 binary64) im))))))))
(+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (* re (* (sqrt 2) (- (/ 1 (pow im 2)) (+ (* -1 (/ (- (* 1/2 (/ (+ (* 2 (pow im 4)) (pow im 4)) (pow im 5))) (/ 1 im)) im)) (+ (* 1/2 (/ (- (* 1/2 (/ (+ (* 2 (pow im 4)) (pow im 4)) (pow im 5))) (* 5/4 (/ 1 im))) im)) (* 3/2 (/ 1 (pow im 2)))))))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt 2) (- (* 1/2 (/ (+ (* 2 (pow im 4)) (pow im 4)) (pow im 5))) (* 5/4 (/ 1 im)))))))))) (* (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 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) (-.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal 5/4 binary64) im))) im) (/.f64 #s(literal 3/2 binary64) (*.f64 im im))) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) im)) im))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal 5/4 binary64) im)))))))))
(* (sqrt re) (pow (sqrt 2) 2))
(*.f64 #s(literal 2 binary64) (sqrt.f64 re))
(* re (+ (* 1/2 (* (sqrt (/ 1 (pow re 5))) (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))
(*.f64 re (+.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 im im))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64))))))))
(* re (+ (* 1/2 (* (sqrt (/ 1 (pow re 5))) (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))))) (+ (* 1/2 (* (sqrt (/ 1 (pow re 9))) (- (* 1/2 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (+ (* 1/4 (pow im 4)) (* (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))) (- (pow im 2) (* 1/2 (pow im 2)))))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))
(*.f64 re (+.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 im im))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64)))))) (+.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im)))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 im im))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64))))))))))))
(* re (+ (* -1/8 (* (sqrt (/ 1 (pow re 9))) (/ (pow (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))) 2) (pow (sqrt 2) 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow re 5))) (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))))) (+ (* 1/2 (* (sqrt (/ 1 (pow re 9))) (- (* 1/2 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (+ (* 1/4 (pow im 4)) (* (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))) (- (pow im 2) (* 1/2 (pow im 2)))))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
(*.f64 re (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))) (/.f64 (*.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 im im))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 im im))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64)))))) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 im im))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64))))))) (+.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im)))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 im im))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64))))))))))))
(* (sqrt (/ (+ (* 2 (pow im 2)) (pow im 2)) re)) (* (sqrt -1) (* (sqrt 1/6) (sqrt 2))))
(*.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/6 binary64)))))
(+ (* -1/2 (* (sqrt (/ 1 (* (pow re 5) (+ (* 2 (pow im 2)) (pow im 2))))) (/ (* (sqrt -1) (* (sqrt 2) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))))) (sqrt 1/6)))) (* (sqrt (/ (+ (* 2 (pow im 2)) (pow im 2)) re)) (* (sqrt -1) (* (sqrt 1/6) (sqrt 2)))))
(+.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/6 binary64))))) (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))) (*.f64 #s(literal 3 binary64) (*.f64 im im))))) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))) #s(literal 1/6 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (*.f64 #s(literal 3/2 binary64) (*.f64 im im))) #s(literal -1/18 binary64)))) (sqrt.f64 #s(literal 1/6 binary64)))))
(+ (* -1 (/ (+ (* 1/2 (* (sqrt (/ 1 (* (pow re 3) (+ (* 2 (pow im 2)) (pow im 2))))) (/ (* (sqrt -1) (* (sqrt 2) (- (* 1/6 (- (pow im 6) (* 1/2 (* (+ (* 2 (pow im 2)) (pow im 2)) (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2))))))) (+ (* -1/144 (* (pow im 4) (+ (* 2 (pow im 2)) (pow im 2)))) (* 1/3 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))))))))) (sqrt 1/6)))) (* 1/2 (* (sqrt (/ re (+ (* 2 (pow im 2)) (pow im 2)))) (/ (* (sqrt -1) (* (sqrt 2) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))))) (sqrt 1/6))))) (pow re 3))) (* (sqrt (/ (+ (* 2 (pow im 2)) (pow im 2)) re)) (* (sqrt -1) (* (sqrt 1/6) (sqrt 2)))))
(-.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/6 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))) (*.f64 #s(literal 3 binary64) (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (-.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (+.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))))))) (*.f64 #s(literal 1/144 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 3 binary64) (*.f64 im im))))) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 3/2 binary64) (*.f64 im im))) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))) #s(literal 1/6 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (*.f64 #s(literal 3/2 binary64) (*.f64 im im))) #s(literal -1/18 binary64))))))) (sqrt.f64 #s(literal 1/6 binary64))) (/.f64 (*.f64 (sqrt.f64 (/.f64 re (*.f64 #s(literal 3 binary64) (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))) #s(literal 1/6 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (*.f64 #s(literal 3/2 binary64) (*.f64 im im))) #s(literal -1/18 binary64))))) (sqrt.f64 #s(literal 1/6 binary64))))) (*.f64 re (*.f64 re re))))
(+ (* -1 (/ (+ (* 1/8 (* (sqrt (/ 1 (* (pow re 3) (pow (+ (* 2 (pow im 2)) (pow im 2)) 3)))) (/ (* (sqrt -1) (* (sqrt 2) (pow (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))) 2))) (pow (sqrt 1/6) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (* (pow re 3) (+ (* 2 (pow im 2)) (pow im 2))))) (/ (* (sqrt -1) (* (sqrt 2) (- (* 1/6 (- (pow im 6) (* 1/2 (* (+ (* 2 (pow im 2)) (pow im 2)) (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2))))))) (+ (* -1/144 (* (pow im 4) (+ (* 2 (pow im 2)) (pow im 2)))) (* 1/3 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))))))))) (sqrt 1/6)))) (* 1/2 (* (sqrt (/ re (+ (* 2 (pow im 2)) (pow im 2)))) (/ (* (sqrt -1) (* (sqrt 2) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))))) (sqrt 1/6)))))) (pow re 3))) (* (sqrt (/ (+ (* 2 (pow im 2)) (pow im 2)) re)) (* (sqrt -1) (* (sqrt 1/6) (sqrt 2)))))
(-.f64 (*.f64 (sqrt.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/6 binary64))))) (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))) (*.f64 #s(literal 3 binary64) (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (-.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (+.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))))))) (*.f64 #s(literal 1/144 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 3 binary64) (*.f64 im im))))) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 3/2 binary64) (*.f64 im im))) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))) #s(literal 1/6 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (*.f64 #s(literal 3/2 binary64) (*.f64 im im))) #s(literal -1/18 binary64))))))) (sqrt.f64 #s(literal 1/6 binary64))) (/.f64 (*.f64 (sqrt.f64 (/.f64 re (*.f64 #s(literal 3 binary64) (*.f64 im im)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))) #s(literal 1/6 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (*.f64 #s(literal 3/2 binary64) (*.f64 im im))) #s(literal -1/18 binary64))))) (sqrt.f64 #s(literal 1/6 binary64))))) (*.f64 #s(literal 1/8 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im)))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))) #s(literal 1/6 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (*.f64 #s(literal 3/2 binary64) (*.f64 im im))) #s(literal -1/18 binary64))) #s(literal 2 binary64)))) (*.f64 #s(literal 1/6 binary64) (sqrt.f64 #s(literal 1/6 binary64)))))) (*.f64 re (*.f64 re re))))
(* (sqrt re) (pow (sqrt 2) 2))
(*.f64 #s(literal 2 binary64) (sqrt.f64 re))
(+ (* 1/2 (* (* (pow im 2) (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re))) (sqrt (/ 1 re)))) (* (sqrt re) (pow (sqrt 2) 2)))
(+.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re))))))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* 1/2 (* (sqrt (/ 1 re)) (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)))) (* 1/2 (* (* (pow im 2) (- (* 1/2 (/ (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6)))) (pow re 5))) (+ (* 1/4 (/ 1 (pow re 3))) (+ (* 1/4 (/ (pow (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) 2) (* re (pow (sqrt 2) 2)))) (* 1/2 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 2))))))) (sqrt (/ 1 re)))))))
(+.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) (*.f64 (*.f64 im im) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 re #s(literal 6 binary64))))) (pow.f64 re #s(literal 5 binary64))) (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re)) #s(literal 2 binary64)) re)) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re))) (*.f64 re re)))))))))))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* 1/2 (* (sqrt (/ 1 re)) (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)))) (* (pow im 2) (+ (* 1/2 (* (sqrt (/ 1 re)) (- (* 1/2 (/ (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6)))) (pow re 5))) (+ (* 1/4 (/ 1 (pow re 3))) (+ (* 1/4 (/ (pow (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) 2) (* re (pow (sqrt 2) 2)))) (* 1/2 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 2)))))))) (* 1/2 (* (* (pow im 2) (- (+ (* 1/8 (/ 1 (pow re 5))) (* 1/2 (/ (- 1 (* 1/2 (/ (* (+ (* 2 (pow re 4)) (pow re 4)) (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6))))) (pow re 6)))) (pow re 5)))) (+ (* 1/8 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 4))) (+ (* 1/2 (/ (* (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (- (* 1/2 (/ (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6)))) (pow re 5))) (+ (* 1/4 (/ 1 (pow re 3))) (+ (* 1/4 (/ (pow (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) 2) (* re (pow (sqrt 2) 2)))) (* 1/2 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 2))))))) (* re (pow (sqrt 2) 2)))) (* 1/2 (/ (- (* 1/2 (/ (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6)))) (pow re 5))) (+ (* 1/4 (/ 1 (pow re 3))) (* 1/2 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 2))))) (pow re 2))))))) (sqrt (/ 1 re)))))))))
(+.f64 (*.f64 #s(literal 2 binary64) (sqrt.f64 re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re)))) (*.f64 (*.f64 im im) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 re #s(literal 6 binary64))))) (pow.f64 re #s(literal 5 binary64))) (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re)) #s(literal 2 binary64)) re)) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re))) (*.f64 re re)))))) (*.f64 (*.f64 im im) (*.f64 (+.f64 (/.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal 5 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 re #s(literal 6 binary64))))) (pow.f64 re #s(literal 6 binary64)))))) (pow.f64 re #s(literal 5 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re))) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re)) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 re #s(literal 6 binary64))))) (pow.f64 re #s(literal 5 binary64))) (+.f64 (/.f64 #s(literal 1/4 binary64) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re)) #s(literal 2 binary64)) re)) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re))) (*.f64 re re)))))) (*.f64 #s(literal 2 binary64) re)) (/.f64 (+.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 re #s(literal 6 binary64))))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/4 binary64) (*.f64 re (*.f64 re re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re)) (*.f64 re re)))) (*.f64 re re))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(*.f64 im (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #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/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2))))))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(*.f64 im (+.f64 (*.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 #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)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 re re))) (*.f64 re re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2))))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 7))) (* (sqrt 2) (- (pow re 3) (+ (* -1 (* re (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2)))))) (+ (* -1/2 (pow re 3)) (+ (* 1/4 (* im (pow re 2))) (* 2 (pow re 3))))))))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(*.f64 im (+.f64 (*.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 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 re re))) (*.f64 re re)))) (+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (-.f64 (*.f64 re (*.f64 re re)) (-.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (*.f64 re (*.f64 re re))) (*.f64 #s(literal 1/4 binary64) (*.f64 im (*.f64 re re))))) (*.f64 re (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 re re))) (*.f64 re re)))))))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (* (sqrt -1) (* (sqrt 2) (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2)))))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 #s(literal -1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 re re))) (*.f64 re re)))))))
(* -1 (* im (+ (* -1 (/ (+ (* -1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (* (sqrt 2) (- (pow re 3) (+ (* -1 (* re (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2)))))) (+ (* -1/2 (pow re 3)) (+ (* -1/4 (* im (pow re 2))) (* 2 (pow re 3)))))))))) (* 1/2 (* (sqrt im) (* (sqrt -1) (* (sqrt 2) (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2))))))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (-.f64 (+.f64 (*.f64 re (*.f64 re re)) (*.f64 re (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 re re))) (*.f64 re re)))) (+.f64 (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/2 binary64)) (*.f64 #s(literal -1/4 binary64) (*.f64 im (*.f64 re re)))) (*.f64 #s(literal 2 binary64) (*.f64 re (*.f64 re re))))))) (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 re re))) (*.f64 re re))))) (*.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 (* 2 (* re (- (* 1/2 (/ (+ (* 2 (pow im 4)) (pow im 4)) (pow im 5))) (/ 1 im)))))))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (*.f64 (*.f64 #s(literal 2 binary64) re) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) im))))))
(+ (* 2 im) (* re (+ 2 (* re (+ (* 2 (* re (- (/ 1 (pow im 2)) (+ (* -1 (/ (- (* 1/2 (/ (+ (* 2 (pow im 4)) (pow im 4)) (pow im 5))) (/ 1 im)) im)) (* 3/2 (/ 1 (pow im 2))))))) (* 2 (- (* 1/2 (/ (+ (* 2 (pow im 4)) (pow im 4)) (pow im 5))) (/ 1 im))))))))
(+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (*.f64 re (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re (-.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) (-.f64 (/.f64 #s(literal 3/2 binary64) (*.f64 im im)) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) im)) im)))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) im))))))))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(* re (+ 4 (* 2 (/ (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))) (pow re 2)))))
(*.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 im im))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64)))))) (*.f64 re re))))
(* re (+ 4 (+ (* 2 (/ (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))) (pow re 2))) (* 2 (/ (- (* 1/2 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (+ (* 1/4 (pow im 4)) (* (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))) (- (pow im 2) (* 1/2 (pow im 2)))))) (pow re 4))))))
(*.f64 re (+.f64 #s(literal 4 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 im im))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64))))) (*.f64 re re)) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im)))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 im im))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64)))))))) (pow.f64 re #s(literal 4 binary64)))))))
(* re (+ 4 (+ (* 2 (/ (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))) (pow re 2))) (+ (* 2 (/ (- (* 1/2 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (+ (* 1/4 (pow im 4)) (* (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))) (- (pow im 2) (* 1/2 (pow im 2)))))) (pow re 4))) (* 2 (/ (- (* 1/2 (- (pow im 6) (* 1/2 (* (+ (* 2 (pow im 2)) (pow im 2)) (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2))))))) (+ (* -1/8 (pow im 6)) (+ (* 1/8 (* (pow im 4) (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))))) (* (- (* 1/2 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (+ (* 1/4 (pow im 4)) (* (- (* 1/2 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (- (pow im 2) (* 1/2 (pow im 2))))) (- (pow im 2) (* 1/2 (pow im 2)))))) (- (pow im 2) (* 1/2 (pow im 2))))))) (pow re 6)))))))
(*.f64 re (+.f64 #s(literal 4 binary64) (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 im im))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64))))) (*.f64 re re)) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im)))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 im im))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64)))))))) (pow.f64 re #s(literal 4 binary64))))) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))))))) (+.f64 (+.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal -1/8 binary64)) (*.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 im im))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64))))))) (*.f64 (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64))) (-.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im)))))) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64))) (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 im im))) (*.f64 #s(literal -2 binary64) (+.f64 (*.f64 im im) (*.f64 (*.f64 im im) #s(literal -1/2 binary64)))))))))))) (pow.f64 re #s(literal 6 binary64))))))
(* -1/3 (/ (+ (* 2 (pow im 2)) (pow im 2)) re))
(*.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) re) #s(literal -1/3 binary64))
(* -1 (/ (+ (* 1/3 (+ (* 2 (pow im 2)) (pow im 2))) (* 2 (/ (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))) (pow re 2)))) re))
(-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) #s(literal 1/3 binary64)) (/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))) #s(literal 1/6 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (*.f64 #s(literal 3/2 binary64) (*.f64 im im))) #s(literal -1/18 binary64)))) (*.f64 re re))) re))
(* -1 (/ (+ (* 1/3 (+ (* 2 (pow im 2)) (pow im 2))) (+ (* 2 (/ (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))) (pow re 2))) (* 2 (/ (- (* 1/6 (- (pow im 6) (* 1/2 (* (+ (* 2 (pow im 2)) (pow im 2)) (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2))))))) (+ (* -1/144 (* (pow im 4) (+ (* 2 (pow im 2)) (pow im 2)))) (* 1/3 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))))))) (pow re 4))))) re))
(-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) #s(literal 1/3 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))) #s(literal 1/6 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (*.f64 #s(literal 3/2 binary64) (*.f64 im im))) #s(literal -1/18 binary64))) (*.f64 re re)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (+.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))))))) (*.f64 #s(literal 1/144 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 3 binary64) (*.f64 im im))))) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 3/2 binary64) (*.f64 im im))) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))) #s(literal 1/6 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (*.f64 #s(literal 3/2 binary64) (*.f64 im im))) #s(literal -1/18 binary64))))) (pow.f64 re #s(literal 4 binary64)))))) re))
(* -1 (/ (+ (* 1/3 (+ (* 2 (pow im 2)) (pow im 2))) (+ (* 2 (/ (- (* -1/6 (+ (* 1/4 (pow (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2))) 2)) (* 1/2 (* (+ (* 2 (pow im 2)) (pow im 2)) (- (pow im 6) (* 1/2 (* (+ (* 2 (pow im 2)) (pow im 2)) (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))))))))) (+ (* -1/24 (* (pow im 4) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))))) (+ (* 1/288 (* (pow im 6) (+ (* 2 (pow im 2)) (pow im 2)))) (* 1/3 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (- (* 1/6 (- (pow im 6) (* 1/2 (* (+ (* 2 (pow im 2)) (pow im 2)) (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2))))))) (+ (* -1/144 (* (pow im 4) (+ (* 2 (pow im 2)) (pow im 2)))) (* 1/3 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2)))))))))))))) (pow re 6))) (+ (* 2 (/ (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))) (pow re 2))) (* 2 (/ (- (* 1/6 (- (pow im 6) (* 1/2 (* (+ (* 2 (pow im 2)) (pow im 2)) (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2))))))) (+ (* -1/144 (* (pow im 4) (+ (* 2 (pow im 2)) (pow im 2)))) (* 1/3 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (- (* 1/6 (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))) (* 1/18 (* (+ (* 1/2 (pow im 2)) (pow im 2)) (+ (* 2 (pow im 2)) (pow im 2))))))))) (pow re 4)))))) re))
(-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) #s(literal 1/3 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))) #s(literal 1/6 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (*.f64 #s(literal 3/2 binary64) (*.f64 im im))) #s(literal -1/18 binary64))) (*.f64 re re)) (/.f64 (-.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (+.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))))))) (*.f64 #s(literal 1/144 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 3 binary64) (*.f64 im im))))) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 3/2 binary64) (*.f64 im im))) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))) #s(literal 1/6 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (*.f64 #s(literal 3/2 binary64) (*.f64 im im))) #s(literal -1/18 binary64))))) (pow.f64 re #s(literal 4 binary64))))) (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal -1/6 binary64) (+.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))) #s(literal 2 binary64))) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 im im))) (+.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))))))))) (+.f64 (+.f64 (*.f64 (*.f64 #s(literal -1/24 binary64) (pow.f64 im #s(literal 4 binary64))) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))) #s(literal 1/6 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (*.f64 #s(literal 3/2 binary64) (*.f64 im im))) #s(literal -1/18 binary64)))) (*.f64 (*.f64 #s(literal 1/288 binary64) (pow.f64 im #s(literal 6 binary64))) (*.f64 #s(literal 3 binary64) (*.f64 im im)))) (*.f64 #s(literal 1/3 binary64) (*.f64 (*.f64 #s(literal 3/2 binary64) (*.f64 im im)) (-.f64 (+.f64 (*.f64 #s(literal 1/6 binary64) (+.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))))))) (*.f64 #s(literal 1/144 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal 3 binary64) (*.f64 im im))))) (*.f64 (*.f64 #s(literal 1/3 binary64) (*.f64 #s(literal 3/2 binary64) (*.f64 im im))) (+.f64 (*.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))) #s(literal 1/6 binary64)) (*.f64 (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (*.f64 #s(literal 3/2 binary64) (*.f64 im im))) #s(literal -1/18 binary64)))))))))) (pow.f64 re #s(literal 6 binary64))))) re))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(+ (* 2 (* (pow im 2) (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)))) (* 4 re))
(+.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 im im)) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re))))
(+ (* 4 re) (* (pow im 2) (+ (* 2 (* (pow im 2) (- (* 1/2 (/ (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6)))) (pow re 5))) (+ (* 1/4 (/ 1 (pow re 3))) (* 1/2 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 2))))))) (* 2 (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re))))))
(+.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 (*.f64 im im) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 im im) (+.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 re #s(literal 6 binary64))))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/4 binary64) (*.f64 re (*.f64 re re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re)) (*.f64 re re))))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re))))))
(+ (* 4 re) (* (pow im 2) (+ (* 2 (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re))) (* (pow im 2) (+ (* 2 (* (pow im 2) (- (+ (* 1/8 (/ 1 (pow re 5))) (* 1/2 (/ (- 1 (* 1/2 (/ (* (+ (* 2 (pow re 4)) (pow re 4)) (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6))))) (pow re 6)))) (pow re 5)))) (+ (* 1/8 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 4))) (* 1/2 (/ (- (* 1/2 (/ (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6)))) (pow re 5))) (+ (* 1/4 (/ 1 (pow re 3))) (* 1/2 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 2))))) (pow re 2))))))) (* 2 (- (* 1/2 (/ (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6)))) (pow re 5))) (+ (* 1/4 (/ 1 (pow re 3))) (* 1/2 (/ (- (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 5))) (/ 1 re)) (pow re 2)))))))))))
(+.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal 2 binary64) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 im im) (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal 5 binary64))) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 re #s(literal 6 binary64))))) (pow.f64 re #s(literal 6 binary64)))))) (pow.f64 re #s(literal 5 binary64))) (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 re #s(literal 6 binary64))))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/4 binary64) (*.f64 re (*.f64 re re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) re)) (*.f64 re re))))) (*.f64 re re)))))) (+.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 re #s(literal 6 binary64))))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/4 binary64) (*.f64 re (*.f64 re re)))) (*.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1 binary64) 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)) (* 2 (/ (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2)))) (pow im 2))))))
(*.f64 im (+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 re im) (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 re re))) (*.f64 re re)) (*.f64 im im))))))
(* im (+ 2 (+ (* 2 (/ re im)) (+ (* 2 (/ (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2)))) (pow im 2))) (* 2 (/ (- (pow re 3) (+ (* -1 (* re (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2)))))) (+ (* -1/2 (pow re 3)) (* 2 (pow re 3))))) (pow im 3)))))))
(*.f64 im (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 re re))) (*.f64 re re)) (*.f64 im im)) (/.f64 (-.f64 (*.f64 re (*.f64 re re)) (-.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 3/2 binary64)) (*.f64 re (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 re re))) (*.f64 re re))))) (*.f64 im (*.f64 im im)))))))
(* -2 im)
(*.f64 im #s(literal -2 binary64))
(* -1 (* im (+ 2 (* -2 (/ re im)))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -2 binary64) re) im)))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 (/ (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2)))) im)) (* 2 re)) im)))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 (*.f64 #s(literal 2 binary64) re) (/.f64 (*.f64 #s(literal -2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 re re))) (*.f64 re re))) im)) im)))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (+ (* -2 (/ (- (pow re 3) (+ (* -1 (* re (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2)))))) (+ (* -1/2 (pow re 3)) (* 2 (pow re 3))))) im)) (* 2 (- (* 1/2 (+ (* 2 (pow re 2)) (pow re 2))) (+ (* -1 (pow re 2)) (* 2 (pow re 2)))))) im)) (* 2 re)) im)))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (*.f64 #s(literal 2 binary64) re) (/.f64 (+.f64 (/.f64 (*.f64 #s(literal -2 binary64) (-.f64 (*.f64 re (*.f64 re re)) (-.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal 3/2 binary64)) (*.f64 re (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 re re))) (*.f64 re re)))))) im) (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 re re))) (*.f64 re re)))) 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 #s(literal 1/24 binary64) (/.f64 (*.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 (log.f64 #s(literal 4 binary64)) (log.f64 re)) (+.f64 (+.f64 (/.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 im im)) (*.f64 re re)) (*.f64 #s(literal 1/24 binary64) (/.f64 (*.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 (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)))))
(+ (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 (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (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 (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 #s(literal -720 binary64) (*.f64 (/.f64 (pow.f64 im #s(literal 8 binary64)) im) (/.f64 #s(literal 5/64 binary64) 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 (log.f64 #s(literal 2 binary64)) (log.f64 im)) (+.f64 (+.f64 (/.f64 re im) (/.f64 #s(literal 0 binary64) (*.f64 im im))) (/.f64 (neg.f64 (*.f64 #s(literal 1/6 binary64) (*.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 (neg.f64 (*.f64 #s(literal -1/6 binary64) (*.f64 re (*.f64 re re)))) im) #s(literal 0 binary64)) im)) im))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow im 2)
(*.f64 im im)
(pow re 3)
(*.f64 re (*.f64 re re))
(pow re 3)
(*.f64 re (*.f64 re re))
(pow re 3)
(*.f64 re (*.f64 re re))
(pow re 3)
(*.f64 re (*.f64 re re))
(pow re 3)
(*.f64 re (*.f64 re re))
(pow re 3)
(*.f64 re (*.f64 re re))
(pow re 3)
(*.f64 re (*.f64 re re))
(pow re 3)
(*.f64 re (*.f64 re re))
(pow re 3)
(*.f64 re (*.f64 re re))
(pow re 3)
(*.f64 re (*.f64 re re))
(pow re 3)
(*.f64 re (*.f64 re re))
(pow re 3)
(*.f64 re (*.f64 re re))
(pow im 3)
(*.f64 im (*.f64 im im))
(+ (* 1/2 (/ (* (pow re 2) (+ (* 2 (pow im 4)) (pow im 4))) (pow im 3))) (pow im 3))
(+.f64 (*.f64 im (*.f64 im im)) (*.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (*.f64 (*.f64 re re) (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64)))) (*.f64 im im))))
(+ (* (pow re 2) (+ (* 1/2 (/ (* (pow re 2) (- (+ (* 2 (pow im 2)) (pow im 2)) (* 1/4 (/ (pow (+ (* 2 (pow im 4)) (pow im 4)) 2) (pow im 6))))) (pow im 3))) (* 1/2 (/ (+ (* 2 (pow im 4)) (pow im 4)) (pow im 3))))) (pow im 3))
(+.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (*.f64 re re) (/.f64 (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 im #s(literal 6 binary64)))) (*.f64 im (*.f64 im im)))) (/.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 im (*.f64 im im)))))))
(+ (* (pow re 2) (+ (* 1/2 (/ (+ (* 2 (pow im 4)) (pow im 4)) (pow im 3))) (* (pow re 2) (+ (* 1/2 (/ (* (pow re 2) (- 1 (* 1/2 (/ (* (+ (* 2 (pow im 4)) (pow im 4)) (- (+ (* 2 (pow im 2)) (pow im 2)) (* 1/4 (/ (pow (+ (* 2 (pow im 4)) (pow im 4)) 2) (pow im 6))))) (pow im 6))))) (pow im 3))) (* 1/2 (/ (- (+ (* 2 (pow im 2)) (pow im 2)) (* 1/4 (/ (pow (+ (* 2 (pow im 4)) (pow im 4)) 2) (pow im 6)))) (pow im 3))))))) (pow im 3))
(+.f64 (*.f64 im (*.f64 im im)) (*.f64 (*.f64 re re) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64)))) (*.f64 im (*.f64 im im))) (*.f64 (*.f64 re re) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 im #s(literal 6 binary64))))) (pow.f64 im #s(literal 6 binary64)))))) (*.f64 im (*.f64 im im))) (/.f64 (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 im #s(literal 6 binary64)))) (*.f64 im (*.f64 im im)))))))))
(pow re 3)
(*.f64 re (*.f64 re re))
(* (pow re 3) (+ 1 (* 1/2 (/ (+ (* 2 (pow im 2)) (pow im 2)) (pow re 2)))))
(*.f64 (*.f64 re (*.f64 re re)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 im im))) (*.f64 re re))))
(* (pow re 3) (+ 1 (+ (* 1/2 (/ (+ (* 2 (pow im 2)) (pow im 2)) (pow re 2))) (* 1/2 (/ (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2))) (pow re 4))))))
(*.f64 (*.f64 re (*.f64 re re)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (*.f64 re re)) (/.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))) (pow.f64 re #s(literal 4 binary64)))))))
(* (pow re 3) (+ 1 (+ (* 1/2 (/ (+ (* 2 (pow im 2)) (pow im 2)) (pow re 2))) (+ (* 1/2 (/ (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2))) (pow re 4))) (* 1/2 (/ (- (pow im 6) (* 1/2 (* (+ (* 2 (pow im 2)) (pow im 2)) (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))))) (pow re 6)))))))
(*.f64 (*.f64 re (*.f64 re re)) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 im im))) (*.f64 re re))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im)))))))) (pow.f64 re #s(literal 6 binary64)))))))
(* -1 (pow re 3))
(-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))
(* -1 (* (pow re 3) (+ 1 (* 1/2 (/ (+ (* 2 (pow im 2)) (pow im 2)) (pow re 2))))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 im im))) (*.f64 re re))))
(* -1 (* (pow re 3) (+ 1 (+ (* 1/2 (/ (+ (* 2 (pow im 2)) (pow im 2)) (pow re 2))) (* 1/2 (/ (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2))) (pow re 4)))))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (*.f64 re re)) (/.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))) (pow.f64 re #s(literal 4 binary64)))))))
(* -1 (* (pow re 3) (+ 1 (+ (* 1/2 (/ (+ (* 2 (pow im 2)) (pow im 2)) (pow re 2))) (+ (* 1/2 (/ (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2))) (pow re 4))) (* 1/2 (/ (- (pow im 6) (* 1/2 (* (+ (* 2 (pow im 2)) (pow im 2)) (- (+ (* 2 (pow im 4)) (pow im 4)) (* 1/4 (pow (+ (* 2 (pow im 2)) (pow im 2)) 2)))))) (pow re 6))))))))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 im im))) (*.f64 re re))) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im))))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 im im) (*.f64 im im)))))))) (pow.f64 re #s(literal 6 binary64)))))))
(pow re 3)
(*.f64 re (*.f64 re re))
(+ (* 1/2 (/ (* (pow im 2) (+ (* 2 (pow re 4)) (pow re 4))) (pow re 3))) (pow re 3))
(+.f64 (*.f64 re (*.f64 re re)) (*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 im im) (*.f64 re re)) (/.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) re))))
(+ (* (pow im 2) (+ (* 1/2 (/ (* (pow im 2) (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6))))) (pow re 3))) (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 3))))) (pow re 3))
(+.f64 (*.f64 re (*.f64 re re)) (*.f64 (*.f64 im im) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 im im) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 re #s(literal 6 binary64))))) (*.f64 re (*.f64 re re))) (/.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 re (*.f64 re re)))))))
(+ (* (pow im 2) (+ (* 1/2 (/ (+ (* 2 (pow re 4)) (pow re 4)) (pow re 3))) (* (pow im 2) (+ (* 1/2 (/ (* (pow im 2) (- 1 (* 1/2 (/ (* (+ (* 2 (pow re 4)) (pow re 4)) (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6))))) (pow re 6))))) (pow re 3))) (* 1/2 (/ (- (+ (* 2 (pow re 2)) (pow re 2)) (* 1/4 (/ (pow (+ (* 2 (pow re 4)) (pow re 4)) 2) (pow re 6)))) (pow re 3))))))) (pow re 3))
(+.f64 (*.f64 re (*.f64 re re)) (*.f64 (*.f64 im im) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64)))) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 im im) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 re #s(literal 6 binary64))))) (pow.f64 re #s(literal 6 binary64)))))) (*.f64 re (*.f64 re re))) (/.f64 (-.f64 (*.f64 #s(literal 3 binary64) (*.f64 re re)) (/.f64 (*.f64 #s(literal 1/4 binary64) (pow.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) #s(literal 2 binary64))) (pow.f64 re #s(literal 6 binary64)))) (*.f64 re (*.f64 re re)))))))))
(pow im 3)
(*.f64 im (*.f64 im im))
(* (pow im 3) (+ 1 (* 1/2 (/ (+ (* 2 (pow re 2)) (pow re 2)) (pow im 2)))))
(*.f64 (*.f64 im (*.f64 im im)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 re re)) (*.f64 im im)))))
(* (pow im 3) (+ 1 (+ (* 1/2 (/ (+ (* 2 (pow re 2)) (pow re 2)) (pow im 2))) (* 1/2 (/ (- (+ (* 2 (pow re 4)) (pow re 4)) (* 1/4 (pow (+ (* 2 (pow re 2)) (pow re 2)) 2))) (pow im 4))))))
(*.f64 (*.f64 im (*.f64 im im)) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 re re)) (*.f64 im im)) (/.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 re re) (*.f64 re re))))) (pow.f64 im #s(literal 4 binary64)))))))
(* (pow im 3) (+ 1 (+ (* 1/2 (/ (+ (* 2 (pow re 2)) (pow re 2)) (pow im 2))) (+ (* 1/2 (/ (- (+ (* 2 (pow re 4)) (pow re 4)) (* 1/4 (pow (+ (* 2 (pow re 2)) (pow re 2)) 2))) (pow im 4))) (* 1/2 (/ (- (pow re 6) (* 1/2 (* (+ (* 2 (pow re 2)) (pow re 2)) (- (+ (* 2 (pow re 4)) (pow re 4)) (* 1/4 (pow (+ (* 2 (pow re 2)) (pow re 2)) 2)))))) (pow im 6)))))))
(*.f64 (*.f64 im (*.f64 im im)) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 re re)) (*.f64 im im)) (/.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 re re) (*.f64 re re))))) (pow.f64 im #s(literal 4 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 re #s(literal 6 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 re re))) (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 re re) (*.f64 re re)))))))) (pow.f64 im #s(literal 6 binary64))))))
(* -1 (pow im 3))
(*.f64 im (*.f64 #s(literal -1 binary64) (*.f64 im im)))
(* -1 (* (pow im 3) (+ 1 (* 1/2 (/ (+ (* 2 (pow re 2)) (pow re 2)) (pow im 2))))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 re re)) (*.f64 im im)))) (*.f64 im (*.f64 #s(literal -1 binary64) (*.f64 im im))))
(* -1 (* (pow im 3) (+ 1 (+ (* 1/2 (/ (+ (* 2 (pow re 2)) (pow re 2)) (pow im 2))) (* 1/2 (/ (- (+ (* 2 (pow re 4)) (pow re 4)) (* 1/4 (pow (+ (* 2 (pow re 2)) (pow re 2)) 2))) (pow im 4)))))))
(*.f64 (+.f64 #s(literal 1 binary64) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 re re)) (*.f64 im im)) (/.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 re re) (*.f64 re re))))) (pow.f64 im #s(literal 4 binary64)))))) (*.f64 im (*.f64 #s(literal -1 binary64) (*.f64 im im))))
(* -1 (* (pow im 3) (+ 1 (+ (* 1/2 (/ (+ (* 2 (pow re 2)) (pow re 2)) (pow im 2))) (+ (* 1/2 (/ (- (+ (* 2 (pow re 4)) (pow re 4)) (* 1/4 (pow (+ (* 2 (pow re 2)) (pow re 2)) 2))) (pow im 4))) (* 1/2 (/ (- (pow re 6) (* 1/2 (* (+ (* 2 (pow re 2)) (pow re 2)) (- (+ (* 2 (pow re 4)) (pow re 4)) (* 1/4 (pow (+ (* 2 (pow re 2)) (pow re 2)) 2)))))) (pow im 6))))))))
(*.f64 (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 re re)) (*.f64 im im)) (/.f64 (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 re re) (*.f64 re re))))) (pow.f64 im #s(literal 4 binary64))))) (/.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (pow.f64 re #s(literal 6 binary64)) (*.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 3 binary64) (*.f64 re re))) (+.f64 (*.f64 #s(literal 3 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal -1/4 binary64) (*.f64 #s(literal 9 binary64) (*.f64 (*.f64 re re) (*.f64 re re)))))))) (pow.f64 im #s(literal 6 binary64))))) (*.f64 im (*.f64 #s(literal -1 binary64) (*.f64 im im))))

eval171.0ms (1.3%)

Compiler

Compiled 36077 to 3796 computations (89.5% saved)

prune120.0ms (0.9%)

Pruning

35 alts after pruning (28 fresh and 7 done)

PrunedKeptTotal
New86516881
Fresh11213
Picked325
Done055
Total86935904
Accuracy
90.0%
Counts
904 → 35
Alt Table
Click to see full alt table
StatusAccuracyProgram
▶16.7%
(pow.f64 (*.f64 re re) #s(literal 1/4 binary64))
▶11.9%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
✓51.9%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
✓79.8%
(*.f64 #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)))
51.6%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)) #s(literal 4 binary64)))
12.0%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (*.f64 re re)))) #s(literal 2 binary64)))
70.9%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (log.f64 (+.f64 re (hypot.f64 re im))) (log.f64 #s(literal 2 binary64)))) #s(literal 2 binary64)))
46.4%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 im #s(literal 2 binary64)))) #s(literal 2 binary64)))
12.3%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))))) (*.f64 re re))) #s(literal 2 binary64)))
13.3%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) #s(literal 2 binary64)))
48.5%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))) #s(literal 2 binary64)))
48.6%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 #s(literal 2 binary64) im)))))
13.0%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))))
▶46.3%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))
71.0%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))))
47.1%
(*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (*.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (*.f64 re re) im) im))) im)) (pow.f64 (-.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (/.f64 im re))) #s(literal 1/2 binary64))))
▶74.1%
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 re (hypot.f64 re im)))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))))
13.9%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (-.f64 (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))) (*.f64 (*.f64 re re) #s(literal 16 binary64))) (-.f64 (/.f64 (*.f64 im im) re) (*.f64 re #s(literal 4 binary64))))))
49.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 (-.f64 #s(literal 4 binary64) (*.f64 #s(literal 4 binary64) (/.f64 (/.f64 (*.f64 re re) im) im))) im) (-.f64 #s(literal 2 binary64) (/.f64 #s(literal 2 binary64) (/.f64 im re))))))
5.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 im im) re)))
29.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (-.f64 re (hypot.f64 re im)))))
4.1%
(*.f64 #s(literal 1/2 binary64) (sqrt.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 re re) (+.f64 #s(literal 3 binary64) (*.f64 #s(literal 3/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))))))
11.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))))
27.4%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 (/.f64 im re) im))))
✓52.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))))))
47.6%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (/.f64 (*.f64 re re) im) im)) im))))))))
11.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (/.f64 (*.f64 #s(literal 3 binary64) (*.f64 im im)) re) #s(literal -1/3 binary64))))
✓53.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im)))))
52.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
▶5.4%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.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)) re))))
✓80.4%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
✓54.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re))))
26.1%
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 (log.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 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))) #s(literal 1/2 binary64))))
48.8%
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) im)) #s(literal 1/2 binary64))))
✓27.3%
(sqrt.f64 re)
Compiler

Compiled 1198 to 823 computations (31.3% saved)

simplify196.0ms (1.5%)

Algorithm
1×egg-herbie
Localize:

Found 18 expressions of interest:

NewMetricScoreProgram
✓cost-diff0
(*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))
✓cost-diff0
(exp.f64 #s(literal 1/4 binary64))
✓cost-diff0
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))
✓cost-diff0
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
✓cost-diff0
(pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
✓cost-diff6464
(pow.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.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)) re))))
✓cost-diff128
(*.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))
✓cost-diff128
(*.f64 #s(literal 2 binary64) (+.f64 (*.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)) re))
✓cost-diff256
(+.f64 (*.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)) re)
✓cost-diff0
(*.f64 re re)
✓cost-diff0
(pow.f64 (*.f64 re re) #s(literal 1/4 binary64))
✓cost-diff0
(exp.f64 #s(literal 1/2 binary64))
✓cost-diff0
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 re (hypot.f64 re im))))
✓cost-diff0
(*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 re (hypot.f64 re im)))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))))
✓cost-diff0
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 re (hypot.f64 re im)))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))))
Rules
2446×*-lowering-*.f32
2446×*-lowering-*.f64
1744×fmsub-define
1568×fmm-def
1552×fma-lowering-fma.f32
Iterations

Useful iterations: 4 (0.0ms)

IterNodesCost
041274
196270
2181258
3471251
41956233
55487233
08401233
Stop Event
1×iter limit
1×node limit
Calls
Call 1
Inputs
(* 1/2 (* (pow (exp 1/2) (log (+ re (sqrt (+ (* re re) (* im im)))))) (pow (exp 1/2) (log 2))))
1/2
(* (pow (exp 1/2) (log (+ re (sqrt (+ (* re re) (* im im)))))) (pow (exp 1/2) (log 2)))
(pow (exp 1/2) (log (+ re (sqrt (+ (* re re) (* im im))))))
(exp 1/2)
(log (+ re (sqrt (+ (* re re) (* im im)))))
(+ re (sqrt (+ (* re re) (* im im))))
re
(sqrt (+ (* re re) (* im im)))
im
(pow (exp 1/2) (log 2))
(log 2)
2
(pow (* re re) 1/4)
(* re re)
re
1/4
(* 1/2 (sqrt (* 2 (+ (* (+ 1 (/ (/ (* 1/2 (* im im)) re) re)) (- 0 re)) re))))
1/2
(sqrt (* 2 (+ (* (+ 1 (/ (/ (* 1/2 (* im im)) re) re)) (- 0 re)) re)))
(* 2 (+ (* (+ 1 (/ (/ (* 1/2 (* im im)) re) re)) (- 0 re)) re))
2
(+ (* (+ 1 (/ (/ (* 1/2 (* im im)) re) re)) (- 0 re)) re)
(* (+ 1 (/ (/ (* 1/2 (* im im)) re) re)) (- 0 re))
(+ 1 (/ (/ (* 1/2 (* im im)) re) re))
1
(/ (/ (* 1/2 (* im im)) re) re)
(/ (* 1/2 (* im im)) re)
(* 1/2 (* im im))
(* im im)
im
re
(- 0 re)
0
(* 1/2 (pow (pow (- 0 (/ (* im im) re)) 1/4) 2))
1/2
(pow (pow (- 0 (/ (* im im) re)) 1/4) 2)
(pow (- 0 (/ (* im im) re)) 1/4)
(- 0 (/ (* im im) re))
0
(/ (* im im) re)
(* im im)
im
re
1/4
2
(* 1/2 (pow (exp 1/4) (* 2 (+ (log 2) (log im)))))
1/2
(pow (exp 1/4) (* 2 (+ (log 2) (log im))))
(exp 1/4)
1/4
(* 2 (+ (log 2) (log im)))
2
(+ (log 2) (log im))
(log 2)
(log im)
im
Outputs
(* 1/2 (* (pow (exp 1/2) (log (+ re (sqrt (+ (* re re) (* im im)))))) (pow (exp 1/2) (log 2))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 re (hypot.f64 re im)))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))))
1/2
#s(literal 1/2 binary64)
(* (pow (exp 1/2) (log (+ re (sqrt (+ (* re re) (* im im)))))) (pow (exp 1/2) (log 2)))
(*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 re (hypot.f64 re im)))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))))
(pow (exp 1/2) (log (+ re (sqrt (+ (* re re) (* im im))))))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 re (hypot.f64 re im))))
(exp 1/2)
(exp.f64 #s(literal 1/2 binary64))
(log (+ re (sqrt (+ (* re re) (* im im)))))
(log.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
(pow (exp 1/2) (log 2))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))
(log 2)
(log.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(pow (* re re) 1/4)
(pow.f64 (*.f64 re re) #s(literal 1/4 binary64))
(* re re)
(*.f64 re re)
re
1/4
#s(literal 1/4 binary64)
(* 1/2 (sqrt (* 2 (+ (* (+ 1 (/ (/ (* 1/2 (* im im)) re) re)) (- 0 re)) re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 re (/.f64 (*.f64 im im) re)) re))))
1/2
#s(literal 1/2 binary64)
(sqrt (* 2 (+ (* (+ 1 (/ (/ (* 1/2 (* im im)) re) re)) (- 0 re)) re)))
(sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 re (/.f64 (*.f64 im im) re)) re)))
(* 2 (+ (* (+ 1 (/ (/ (* 1/2 (* im im)) re) re)) (- 0 re)) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 re (/.f64 (*.f64 im im) re)) re))
2
#s(literal 2 binary64)
(+ (* (+ 1 (/ (/ (* 1/2 (* im im)) re) re)) (- 0 re)) re)
(/.f64 (*.f64 (*.f64 im im) (*.f64 re #s(literal -1/2 binary64))) (*.f64 re re))
(* (+ 1 (/ (/ (* 1/2 (* im im)) re) re)) (- 0 re))
(*.f64 re (+.f64 #s(literal -1 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re))))
(+ 1 (/ (/ (* 1/2 (* im im)) re) re))
(+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))
1
#s(literal 1 binary64)
(/ (/ (* 1/2 (* im im)) re) re)
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(/ (* 1/2 (* im im)) re)
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* 1/2 (* im im))
(*.f64 #s(literal 1/2 binary64) (*.f64 im im))
(* im im)
(*.f64 im im)
im
re
(- 0 re)
(-.f64 #s(literal 0 binary64) re)
0
#s(literal 0 binary64)
(* 1/2 (pow (pow (- 0 (/ (* im im) re)) 1/4) 2))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/2 binary64)))
1/2
#s(literal 1/2 binary64)
(pow (pow (- 0 (/ (* im im) re)) 1/4) 2)
(pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/2 binary64))
(pow (- 0 (/ (* im im) re)) 1/4)
(pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64))
(- 0 (/ (* im im) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
0
#s(literal 0 binary64)
(/ (* im im) re)
(/.f64 (*.f64 im im) re)
(* im im)
(*.f64 im im)
im
re
1/4
#s(literal 1/4 binary64)
2
#s(literal 2 binary64)
(* 1/2 (pow (exp 1/4) (* 2 (+ (log 2) (log im)))))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))
1/2
#s(literal 1/2 binary64)
(pow (exp 1/4) (* 2 (+ (log 2) (log im))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))
(exp 1/4)
(exp.f64 #s(literal 1/4 binary64))
1/4
#s(literal 1/4 binary64)
(* 2 (+ (log 2) (log im)))
(*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))
2
#s(literal 2 binary64)
(+ (log 2) (log im))
(+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))
(log 2)
(log.f64 #s(literal 2 binary64))
(log im)
(log.f64 im)
im

localize1.3s (9.9%)

Localize:

Found 18 expressions of interest:

NewMetricScoreProgram
✓accuracy100.0%
(log.f64 #s(literal 2 binary64))
✓accuracy100.0%
(exp.f64 #s(literal 1/4 binary64))
✓accuracy99.9%
(+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))
✓accuracy96.8%
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))
✓accuracy100.0%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
✓accuracy99.8%
(pow.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
✓accuracy97.8%
(/.f64 (*.f64 im im) re)
✓accuracy85.8%
(pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64))
✓accuracy97.8%
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
✓accuracy97.8%
(/.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re) re)
✓accuracy97.4%
(*.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))
✓accuracy89.4%
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.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)) re)))
✓accuracy100.0%
(*.f64 re re)
✓accuracy89.3%
(pow.f64 (*.f64 re re) #s(literal 1/4 binary64))
✓accuracy100.0%
(exp.f64 #s(literal 1/2 binary64))
✓accuracy99.9%
(+.f64 re (hypot.f64 re im))
✓accuracy99.8%
(*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 re (hypot.f64 re im)))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64))))
✓accuracy97.9%
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 re (hypot.f64 re im))))
Results
1.0s59×5exit
103.0ms132×0invalid
49.0ms65×0valid
Compiler

Compiled 316 to 41 computations (87% saved)

Precisions
Click to see histograms. Total time spent on operations: 894.0ms
ival-pow: 668.0ms (74.7% of total)
ival-exp: 49.0ms (5.5% of total)
ival-mult: 41.0ms (4.6% of total)
ival-log: 40.0ms (4.5% of total)
backward-pass: 36.0ms (4% of total)
compiled-spec: 15.0ms (1.7% of total)
ival-add: 13.0ms (1.5% of total)
ival-div: 12.0ms (1.3% of total)
ival-sqrt: 10.0ms (1.1% of total)
ival-sub: 8.0ms (0.9% of total)
const: 2.0ms (0.2% of total)

series309.0ms (2.4%)

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

114 calls:

TimeVariablePointExpression
82.0ms
re
@0
(pow (- 0 (/ (* im im) re)) 1/4)
57.0ms
im
@0
(* 1/2 (pow (exp 1/4) (* 2 (+ (log 2) (log im)))))
34.0ms
re
@0
(pow (* re re) 1/4)
31.0ms
im
@0
(* 1/2 (pow (pow (- 0 (/ (* im im) re)) 1/4) 2))
17.0ms
im
@inf
(* 1/2 (pow (exp 1/4) (* 2 (+ (log 2) (log im)))))

rewrite411.0ms (3.1%)

Algorithm
1×batch-egg-rewrite
Rules
5052×*-lowering-*.f32
5052×*-lowering-*.f64
2752×/-lowering-/.f32
2752×/-lowering-/.f64
2568×+-lowering-+.f64
Iterations

Useful iterations: 2 (0.0ms)

IterNodesCost
041201
1249192
21950178
09845178
Stop Event
1×iter limit
1×node limit
Counts
25 → 560
Calls
Call 1
Inputs
(* 1/2 (* (pow (exp 1/2) (log (+ re (sqrt (+ (* re re) (* im im)))))) (pow (exp 1/2) (log 2))))
(* (pow (exp 1/2) (log (+ re (sqrt (+ (* re re) (* im im)))))) (pow (exp 1/2) (log 2)))
(pow (exp 1/2) (log (+ re (sqrt (+ (* re re) (* im im))))))
(exp 1/2)
(pow (* re re) 1/4)
(* re re)
(+ (* (+ 1 (/ (/ (* 1/2 (* im im)) re) re)) (- 0 re)) re)
(* 2 (+ (* (+ 1 (/ (/ (* 1/2 (* im im)) re) re)) (- 0 re)) re))
(* (+ 1 (/ (/ (* 1/2 (* im im)) re) re)) (- 0 re))
(* 1/2 (sqrt (* 2 (+ (* (+ 1 (/ (/ (* 1/2 (* im im)) re) re)) (- 0 re)) re))))
(pow (pow (- 0 (/ (* im im) re)) 1/4) 2)
(* 1/2 (pow (pow (- 0 (/ (* im im) re)) 1/4) 2))
(pow (- 0 (/ (* im im) re)) 1/4)
(- 0 (/ (* im im) re))
(* 1/2 (pow (exp 1/4) (* 2 (+ (log 2) (log im)))))
(pow (exp 1/4) (* 2 (+ (log 2) (log im))))
(exp 1/4)
(* 2 (+ (log 2) (log im)))
(+ re (sqrt (+ (* re re) (* im im))))
(sqrt (* 2 (+ (* (+ 1 (/ (/ (* 1/2 (* im im)) re) re)) (- 0 re)) re)))
(/ (/ (* 1/2 (* im im)) re) re)
(/ (* 1/2 (* im im)) re)
(/ (* im im) re)
(+ (log 2) (log im))
(log 2)
Outputs
(*.f64 #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 re (hypot.f64 re im)) #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64))))
(*.f64 (*.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64))) #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) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))))
(exp.f64 (+.f64 (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))
(exp.f64 (+.f64 (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (log.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 (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64))) (log.f64 #s(literal 2 binary64))))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64))) (log.f64 #s(literal 2 binary64))))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (+.f64 (log.f64 (+.f64 re (hypot.f64 re im))) (+.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 (+.f64 (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 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 (*.f64 #s(literal 2 binary64) (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 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 (log.f64 (+.f64 re (hypot.f64 re im))) (*.f64 #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 (+.f64 (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64))) (*.f64 #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 (*.f64 #s(literal 2 binary64) (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64))) (*.f64 #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 (+.f64 (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (log.f64 (+.f64 re (hypot.f64 re im)))))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (log.f64 (+.f64 re (hypot.f64 re im)))))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (+.f64 (log.f64 #s(literal 2 binary64)) (+.f64 (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 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 (+.f64 (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 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 (*.f64 #s(literal 2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (+.f64 (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 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 #s(literal 2 binary64)) (*.f64 #s(literal 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 (+.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 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 (*.f64 #s(literal 2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 #s(literal 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 (/.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/4 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 binary64)) (+.f64 (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))
(pow.f64 (exp.f64 #s(literal 1 binary64)) (+.f64 (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #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 (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 (exp.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) #s(literal 2 binary64))
(pow.f64 (exp.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (log.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 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64))))
(*.f64 (pow.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (*.f64 (pow.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 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 (exp.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))) (exp.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))))))
(*.f64 (exp.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64))))) (exp.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64))))))
(*.f64 (*.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 (+.f64 re (hypot.f64 re im)) #s(literal 2 binary64)))))
(exp.f64 (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)))))
(exp.f64 (*.f64 (log.f64 (pow.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #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 re (hypot.f64 re im))) #s(literal 2 binary64))))
(exp.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (/.f64 (log.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 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)))))
(sqrt.f64 (exp.f64 (log.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)))))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 re (hypot.f64 re im))))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (+.f64 (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 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 #s(literal 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 (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) #s(literal 2 binary64)))
(pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (log.f64 (+.f64 re (hypot.f64 re im)))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)))))
(pow.f64 (pow.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #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 re (hypot.f64 re im))) #s(literal 2 binary64)))
(pow.f64 (pow.f64 (exp.f64 #s(literal 1 binary64)) #s(literal 1/2 binary64)) (log.f64 (+.f64 re (hypot.f64 re im))))
(pow.f64 (pow.f64 (exp.f64 #s(literal 1 binary64)) (log.f64 (+.f64 re (hypot.f64 re im)))) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 (log.f64 (+.f64 re (hypot.f64 re im)))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (+.f64 re (hypot.f64 re im)))) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (+.f64 re (hypot.f64 re im)))))
(*.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)))) (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)) (/.f64 (log.f64 (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)))))
(exp.f64 #s(literal 1/2 binary64))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) #s(literal 2 binary64))
(*.f64 (exp.f64 #s(literal 1/4 binary64)) (exp.f64 #s(literal 1/4 binary64)))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 2 binary64) (log.f64 re))))
(exp.f64 (*.f64 (log.f64 re) #s(literal 1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (*.f64 re (*.f64 re (*.f64 re re)))) #s(literal 1/8 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 re #s(literal 1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 re)) #s(literal 1/8 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 re) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 re)) #s(literal 1/8 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 re)) #s(literal 1/8 binary64))))
(exp.f64 (+.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 re)) #s(literal 1/8 binary64)) (*.f64 (log.f64 re) #s(literal 1/4 binary64))))
(exp.f64 (+.f64 (*.f64 (log.f64 re) #s(literal 1/4 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 re)) #s(literal 1/8 binary64))))
(exp.f64 (+.f64 (*.f64 (log.f64 re) #s(literal 1/4 binary64)) (*.f64 (log.f64 re) #s(literal 1/4 binary64))))
(sqrt.f64 re)
(pow.f64 re #s(literal 1/2 binary64))
(pow.f64 (*.f64 re re) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (log.f64 re)))
(pow.f64 (*.f64 re (*.f64 re (*.f64 re re))) #s(literal 1/8 binary64))
(pow.f64 (pow.f64 re #s(literal 1/4 binary64)) #s(literal 2 binary64))
(*.f64 (pow.f64 re #s(literal 1/4 binary64)) (pow.f64 re #s(literal 1/4 binary64)))
(*.f64 (pow.f64 re #s(literal 1/8 binary64)) (pow.f64 (*.f64 re (*.f64 re re)) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 (*.f64 re (*.f64 re re)) #s(literal 1/8 binary64)) (pow.f64 re #s(literal 1/8 binary64)))
(+.f64 (*.f64 re re) #s(literal 0 binary64))
(+.f64 #s(literal 0 binary64) (*.f64 re re))
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 re)))
(-.f64 (*.f64 re re) #s(literal 0 binary64))
(fma.f64 re re #s(literal 0 binary64))
(/.f64 (+.f64 #s(literal 0 binary64) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))) (+.f64 #s(literal 0 binary64) (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 #s(literal 0 binary64) (*.f64 re re)))))
(/.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))) #s(literal 0 binary64)) (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (-.f64 #s(literal 0 binary64) (*.f64 (*.f64 re re) #s(literal 0 binary64)))))
(/.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) #s(literal 0 binary64)) (*.f64 re re))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))
(pow.f64 re #s(literal 2 binary64))
(pow.f64 (*.f64 re re) #s(literal 1 binary64))
(pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 re)) #s(literal 2 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 re))
(*.f64 re re)
(*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 0 binary64) re))
(*.f64 (exp.f64 (log.f64 re)) (exp.f64 (log.f64 re)))
(+.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))
(+.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) re)
(-.f64 (/.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (-.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) re)) (/.f64 (*.f64 re re) (-.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) re)))
(fma.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re) re)
(fma.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) re)
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 re (-.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))))) (+.f64 (*.f64 re (*.f64 re re)) (*.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) re) (-.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 re re))))
(/.f64 (+.f64 (*.f64 re (*.f64 re re)) (*.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))) (+.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 re (-.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))))))
(/.f64 (+.f64 (*.f64 re (*.f64 re re)) (*.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))) (+.f64 (*.f64 re re) (-.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) re)))))
(/.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 re re)) (-.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) re))
(/.f64 (neg.f64 (+.f64 (*.f64 re (*.f64 re re)) (*.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))))) (neg.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 re (-.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))))))
(/.f64 (neg.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 re re))) (neg.f64 (-.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) re)))
(/.f64 (-.f64 (*.f64 re re) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))) (-.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))) (*.f64 re re))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))) re)) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))) re)))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 re re))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) re)) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) (*.f64 re re))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) re)))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 (*.f64 re re) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re))))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (*.f64 re re) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 re (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re))))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 re (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 re re)) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) re) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) (*.f64 re re))))) (*.f64 (-.f64 #s(literal 0 binary64) re) re))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re))))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re))))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))))) (-.f64 #s(literal 0 binary64) re)))) (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re))))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re)))) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (*.f64 re re)) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) re) (*.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))) (*.f64 (-.f64 #s(literal 0 binary64) re) re))
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))) (*.f64 re re))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))) (*.f64 re re))))
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))) re)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))) re)))
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 re re))) (*.f64 (*.f64 re re) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 (*.f64 re re) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 re re))))
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) re)) (*.f64 (*.f64 re re) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) (*.f64 re re))))) (*.f64 (*.f64 re re) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) re)))
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))))) (*.f64 (*.f64 re re) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))))))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))))))
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (*.f64 (*.f64 re re) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 (*.f64 re re) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re))))))) (*.f64 (*.f64 re re) (*.f64 (*.f64 re re) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))))) (*.f64 (*.f64 re re) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))))))) (*.f64 (*.f64 re re) (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))))))
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (*.f64 re (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 (*.f64 re re) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re))))))) (*.f64 (*.f64 re re) (*.f64 re (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (*.f64 re re)) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))))) (*.f64 re (*.f64 re (*.f64 re re))))
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) re) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) (*.f64 re re))))) (*.f64 re (*.f64 re re)))
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re))))) (*.f64 (*.f64 re re) (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))))))) (*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re))))))
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))) (*.f64 (*.f64 re re) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re))))))) (*.f64 (*.f64 re re) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))))) (-.f64 #s(literal 0 binary64) re)))) (*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re))))))
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))) (*.f64 (*.f64 re re) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re)))) (*.f64 (*.f64 re re) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (*.f64 re re)) (*.f64 (*.f64 re re) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))) (*.f64 re (*.f64 re (*.f64 re re))))
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) re) (*.f64 (*.f64 re re) (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))) (*.f64 re (*.f64 re re)))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re)) (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))) (*.f64 re re)) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))) (*.f64 re re)) (-.f64 #s(literal 0 binary64) re)))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re)) (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))) (*.f64 re re)) (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))) (*.f64 re re)) (*.f64 re re)))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))) re) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))) re) (-.f64 #s(literal 0 binary64) re)))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re re)) (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))) re) (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))) re) (*.f64 re re)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 re re)) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 re re)) (-.f64 #s(literal 0 binary64) re)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 re re)) (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 re re)) (*.f64 re re)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) re) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) re) (-.f64 #s(literal 0 binary64) re)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re re)) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) re) (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) re) (*.f64 re re)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))))) (-.f64 #s(literal 0 binary64) re)) (*.f64 (*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (*.f64 (*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re))))) (-.f64 #s(literal 0 binary64) re)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))))) (*.f64 re re)) (*.f64 (*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re))))) (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re))))) (*.f64 re re)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re))))) (-.f64 #s(literal 0 binary64) re)) (*.f64 (*.f64 (*.f64 re re) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (*.f64 (*.f64 (*.f64 re re) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re))))) (*.f64 re re)) (*.f64 (*.f64 (*.f64 re re) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))) (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 (*.f64 re re) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))) (*.f64 re re)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))))) (-.f64 #s(literal 0 binary64) re)) (*.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (*.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re))))) (-.f64 #s(literal 0 binary64) re)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))))) (*.f64 re re)) (*.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re))))) (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re))))) (*.f64 re re)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re))))) (-.f64 #s(literal 0 binary64) re)) (*.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (*.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re))))) (*.f64 re re)) (*.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))) (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 re (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))) (*.f64 re re)))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re)) (*.f64 (*.f64 re re) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re)) (*.f64 (*.f64 re re) (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 re (*.f64 re (*.f64 re re))))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) (*.f64 re (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (*.f64 re (-.f64 #s(literal 0 binary64) re)))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 re re)) (*.f64 re (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 re (*.f64 re re)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))))) (-.f64 #s(literal 0 binary64) re)) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))) (-.f64 #s(literal 0 binary64) re)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))))) (*.f64 re re)) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))) (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))) (*.f64 re re)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re))))) (-.f64 #s(literal 0 binary64) re)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re))))) (*.f64 re re)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 re re)))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))))) (-.f64 #s(literal 0 binary64) re)) (-.f64 #s(literal 0 binary64) re)) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))) (-.f64 #s(literal 0 binary64) re)))
(/.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))))) (-.f64 #s(literal 0 binary64) re)) (*.f64 re re)) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))) (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))) (*.f64 re re)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re)) (-.f64 #s(literal 0 binary64) re)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re)) (*.f64 re re)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 re re)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re)) (*.f64 (*.f64 re re) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))) (*.f64 re re)) (*.f64 (*.f64 re re) (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 re (*.f64 re (*.f64 re re))))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re)) (*.f64 re (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (*.f64 re (-.f64 #s(literal 0 binary64) re)))
(/.f64 (+.f64 (*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))) (*.f64 re re)) (*.f64 re (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 re (*.f64 re re)))
(pow.f64 (/.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 re (-.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))))) (+.f64 (*.f64 re (*.f64 re re)) (*.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) re) (-.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 re re))) #s(literal -1 binary64))
(*.f64 (+.f64 (*.f64 re (*.f64 re re)) (*.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))) (/.f64 #s(literal 1 binary64) (+.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 re (-.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))))))
(*.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 re re)) (/.f64 #s(literal 1 binary64) (-.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) re)))
(+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64))) (*.f64 re #s(literal 2 binary64)))
(+.f64 (*.f64 re #s(literal 2 binary64)) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64))))
(fma.f64 re #s(literal 2 binary64) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64))))
(fma.f64 #s(literal 2 binary64) re (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64))))
(fma.f64 #s(literal 2 binary64) (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 re #s(literal 2 binary64)))
(fma.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64)))
(fma.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) #s(literal 2 binary64) (*.f64 re #s(literal 2 binary64)))
(fma.f64 (-.f64 #s(literal 0 binary64) re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64)))
(fma.f64 (*.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re) (*.f64 re #s(literal 2 binary64)))
(fma.f64 (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) re)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 re #s(literal 2 binary64)))
(/.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))) #s(literal 8 binary64)) (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64))) (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 re #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64))) (*.f64 re #s(literal 2 binary64))))))
(/.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)))) (*.f64 (*.f64 re #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64)))) (-.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64))) (*.f64 re #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re (*.f64 re re)) (*.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))))) (+.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 re (-.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))))))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 re re))) (-.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) re))
(/.f64 (*.f64 (+.f64 (*.f64 re (*.f64 re re)) (*.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))) #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 re (-.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))))))
(/.f64 (*.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 re re)) #s(literal 2 binary64)) (-.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) re))
(*.f64 #s(literal 2 binary64) (+.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))))
(*.f64 (+.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))) #s(literal 2 binary64))
(+.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) #s(literal 0 binary64)) (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))
(+.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1 binary64)))
(+.f64 (*.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))) (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))
(+.f64 (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)) (*.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) (-.f64 #s(literal 0 binary64) re)))
(+.f64 (*.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) (-.f64 #s(literal 0 binary64) re)) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)))
(fma.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re) (*.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) (-.f64 #s(literal 0 binary64) re)))
(fma.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) (-.f64 #s(literal 0 binary64) re) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)))
(fma.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) #s(literal 0 binary64) (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))
(fma.f64 #s(literal 0 binary64) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))
(fma.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1 binary64) (*.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))
(fma.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1 binary64)))
(neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))
(neg.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) re))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))) (*.f64 re re)))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))) re))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 re re)))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) re))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))))) (*.f64 (*.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re))))) (*.f64 (*.f64 re re) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))))) (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re))))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re))))) (*.f64 re (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) (*.f64 re re))) re)
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re))))))) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re))))) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))
(/.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 re re) (*.f64 re (*.f64 re (*.f64 re re)))))) (-.f64 #s(literal 0 binary64) re)) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64)) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))))
(/.f64 (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re)) (-.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))) (*.f64 re re))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))) re)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(*.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 (+.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))))) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (+.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))))
(exp.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/4 binary64) (log.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))))))
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)))
(exp.f64 (log.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/2 binary64))))
(exp.f64 (*.f64 (log.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/2 binary64))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (/.f64 (*.f64 im im) re))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (*.f64 #s(literal 1/4 binary64) (log.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))))) #s(literal 1 binary64)))
(exp.f64 (*.f64 (*.f64 (log.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (/.f64 re (*.f64 im im)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))) (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (/.f64 (*.f64 im im) re) (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))))))
(/.f64 (sqrt.f64 (*.f64 im im)) (sqrt.f64 (-.f64 #s(literal 0 binary64) re)))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im))) (sqrt.f64 re))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im))) (sqrt.f64 (neg.f64 (-.f64 #s(literal 0 binary64) re))))
(/.f64 (sqrt.f64 (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))) (sqrt.f64 (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))))
(/.f64 (sqrt.f64 (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))) (sqrt.f64 (+.f64 #s(literal 0 binary64) (-.f64 (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))) (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)))))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))) (sqrt.f64 (/.f64 (*.f64 im im) re)))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)))))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 re (*.f64 im im))))
(/.f64 (sqrt.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 re (*.f64 re re)))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))))) (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/2 binary64)))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)))) (sqrt.f64 (-.f64 #s(literal 0 binary64) re)))
(pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/8 binary64)) #s(literal 4 binary64))
(pow.f64 (*.f64 (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))) #s(literal 1/8 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/4 binary64) (log.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)))))
(*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/8 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 3/8 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/8 binary64)) (pow.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 3/8 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 3/8 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 im #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (/.f64 im re)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 im im) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))) #s(literal 1/2 binary64)) (pow.f64 (/.f64 re (*.f64 im im)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (neg.f64 im) #s(literal 1/2 binary64)) (pow.f64 (/.f64 im re) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 1/2 binary64)) (pow.f64 (/.f64 (*.f64 im im) re) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 3/8 binary64)) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/8 binary64)))
(*.f64 (sqrt.f64 im) (sqrt.f64 (neg.f64 (/.f64 im re))))
(*.f64 (sqrt.f64 (*.f64 im im)) (sqrt.f64 (neg.f64 (/.f64 #s(literal 1 binary64) re))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(*.f64 (sqrt.f64 (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))))
(*.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))) (sqrt.f64 (/.f64 re (*.f64 im im))))
(*.f64 (sqrt.f64 (neg.f64 im)) (sqrt.f64 (/.f64 im re)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 (*.f64 im im) re)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(*.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64))) (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (log.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)))))
(exp.f64 (*.f64 (*.f64 (log.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))) #s(literal 1/8 binary64)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 (/.f64 (*.f64 im im) re))) #s(literal 1/8 binary64)))
(pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/4 binary64)) #s(literal 1 binary64))
(pow.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))))
(pow.f64 (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))) #s(literal 1/8 binary64))
(pow.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/8 binary64)) #s(literal 2 binary64))
(*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/8 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 im #s(literal 1/4 binary64)) (pow.f64 (neg.f64 (/.f64 im re)) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (*.f64 im im) #s(literal 1/4 binary64)) (pow.f64 (neg.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) #s(literal 1/4 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))) #s(literal 1/4 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))) #s(literal 1/4 binary64)) (pow.f64 (/.f64 re (*.f64 im im)) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (neg.f64 im) #s(literal 1/4 binary64)) (pow.f64 (/.f64 im re) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 #s(literal -1 binary64) #s(literal 1/4 binary64)) (pow.f64 (/.f64 (*.f64 im im) re) #s(literal 1/4 binary64)))
(+.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)))
(+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) #s(literal 0 binary64))
(exp.f64 (log.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))) (/.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 re (*.f64 re re))) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))))
(-.f64 (/.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) (/.f64 (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))) (/.f64 (*.f64 im im) re)))
(fma.f64 im (neg.f64 (/.f64 im re)) #s(literal 0 binary64))
(fma.f64 (*.f64 im im) (neg.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 0 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (/.f64 #s(literal 1 binary64) re) #s(literal 0 binary64))
(fma.f64 (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))) #s(literal 0 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))) (/.f64 re (*.f64 im im)) #s(literal 0 binary64))
(fma.f64 (neg.f64 im) (/.f64 im re) #s(literal 0 binary64))
(fma.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) re) #s(literal 0 binary64))
(neg.f64 (/.f64 (*.f64 im im) re))
(/.f64 (*.f64 im im) (-.f64 #s(literal 0 binary64) re))
(/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 re (*.f64 im im))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))) (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 im im) re) (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) re)
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (neg.f64 (-.f64 #s(literal 0 binary64) re)))
(/.f64 (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 re (*.f64 re re))) (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))
(/.f64 (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))) (+.f64 #s(literal 0 binary64) (-.f64 (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))) (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))))))
(/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))) (/.f64 (*.f64 im im) re))
(/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))))
(/.f64 #s(literal -1 binary64) (/.f64 re (*.f64 im im)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))) (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im))) (-.f64 #s(literal 0 binary64) re))
(/.f64 (exp.f64 (log.f64 (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))))) (exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (/.f64 (*.f64 im im) re)))))
(/.f64 (exp.f64 (log.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))))) (exp.f64 (log.f64 (/.f64 (*.f64 im im) re))))
(pow.f64 (neg.f64 (/.f64 re (*.f64 im im))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))) (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (*.f64 im im) re) (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))) #s(literal -1 binary64))
(*.f64 im (neg.f64 (/.f64 im re)))
(*.f64 (*.f64 im im) (neg.f64 (/.f64 #s(literal 1 binary64) re)))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (/.f64 #s(literal 1 binary64) re))
(*.f64 (*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))) (/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))))
(*.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))) (/.f64 re (*.f64 im im)))
(*.f64 (neg.f64 im) (/.f64 im re))
(*.f64 #s(literal -1 binary64) (/.f64 (*.f64 im im) re))
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 im #s(literal 2 binary64))))))
(*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 im #s(literal 2 binary64))))) #s(literal 1/2 binary64))
(*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 1 binary64)))) (*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 1 binary64)))) #s(literal 1/2 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 1 binary64))))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 1 binary64)))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 im #s(literal 2 binary64)))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 1 binary64))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 1 binary64)))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 2 binary64) (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 1 binary64)))))
(exp.f64 (*.f64 (log.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 1 binary64))))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 im #s(literal 2 binary64)))))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 1 binary64))) #s(literal 2 binary64)))
(exp.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 1 binary64))) (*.f64 #s(literal 1/4 binary64) (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 1 binary64)))))
(/.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (/.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 2 binary64) im)))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (/.f64 (pow.f64 (log.f64 im) #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 2 binary64) im)))))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (*.f64 im #s(literal 2 binary64))))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 1 binary64)))
(pow.f64 (exp.f64 #s(literal 1/2 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))) (log.f64 im)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (+.f64 (*.f64 #s(literal 2 binary64) (/.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (log.f64 im)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (+.f64 (log.f64 im) (+.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 (log.f64 im) (*.f64 #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 (/.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 2 binary64)) (/.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 2 binary64))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 im #s(literal 2 binary64)))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 1 binary64)) (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 1 binary64))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 #s(literal 2 binary64) (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 1 binary64))))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (*.f64 (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64)))
(pow.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 im #s(literal 2 binary64))))) #s(literal 1 binary64))
(pow.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 1 binary64)))) #s(literal 2 binary64))
(pow.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 im #s(literal 2 binary64))))) #s(literal 2 binary64))
(pow.f64 (exp.f64 #s(literal 1 binary64)) (/.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 2 binary64)))
(pow.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 im) #s(literal 3 binary64)))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 im) (log.f64 (/.f64 im #s(literal 2 binary64)))))))
(pow.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal 2 binary64) im)))) (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal 2 binary64) im))))
(pow.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 im #s(literal 2 binary64))))) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 (*.f64 im #s(literal 2 binary64))))) #s(literal 1/4 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 im))))
(*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 1 binary64)))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #s(literal 1 binary64)))))
(*.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 im #s(literal 2 binary64))))) (exp.f64 (*.f64 #s(literal 1/4 binary64) (log.f64 (*.f64 im #s(literal 2 binary64))))))
(*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 im))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 #s(literal 2 binary64))) #s(literal 1/4 binary64))) (exp.f64 (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) #s(literal 1/4 binary64))))
(exp.f64 #s(literal 1/4 binary64))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) #s(literal 1 binary64))
(+.f64 (*.f64 #s(literal 2 binary64) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (log.f64 im)))
(+.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (*.f64 #s(literal 2 binary64) (log.f64 #s(literal 2 binary64))))
(fma.f64 #s(literal 2 binary64) (log.f64 #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (log.f64 im)))
(fma.f64 #s(literal 2 binary64) (log.f64 im) (*.f64 #s(literal 2 binary64) (log.f64 #s(literal 2 binary64))))
(fma.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 im)))
(fma.f64 (log.f64 im) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (log.f64 #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (log.f64 #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) #s(literal 3 binary64))) (+.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (log.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) #s(literal 2 binary64)) (*.f64 (*.f64 #s(literal 2 binary64) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (log.f64 im))))))
(/.f64 (-.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (log.f64 #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) #s(literal 2 binary64))) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (log.f64 im))))
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 im) #s(literal 3 binary64)))) (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 im) (log.f64 (/.f64 im #s(literal 2 binary64))))))
(/.f64 (*.f64 #s(literal 2 binary64) (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal 2 binary64) im)))) (log.f64 (/.f64 #s(literal 2 binary64) im)))
(/.f64 (*.f64 (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 im) #s(literal 3 binary64))) #s(literal 2 binary64)) (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 im) (log.f64 (/.f64 im #s(literal 2 binary64))))))
(/.f64 (*.f64 (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal 2 binary64) im))) #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 2 binary64) im)))
(*.f64 #s(literal 2 binary64) (log.f64 (*.f64 im #s(literal 2 binary64))))
(*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) #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))) (/.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (-.f64 re (hypot.f64 re im))))
(fma.f64 (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)) re)
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.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 re (hypot.f64 re im)) (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im 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 (*.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 (neg.f64 (+.f64 (*.f64 re (*.f64 re re)) (pow.f64 (+.f64 (*.f64 re re) (*.f64 im im)) #s(literal 3/2 binary64)))) (neg.f64 (+.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.f64 re (hypot.f64 re im))))))
(/.f64 (neg.f64 (-.f64 (*.f64 re re) (+.f64 (*.f64 re re) (*.f64 im im)))) (neg.f64 (-.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 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(/.f64 (+.f64 (*.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (-.f64 #s(literal 0 binary64) re) (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))))) (*.f64 (-.f64 #s(literal 0 binary64) re) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))) (*.f64 (*.f64 re re) (hypot.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))))) (*.f64 (*.f64 re re) (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re)))))))
(/.f64 (+.f64 (*.f64 (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))) (*.f64 (*.f64 re re) (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))))) (*.f64 (*.f64 re re) (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im)))))
(/.f64 (+.f64 (*.f64 (hypot.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (-.f64 #s(literal 0 binary64) re)) (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (-.f64 #s(literal 0 binary64) re)))
(/.f64 (+.f64 (*.f64 (hypot.f64 (*.f64 re (*.f64 re re)) (*.f64 im (*.f64 im im))) (*.f64 re re)) (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (sqrt.f64 (+.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 (*.f64 im im) (-.f64 (*.f64 im im) (*.f64 re re))))) (*.f64 re re)))
(/.f64 (+.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (-.f64 #s(literal 0 binary64) re)) (*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (-.f64 #s(literal 0 binary64) re)))
(/.f64 (+.f64 (*.f64 (sqrt.f64 (-.f64 (*.f64 re (*.f64 re (*.f64 re re))) (*.f64 im (*.f64 im (*.f64 im im))))) (*.f64 re re)) (*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (+.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re))))) (*.f64 (sqrt.f64 (-.f64 (*.f64 re re) (*.f64 im im))) (*.f64 re re)))
(pow.f64 (/.f64 (+.f64 (*.f64 re re) (-.f64 (+.f64 (*.f64 re re) (*.f64 im im)) (*.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)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (-.f64 re (hypot.f64 re im)) (-.f64 (*.f64 re re) (+.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 #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 re) (+.f64 (*.f64 re re) (*.f64 im im))) (/.f64 #s(literal 1 binary64) (-.f64 re (hypot.f64 re im))))
(exp.f64 (*.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))))) #s(literal 1/2 binary64)))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))))
(/.f64 (sqrt.f64 (+.f64 (*.f64 (*.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))) #s(literal 8 binary64)) (*.f64 (*.f64 re (*.f64 re re)) #s(literal 8 binary64)))) (sqrt.f64 (+.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)))) (-.f64 (*.f64 (*.f64 re #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64))) (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64))) (*.f64 re #s(literal 2 binary64)))))))
(/.f64 (sqrt.f64 (-.f64 (*.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64))) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)))) (*.f64 (*.f64 re #s(literal 2 binary64)) (*.f64 re #s(literal 2 binary64))))) (sqrt.f64 (-.f64 (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64))) (*.f64 re #s(literal 2 binary64)))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re (*.f64 re re)) (*.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))))) (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 re (-.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))))))
(/.f64 (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 re re)))) (sqrt.f64 (-.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) re)))
(/.f64 (sqrt.f64 (*.f64 (+.f64 (*.f64 re (*.f64 re re)) (*.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))) #s(literal 2 binary64))) (sqrt.f64 (+.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 re (-.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))))))
(/.f64 (sqrt.f64 (*.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 re re)) #s(literal 2 binary64))) (sqrt.f64 (-.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) re)))
(pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))) (*.f64 #s(literal 2 binary64) (+.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))))))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (+.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))))
(*.f64 (sqrt.f64 (+.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))) #s(literal 1/4 binary64)) (pow.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (-.f64 #s(literal 0 binary64) re)))
(neg.f64 (/.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) re) re))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (*.f64 re re) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))))
(/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))
(/.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) re)
(/.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (neg.f64 (-.f64 #s(literal 0 binary64) re)))
(/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re re)))
(/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re (-.f64 #s(literal 0 binary64) re)))
(/.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) re) (-.f64 #s(literal 0 binary64) re))
(/.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 re (*.f64 im (*.f64 #s(literal 1/2 binary64) im))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re))))
(/.f64 (*.f64 #s(literal 1 binary64) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) (*.f64 re re))
(/.f64 (*.f64 #s(literal 1 binary64) (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) re)) (-.f64 #s(literal 0 binary64) re))
(/.f64 (*.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) #s(literal 1 binary64)) (*.f64 re re))
(/.f64 (*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) #s(literal 1 binary64)) re)
(/.f64 (*.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) re) re))
(pow.f64 (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (/.f64 re #s(literal 1/2 binary64)) (/.f64 (*.f64 im im) re)) #s(literal 1 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (*.f64 re re) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 (*.f64 im im) re) (/.f64 #s(literal 1 binary64) re)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re)))
(*.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (*.f64 im im) re) re))
(*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)))
(*.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (/.f64 #s(literal 1 binary64) (*.f64 re re)))
(*.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (/.f64 (/.f64 #s(literal 1 binary64) re) re))
(*.f64 (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (/.f64 #s(literal 1 binary64) re))
(*.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) #s(literal 1 binary64))
(*.f64 (/.f64 (*.f64 im im) re) (/.f64 #s(literal 1/2 binary64) re))
(*.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) re) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)))
(*.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (/.f64 im (*.f64 re re)))
(*.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (*.f64 im im) re))
(*.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) im) re) (/.f64 im re))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) re) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re))
(*.f64 (/.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) re) (-.f64 #s(literal 0 binary64) (*.f64 re re))) re)
(*.f64 (pow.f64 (/.f64 re (*.f64 (*.f64 im im) #s(literal -1/2 binary64))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)))
(exp.f64 (*.f64 (log.f64 (/.f64 re (*.f64 im (*.f64 #s(literal 1/2 binary64) im)))) #s(literal -1 binary64)))
(neg.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) re))
(/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im)))
(/.f64 #s(literal 1 binary64) (/.f64 re (*.f64 im (*.f64 #s(literal 1/2 binary64) im))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 re (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) #s(literal 1 binary64)))
(/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) re)
(/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (-.f64 #s(literal 0 binary64) re))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 re (*.f64 im (*.f64 #s(literal 1/2 binary64) im)))))
(/.f64 (*.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) #s(literal 1 binary64)) re)
(/.f64 (neg.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) re)))
(pow.f64 (/.f64 re (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 re (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 im im) re))
(*.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) re))
(*.f64 (*.f64 im im) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) re)))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))))
(*.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (/.f64 #s(literal 1 binary64) re))
(*.f64 (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re)) re)
(*.f64 (/.f64 (*.f64 im im) re) #s(literal 1/2 binary64))
(*.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)))
(*.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 im (*.f64 #s(literal 1/2 binary64) im)))
(*.f64 (/.f64 #s(literal 1 binary64) re) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 #s(literal 1/2 binary64) im))) #s(literal -1 binary64)))
(*.f64 (*.f64 #s(literal 1/2 binary64) im) (/.f64 im re))
(*.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re))
(+.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(+.f64 (/.f64 (*.f64 im im) re) #s(literal 0 binary64))
(exp.f64 (*.f64 (log.f64 (/.f64 re (*.f64 im im))) #s(literal -1 binary64)))
(fma.f64 im (/.f64 im re) #s(literal 0 binary64))
(fma.f64 (*.f64 im im) (/.f64 #s(literal 1 binary64) re) #s(literal 0 binary64))
(fma.f64 #s(literal 1 binary64) (/.f64 (*.f64 im im) re) #s(literal 0 binary64))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)) #s(literal 0 binary64))
(fma.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 im im) #s(literal 0 binary64))
(fma.f64 (/.f64 im re) im #s(literal 0 binary64))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re) #s(literal 0 binary64))
(fma.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (-.f64 #s(literal 0 binary64) (*.f64 re re))) re #s(literal 0 binary64))
(neg.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)))
(/.f64 (*.f64 im im) re)
(/.f64 #s(literal 1 binary64) (/.f64 re (*.f64 im im)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 re (*.f64 im im)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (-.f64 #s(literal 0 binary64) re))
(/.f64 (-.f64 #s(literal 0 binary64) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im)))) (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 re (*.f64 im im))))
(/.f64 (*.f64 (*.f64 im im) #s(literal 1 binary64)) re)
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im))) (neg.f64 (-.f64 #s(literal 0 binary64) re)))
(/.f64 (+.f64 #s(literal 0 binary64) (/.f64 (*.f64 (*.f64 im im) (*.f64 im (*.f64 im (*.f64 im im)))) (*.f64 re (*.f64 re re)))) (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))))
(pow.f64 (/.f64 re (*.f64 im im)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 re (*.f64 im im)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 im (/.f64 im re))
(*.f64 (*.f64 im im) (/.f64 #s(literal 1 binary64) re))
(*.f64 #s(literal 1 binary64) (/.f64 (*.f64 im im) re))
(*.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)))
(*.f64 (/.f64 #s(literal 1 binary64) re) (*.f64 im im))
(*.f64 (/.f64 #s(literal 1 binary64) re) (pow.f64 (/.f64 #s(literal 1 binary64) (*.f64 im im)) #s(literal -1 binary64)))
(*.f64 (/.f64 im re) im)
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (-.f64 #s(literal 0 binary64) (*.f64 re (*.f64 re re)))) (*.f64 re re))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (-.f64 #s(literal 0 binary64) (*.f64 re re))) re)
(log.f64 (*.f64 im #s(literal 2 binary64)))
(+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))
(+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64)))
(-.f64 (/.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 2 binary64) im))) (/.f64 (pow.f64 (log.f64 im) #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal 2 binary64) im))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 im) (log.f64 (/.f64 im #s(literal 2 binary64))))) (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 im) #s(literal 3 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (log.f64 (/.f64 #s(literal 2 binary64) im)) (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal 2 binary64) im)))))
(/.f64 (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 im) #s(literal 3 binary64))) (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 im) (log.f64 (/.f64 im #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 im) #s(literal 3 binary64))) (+.f64 (pow.f64 (log.f64 im) #s(literal 2 binary64)) (-.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))))
(/.f64 (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal 2 binary64) im))) (log.f64 (/.f64 #s(literal 2 binary64) im)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 im) #s(literal 3 binary64)))) (neg.f64 (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 im) (log.f64 (/.f64 im #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal 2 binary64) im)))) (log.f64 (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) im))))
(/.f64 (-.f64 (pow.f64 (log.f64 im) #s(literal 2 binary64)) (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64))) (log.f64 (/.f64 im #s(literal 2 binary64))))
(pow.f64 (/.f64 (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 im) (log.f64 (/.f64 im #s(literal 2 binary64))))) (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 im) #s(literal 3 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (log.f64 (/.f64 #s(literal 2 binary64) im)) (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal 2 binary64) im)))) #s(literal -1 binary64))
(*.f64 (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (log.f64 im) #s(literal 3 binary64))) (/.f64 #s(literal 1 binary64) (+.f64 (pow.f64 (log.f64 #s(literal 2 binary64)) #s(literal 2 binary64)) (*.f64 (log.f64 im) (log.f64 (/.f64 im #s(literal 2 binary64)))))))
(*.f64 (*.f64 (log.f64 (*.f64 im #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal 2 binary64) im))) (/.f64 #s(literal 1 binary64) (log.f64 (/.f64 #s(literal 2 binary64) im))))
(log.f64 #s(literal 2 binary64))

simplify412.0ms (3.1%)

Algorithm
1×egg-herbie
Rules
7686×*-lowering-*.f32
7686×*-lowering-*.f64
3738×+-lowering-+.f64
3738×+-lowering-+.f32
1820×fma-define
Iterations

Useful iterations: 1 (0.0ms)

IterNodesCost
06937255
123625926
086445926
Stop Event
1×iter limit
1×node limit
Counts
456 → 456
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 2) (* -1 (log (/ 1 re)))))) (sqrt 2)))
(+ (* 1/16 (/ (* (pow im 2) (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (sqrt 2))) (pow re 2))) (* 1/2 (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (sqrt 2))))
(+ (* 1/16 (/ (* (pow im 2) (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (sqrt 2))) (pow re 2))) (+ (* 1/2 (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (sqrt 2))) (* 1/2 (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (* (sqrt 2) (+ (* 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 2) (* -1 (log (/ 1 re)))))) (sqrt 2))) (pow re 2))) (+ (* 1/2 (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (sqrt 2))) (+ (* 1/2 (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (* (sqrt 2) (+ (* 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 2) (* -1 (log (/ 1 re)))))) (* (sqrt 2) (+ (* 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/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2)))
(+ (* -1/16 (/ (* (pow im 2) (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2))) (pow re 2))) (* 1/2 (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2))))
(+ (* -1/16 (/ (* (pow im 2) (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2))) (pow re 2))) (+ (* 1/2 (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2))) (* 1/2 (/ (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (* (sqrt 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/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2))) (pow re 2))) (+ (* 1/2 (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2))) (+ (* 1/2 (/ (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (* (sqrt 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/2 (pow im 2))) (log (/ -1 re))))) (* (sqrt 2) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))))) (pow re 4))))))
(* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))
(+ (* 1/16 (* (* (pow im 2) (pow (sqrt 2) 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) (+ (* -5/256 (* (* (pow im 2) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 7))))) (* 1/16 (* (sqrt (/ 1 (pow re 3))) (pow (sqrt 2) 2))))))
(+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* 1/16 (* (sqrt (/ 1 (pow re 3))) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* -5/256 (* (sqrt (/ 1 (pow re 7))) (pow (sqrt 2) 2))) (* 21/2048 (* (* (pow im 2) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 11))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* 1/4 (* (sqrt (/ 1 im)) (* re (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 (/ 1 (pow im 3))) (* (sqrt 2) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2)))))))))
(+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (+ (* 1/2 (* (sqrt im) (sqrt 2))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (sqrt 2) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))))) (* 1/2 (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (+ (* 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))))))))))))
(* 1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))))
(+ (* -1 (/ (+ (* -1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (* (sqrt 2) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2)))))))) (* 1/4 (* (sqrt im) (* re (* (sqrt -1) (sqrt 2)))))) im)) (* 1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (* (sqrt 2) (+ (* 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)))))))))) (* 1/2 (* (sqrt im) (* (sqrt -1) (* (sqrt 2) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))))))) im)) (* 1/4 (* (sqrt im) (* re (* (sqrt -1) (sqrt 2)))))) im)) (* 1/2 (* (sqrt 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)))
(* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (sqrt 2))
(+ (* 1/8 (/ (* (pow im 2) (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (sqrt 2))) (pow re 2))) (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (sqrt 2)))
(+ (* 1/8 (/ (* (pow im 2) (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (sqrt 2))) (pow re 2))) (+ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (sqrt 2)) (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (* (sqrt 2) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))))))) (pow re 4))))
(+ (* 1/8 (/ (* (pow im 2) (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (sqrt 2))) (pow re 2))) (+ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (sqrt 2)) (+ (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (* (sqrt 2) (+ (* 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 2) (* -1 (log (/ 1 re)))))) (* (sqrt 2) (+ (* 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/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2))
(+ (* -1/8 (/ (* (pow im 2) (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2))) (pow re 2))) (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2)))
(+ (* -1/8 (/ (* (pow im 2) (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2))) (pow re 2))) (+ (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2)) (/ (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (* (sqrt 2) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))))) (pow re 4))))
(+ (* -1/8 (/ (* (pow im 2) (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2))) (pow re 2))) (+ (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2)) (+ (/ (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (* (sqrt 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/2 (pow im 2))) (log (/ -1 re))))) (* (sqrt 2) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))))) (pow re 4)))))
(* (sqrt re) (pow (sqrt 2) 2))
(+ (* 1/8 (* (* (pow im 2) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (pow (sqrt 2) 2)))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* -5/128 (* (* (pow im 2) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 7))))) (* 1/8 (* (sqrt (/ 1 (pow re 3))) (pow (sqrt 2) 2))))))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* 1/8 (* (sqrt (/ 1 (pow re 3))) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* -5/128 (* (sqrt (/ 1 (pow re 7))) (pow (sqrt 2) 2))) (* 21/1024 (* (* (pow im 2) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 11))))))))))
(* (sqrt im) (sqrt 2))
(+ (* 1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* 1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (+ (* (sqrt im) (sqrt 2)) (* (sqrt (/ 1 (pow im 3))) (* (sqrt 2) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))))))
(+ (* 1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (+ (* (sqrt im) (sqrt 2)) (+ (* (sqrt (/ 1 (pow im 3))) (* (sqrt 2) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2)))))) (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (+ (* 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)))))))))))
(* (sqrt im) (* (sqrt -1) (sqrt 2)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(+ (* -1 (/ (+ (* -1 (* (sqrt (/ 1 im)) (* (sqrt -1) (* (sqrt 2) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2)))))))) (* 1/2 (* (sqrt im) (* re (* (sqrt -1) (sqrt 2)))))) im)) (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (sqrt (/ 1 im)) (* (sqrt -1) (* (sqrt 2) (+ (* 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)))))))))) (* (sqrt im) (* (sqrt -1) (* (sqrt 2) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2)))))))) im)) (* 1/2 (* (sqrt im) (* re (* (sqrt -1) (sqrt 2)))))) im)) (* (sqrt 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)))))))))
(exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re))))))
(+ (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (* 1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re))))))) (pow re 2))))
(+ (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (+ (* 1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re))))))) (pow re 2))) (/ (* (exp (* 1/2 (+ (log 2) (* -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 2) (* -1 (log (/ 1 re)))))) (+ (* 1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/2 (+ (log 2) (* -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 2) (* -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/2 (pow im 2))) (log (/ -1 re)))))
(+ (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (* -1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re)))))) (pow re 2))))
(+ (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (+ (* -1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re)))))) (pow re 2))) (/ (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))
(+ (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (+ (* -1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re)))))) (pow re 2))) (+ (/ (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (+ (* -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/2 (pow im 2))) (log (/ -1 re))))) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))
(* (sqrt re) (sqrt 2))
(+ (* 1/8 (* (* (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt 2)))
(+ (* (sqrt re) (sqrt 2)) (* (pow im 2) (+ (* -5/128 (* (* (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 7))))) (* 1/8 (* (sqrt (/ 1 (pow re 3))) (sqrt 2))))))
(+ (* (sqrt re) (sqrt 2)) (* (pow im 2) (+ (* 1/8 (* (sqrt (/ 1 (pow re 3))) (sqrt 2))) (* (pow im 2) (+ (* -5/128 (* (sqrt (/ 1 (pow re 7))) (sqrt 2))) (* 21/1024 (* (* (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 11))))))))))
(sqrt im)
(+ (sqrt im) (* 1/2 (* (sqrt (/ 1 im)) re)))
(+ (sqrt im) (+ (* 1/2 (* (sqrt (/ 1 im)) re)) (* (sqrt (/ 1 (pow im 3))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2)))))))
(+ (sqrt im) (+ (* 1/2 (* (sqrt (/ 1 im)) re)) (+ (* (sqrt (/ 1 (pow im 3))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))) (* (sqrt (/ 1 (pow im 5))) (+ (* 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))))))))))
(* (sqrt im) (sqrt -1))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt -1)))) (* (sqrt im) (sqrt -1)))
(+ (* -1 (/ (+ (* -1 (* (sqrt (/ 1 im)) (* (sqrt -1) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))))) (* 1/2 (* (sqrt im) (* re (sqrt -1))))) im)) (* (sqrt im) (sqrt -1)))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (sqrt (/ 1 im)) (* (sqrt -1) (+ (* 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))))))))) (* (sqrt im) (* (sqrt -1) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))))) im)) (* 1/2 (* (sqrt im) (* re (sqrt -1))))) im)) (* (sqrt im) (sqrt -1)))
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(* -1 (* (sqrt re) (sqrt -1)))
(* -1 (* (sqrt re) (sqrt -1)))
(* -1 (* (sqrt re) (sqrt -1)))
(* -1 (* (sqrt re) (sqrt -1)))
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(pow re 2)
(+ re (* -1 re))
(+ re (+ (* -1 re) (* -1/2 (/ (pow im 2) re))))
(+ re (+ (* -1 re) (* -1/2 (/ (pow im 2) re))))
(+ re (+ (* -1 re) (* -1/2 (/ (pow im 2) re))))
(* -1/2 (/ (pow im 2) re))
(* (pow im 2) (- (+ (* -1 (/ re (pow im 2))) (/ re (pow im 2))) (* 1/2 (/ 1 re))))
(* (pow im 2) (- (+ (* -1 (/ re (pow im 2))) (/ re (pow im 2))) (* 1/2 (/ 1 re))))
(* (pow im 2) (- (+ (* -1 (/ re (pow im 2))) (/ re (pow im 2))) (* 1/2 (/ 1 re))))
(* -1/2 (/ (pow im 2) re))
(* (pow im 2) (- (+ (* -1 (/ re (pow im 2))) (/ re (pow im 2))) (* 1/2 (/ 1 re))))
(* (pow im 2) (- (+ (* -1 (/ re (pow im 2))) (/ re (pow im 2))) (* 1/2 (/ 1 re))))
(* (pow im 2) (- (+ (* -1 (/ re (pow im 2))) (/ re (pow im 2))) (* 1/2 (/ 1 re))))
(* -1/2 (/ (pow im 2) re))
(* -1/2 (/ (pow im 2) re))
(* -1/2 (/ (pow im 2) re))
(* -1/2 (/ (pow im 2) re))
(* -1/2 (/ (pow im 2) re))
(* -1/2 (/ (pow im 2) re))
(* -1/2 (/ (pow im 2) re))
(* -1/2 (/ (pow im 2) re))
(* -1/2 (/ (pow im 2) re))
(* -1/2 (/ (pow im 2) re))
(* -1/2 (/ (pow im 2) re))
(* -1/2 (/ (pow im 2) re))
(* 2 (+ re (* -1 re)))
(+ (* -1 (/ (pow im 2) re)) (* 2 (+ re (* -1 re))))
(+ (* -1 (/ (pow im 2) re)) (* 2 (+ re (* -1 re))))
(+ (* -1 (/ (pow im 2) re)) (* 2 (+ re (* -1 re))))
(* -1 (/ (pow im 2) re))
(* (pow im 2) (- (* 2 (/ (+ re (* -1 re)) (pow im 2))) (/ 1 re)))
(* (pow im 2) (- (* 2 (/ (+ re (* -1 re)) (pow im 2))) (/ 1 re)))
(* (pow im 2) (- (* 2 (/ (+ re (* -1 re)) (pow im 2))) (/ 1 re)))
(* -1 (/ (pow im 2) re))
(* (pow im 2) (- (* 2 (/ (+ re (* -1 re)) (pow im 2))) (/ 1 re)))
(* (pow im 2) (- (* 2 (/ (+ re (* -1 re)) (pow im 2))) (/ 1 re)))
(* (pow im 2) (- (* 2 (/ (+ re (* -1 re)) (pow im 2))) (/ 1 re)))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 re)
(+ (* -1 re) (* -1/2 (/ (pow im 2) re)))
(+ (* -1 re) (* -1/2 (/ (pow im 2) re)))
(+ (* -1 re) (* -1/2 (/ (pow im 2) re)))
(* -1/2 (/ (pow im 2) re))
(* (pow im 2) (- (* -1 (/ re (pow im 2))) (* 1/2 (/ 1 re))))
(* (pow im 2) (- (* -1 (/ re (pow im 2))) (* 1/2 (/ 1 re))))
(* (pow im 2) (- (* -1 (/ re (pow im 2))) (* 1/2 (/ 1 re))))
(* -1/2 (/ (pow im 2) re))
(* (pow im 2) (- (* -1 (/ re (pow im 2))) (* 1/2 (/ 1 re))))
(* (pow im 2) (- (* -1 (/ re (pow im 2))) (* 1/2 (/ 1 re))))
(* (pow im 2) (- (* -1 (/ re (pow im 2))) (* 1/2 (/ 1 re))))
(* -1/2 (/ (pow im 2) re))
(/ (+ (* -1 (pow re 2)) (* -1/2 (pow im 2))) re)
(/ (+ (* -1 (pow re 2)) (* -1/2 (pow im 2))) re)
(/ (+ (* -1 (pow re 2)) (* -1/2 (pow im 2))) re)
(* -1 re)
(* re (- (* -1/2 (/ (pow im 2) (pow re 2))) 1))
(* re (- (* -1/2 (/ (pow im 2) (pow re 2))) 1))
(* re (- (* -1/2 (/ (pow im 2) (pow re 2))) 1))
(* -1 re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* 1/2 (* (sqrt 2) (sqrt (+ re (* -1 re)))))
(+ (* -1/8 (* (/ (* (pow im 2) (sqrt 2)) re) (sqrt (/ 1 (+ re (* -1 re)))))) (* 1/2 (* (sqrt 2) (sqrt (+ re (* -1 re))))))
(+ (* 1/2 (* (sqrt 2) (sqrt (+ re (* -1 re))))) (* (pow im 2) (+ (* -1/8 (* (/ (sqrt 2) re) (sqrt (/ 1 (+ re (* -1 re)))))) (* -1/64 (* (/ (* (pow im 2) (sqrt 2)) (pow re 2)) (sqrt (/ 1 (pow (+ re (* -1 re)) 3))))))))
(+ (* 1/2 (* (sqrt 2) (sqrt (+ re (* -1 re))))) (* (pow im 2) (+ (* -1/8 (* (/ (sqrt 2) re) (sqrt (/ 1 (+ re (* -1 re)))))) (* (pow im 2) (+ (* -1/64 (* (/ (sqrt 2) (pow re 2)) (sqrt (/ 1 (pow (+ re (* -1 re)) 3))))) (* -1/256 (* (/ (* (pow im 2) (sqrt 2)) (pow re 3)) (sqrt (/ 1 (pow (+ re (* -1 re)) 5))))))))))
(* 1/2 (* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* im (+ (* 1/4 (* (/ (* (sqrt 2) (+ re (* -1 re))) (* (pow im 2) (sqrt -1/2))) (sqrt re))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1/2) (sqrt 2))))))
(* im (+ (* -1/16 (* (/ (* (sqrt 2) (pow (+ re (* -1 re)) 2)) (* (pow im 4) (pow (sqrt -1/2) 3))) (sqrt (pow re 3)))) (+ (* 1/4 (* (/ (* (sqrt 2) (+ re (* -1 re))) (* (pow im 2) (sqrt -1/2))) (sqrt re))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1/2) (sqrt 2)))))))
(* im (+ (* -1/16 (* (/ (* (sqrt 2) (pow (+ re (* -1 re)) 2)) (* (pow im 4) (pow (sqrt -1/2) 3))) (sqrt (pow re 3)))) (+ (* 1/32 (* (/ (* (sqrt 2) (pow (+ re (* -1 re)) 3)) (* (pow im 6) (pow (sqrt -1/2) 5))) (sqrt (pow re 5)))) (+ (* 1/4 (* (/ (* (sqrt 2) (+ re (* -1 re))) (* (pow im 2) (sqrt -1/2))) (sqrt re))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1/2) (sqrt 2))))))))
(* -1/2 (* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* -1 (* im (+ (* 1/4 (* (/ (* (sqrt 2) (+ re (* -1 re))) (* (pow im 2) (sqrt -1/2))) (sqrt re))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1/2) (sqrt 2)))))))
(* -1 (* im (+ (* -1/16 (* (/ (* (sqrt 2) (pow (+ re (* -1 re)) 2)) (* (pow im 4) (pow (sqrt -1/2) 3))) (sqrt (pow re 3)))) (+ (* 1/4 (* (/ (* (sqrt 2) (+ re (* -1 re))) (* (pow im 2) (sqrt -1/2))) (sqrt re))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1/2) (sqrt 2))))))))
(* -1 (* im (+ (* -1/16 (* (/ (* (sqrt 2) (pow (+ re (* -1 re)) 2)) (* (pow im 4) (pow (sqrt -1/2) 3))) (sqrt (pow re 3)))) (+ (* 1/32 (* (/ (* (sqrt 2) (pow (+ re (* -1 re)) 3)) (* (pow im 6) (pow (sqrt -1/2) 5))) (sqrt (pow re 5)))) (+ (* 1/4 (* (/ (* (sqrt 2) (+ re (* -1 re))) (* (pow im 2) (sqrt -1/2))) (sqrt re))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1/2) (sqrt 2)))))))))
(* 1/2 (* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* -1 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* -1 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* -1 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* -1 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* 1/2 (* (* 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))))
(* (pow (/ -1 re) 1/4) (sqrt im))
(* (pow (/ -1 re) 1/4) (sqrt im))
(* (pow (/ -1 re) 1/4) (sqrt im))
(* (pow (/ -1 re) 1/4) (sqrt im))
(* (pow (/ -1 re) 1/4) (sqrt im))
(* (pow (/ -1 re) 1/4) (sqrt im))
(* (pow (/ -1 re) 1/4) (sqrt im))
(* (pow (/ -1 re) 1/4) (sqrt im))
(* -1 (* (pow (/ -1 re) 1/4) (* (sqrt im) (sqrt -1))))
(* -1 (* (pow (/ -1 re) 1/4) (* (sqrt im) (sqrt -1))))
(* -1 (* (pow (/ -1 re) 1/4) (* (sqrt im) (sqrt -1))))
(* -1 (* (pow (/ -1 re) 1/4) (* (sqrt im) (sqrt -1))))
(* (sqrt im) (exp (* 1/4 (+ (log -1) (* -1 (log re))))))
(* (sqrt im) (exp (* 1/4 (+ (log -1) (* -1 (log re))))))
(* (sqrt im) (exp (* 1/4 (+ (log -1) (* -1 (log re))))))
(* (sqrt im) (exp (* 1/4 (+ (log -1) (* -1 (log re))))))
(* (sqrt im) (exp (* 1/4 (+ (log -1) (log (/ 1 re))))))
(* (sqrt im) (exp (* 1/4 (+ (log -1) (log (/ 1 re))))))
(* (sqrt im) (exp (* 1/4 (+ (log -1) (log (/ 1 re))))))
(* (sqrt im) (exp (* 1/4 (+ (log -1) (log (/ 1 re))))))
(* (pow (/ -1 re) 1/4) (sqrt im))
(* (pow (/ -1 re) 1/4) (sqrt im))
(* (pow (/ -1 re) 1/4) (sqrt im))
(* (pow (/ -1 re) 1/4) (sqrt im))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* -1 (/ (pow im 2) re))
(* 1/2 (exp (* 1/2 (+ (log 2) (log im)))))
(* 1/2 (exp (* 1/2 (+ (log 2) (log im)))))
(* 1/2 (exp (* 1/2 (+ (log 2) (log im)))))
(* 1/2 (exp (* 1/2 (+ (log 2) (log im)))))
(* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))))
(* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))))
(* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))))
(* 1/2 (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im)))))))
(* 1/2 (exp (* 1/2 (+ (log -1) (+ (log 2) (* -1 (log (/ -1 im))))))))
(* 1/2 (exp (* 1/2 (+ (log -1) (+ (log 2) (* -1 (log (/ -1 im))))))))
(* 1/2 (exp (* 1/2 (+ (log -1) (+ (log 2) (* -1 (log (/ -1 im))))))))
(* 1/2 (exp (* 1/2 (+ (log -1) (+ (log 2) (* -1 (log (/ -1 im))))))))
(exp (* 1/2 (+ (log 2) (log im))))
(exp (* 1/2 (+ (log 2) (log im))))
(exp (* 1/2 (+ (log 2) (log im))))
(exp (* 1/2 (+ (log 2) (log im))))
(exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp (* 1/2 (+ (log -1) (+ (log 2) (* -1 (log (/ -1 im)))))))
(exp (* 1/2 (+ (log -1) (+ (log 2) (* -1 (log (/ -1 im)))))))
(exp (* 1/2 (+ (log -1) (+ (log 2) (* -1 (log (/ -1 im)))))))
(exp (* 1/2 (+ (log -1) (+ (log 2) (* -1 (log (/ -1 im)))))))
(* 2 (+ (log 2) (log im)))
(* 2 (+ (log 2) (log im)))
(* 2 (+ (log 2) (log im)))
(* 2 (+ (log 2) (log im)))
(* 2 (+ (log 2) (* -1 (log (/ 1 im)))))
(* 2 (+ (log 2) (* -1 (log (/ 1 im)))))
(* 2 (+ (log 2) (* -1 (log (/ 1 im)))))
(* 2 (+ (log 2) (* -1 (log (/ 1 im)))))
(* 2 (+ (log -1) (+ (log 2) (* -1 (log (/ -1 im))))))
(* 2 (+ (log -1) (+ (log 2) (* -1 (log (/ -1 im))))))
(* 2 (+ (log -1) (+ (log 2) (* -1 (log (/ -1 im))))))
(* 2 (+ (log -1) (+ (log 2) (* -1 (log (/ -1 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)))))
(* (sqrt 2) (sqrt (+ re (* -1 re))))
(+ (* -1/4 (* (/ (* (pow im 2) (sqrt 2)) re) (sqrt (/ 1 (+ re (* -1 re)))))) (* (sqrt 2) (sqrt (+ re (* -1 re)))))
(+ (* (sqrt 2) (sqrt (+ re (* -1 re)))) (* (pow im 2) (+ (* -1/4 (* (/ (sqrt 2) re) (sqrt (/ 1 (+ re (* -1 re)))))) (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (pow re 2)) (sqrt (/ 1 (pow (+ re (* -1 re)) 3))))))))
(+ (* (sqrt 2) (sqrt (+ re (* -1 re)))) (* (pow im 2) (+ (* -1/4 (* (/ (sqrt 2) re) (sqrt (/ 1 (+ re (* -1 re)))))) (* (pow im 2) (+ (* -1/32 (* (/ (sqrt 2) (pow re 2)) (sqrt (/ 1 (pow (+ re (* -1 re)) 3))))) (* -1/128 (* (/ (* (pow im 2) (sqrt 2)) (pow re 3)) (sqrt (/ 1 (pow (+ re (* -1 re)) 5))))))))))
(* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* im (+ (* 1/2 (* (/ (* (sqrt 2) (+ re (* -1 re))) (* (pow im 2) (sqrt -1/2))) (sqrt re))) (* (sqrt (/ 1 re)) (* (sqrt -1/2) (sqrt 2)))))
(* im (+ (* -1/8 (* (/ (* (sqrt 2) (pow (+ re (* -1 re)) 2)) (* (pow im 4) (pow (sqrt -1/2) 3))) (sqrt (pow re 3)))) (+ (* 1/2 (* (/ (* (sqrt 2) (+ re (* -1 re))) (* (pow im 2) (sqrt -1/2))) (sqrt re))) (* (sqrt (/ 1 re)) (* (sqrt -1/2) (sqrt 2))))))
(* im (+ (* -1/8 (* (/ (* (sqrt 2) (pow (+ re (* -1 re)) 2)) (* (pow im 4) (pow (sqrt -1/2) 3))) (sqrt (pow re 3)))) (+ (* 1/16 (* (/ (* (sqrt 2) (pow (+ re (* -1 re)) 3)) (* (pow im 6) (pow (sqrt -1/2) 5))) (sqrt (pow re 5)))) (+ (* 1/2 (* (/ (* (sqrt 2) (+ re (* -1 re))) (* (pow im 2) (sqrt -1/2))) (sqrt re))) (* (sqrt (/ 1 re)) (* (sqrt -1/2) (sqrt 2)))))))
(* -1 (* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* -1 (* im (+ (* 1/2 (* (/ (* (sqrt 2) (+ re (* -1 re))) (* (pow im 2) (sqrt -1/2))) (sqrt re))) (* (sqrt (/ 1 re)) (* (sqrt -1/2) (sqrt 2))))))
(* -1 (* im (+ (* -1/8 (* (/ (* (sqrt 2) (pow (+ re (* -1 re)) 2)) (* (pow im 4) (pow (sqrt -1/2) 3))) (sqrt (pow re 3)))) (+ (* 1/2 (* (/ (* (sqrt 2) (+ re (* -1 re))) (* (pow im 2) (sqrt -1/2))) (sqrt re))) (* (sqrt (/ 1 re)) (* (sqrt -1/2) (sqrt 2)))))))
(* -1 (* im (+ (* -1/8 (* (/ (* (sqrt 2) (pow (+ re (* -1 re)) 2)) (* (pow im 4) (pow (sqrt -1/2) 3))) (sqrt (pow re 3)))) (+ (* 1/16 (* (/ (* (sqrt 2) (pow (+ re (* -1 re)) 3)) (* (pow im 6) (pow (sqrt -1/2) 5))) (sqrt (pow re 5)))) (+ (* 1/2 (* (/ (* (sqrt 2) (+ re (* -1 re))) (* (pow im 2) (sqrt -1/2))) (sqrt re))) (* (sqrt (/ 1 re)) (* (sqrt -1/2) (sqrt 2))))))))
(* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* 1/2 (/ (pow im 2) (pow re 2)))
(* 1/2 (/ (pow im 2) (pow re 2)))
(* 1/2 (/ (pow im 2) (pow re 2)))
(* 1/2 (/ (pow im 2) (pow re 2)))
(* 1/2 (/ (pow im 2) (pow re 2)))
(* 1/2 (/ (pow im 2) (pow re 2)))
(* 1/2 (/ (pow im 2) (pow re 2)))
(* 1/2 (/ (pow im 2) (pow re 2)))
(* 1/2 (/ (pow im 2) (pow re 2)))
(* 1/2 (/ (pow im 2) (pow re 2)))
(* 1/2 (/ (pow im 2) (pow re 2)))
(* 1/2 (/ (pow im 2) (pow re 2)))
(* 1/2 (/ (pow im 2) (pow re 2)))
(* 1/2 (/ (pow im 2) (pow re 2)))
(* 1/2 (/ (pow im 2) (pow re 2)))
(* 1/2 (/ (pow im 2) (pow re 2)))
(* 1/2 (/ (pow im 2) (pow re 2)))
(* 1/2 (/ (pow im 2) (pow re 2)))
(* 1/2 (/ (pow im 2) (pow re 2)))
(* 1/2 (/ (pow im 2) (pow re 2)))
(* 1/2 (/ (pow im 2) (pow re 2)))
(* 1/2 (/ (pow im 2) (pow re 2)))
(* 1/2 (/ (pow im 2) (pow re 2)))
(* 1/2 (/ (pow im 2) (pow re 2)))
(* 1/2 (/ (pow im 2) re))
(* 1/2 (/ (pow im 2) re))
(* 1/2 (/ (pow im 2) re))
(* 1/2 (/ (pow im 2) re))
(* 1/2 (/ (pow im 2) re))
(* 1/2 (/ (pow im 2) re))
(* 1/2 (/ (pow im 2) re))
(* 1/2 (/ (pow im 2) re))
(* 1/2 (/ (pow im 2) re))
(* 1/2 (/ (pow im 2) re))
(* 1/2 (/ (pow im 2) re))
(* 1/2 (/ (pow im 2) re))
(* 1/2 (/ (pow im 2) re))
(* 1/2 (/ (pow im 2) re))
(* 1/2 (/ (pow im 2) re))
(* 1/2 (/ (pow im 2) re))
(* 1/2 (/ (pow im 2) re))
(* 1/2 (/ (pow im 2) re))
(* 1/2 (/ (pow im 2) re))
(* 1/2 (/ (pow im 2) re))
(* 1/2 (/ (pow im 2) re))
(* 1/2 (/ (pow im 2) re))
(* 1/2 (/ (pow im 2) re))
(* 1/2 (/ (pow im 2) re))
(/ (pow im 2) 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)
(+ (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 -1) (+ (log 2) (* -1 (log (/ -1 im)))))
(+ (log -1) (+ (log 2) (* -1 (log (/ -1 im)))))
(+ (log -1) (+ (log 2) (* -1 (log (/ -1 im)))))
(+ (log -1) (+ (log 2) (* -1 (log (/ -1 im)))))
Outputs
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 re (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/4 binary64)))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))))))
(+.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 re (+.f64 (*.f64 re (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/16 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) 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 (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 2) (* -1 (log (/ 1 re)))))) (sqrt 2)))
(*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 re)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/16 (/ (* (pow im 2) (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (sqrt 2))) (pow re 2))) (* 1/2 (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (sqrt 2))))
(+.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 re)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal 1/16 binary64) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 re)))) (*.f64 im im)))) (*.f64 re re)))
(+ (* 1/16 (/ (* (pow im 2) (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (sqrt 2))) (pow re 2))) (+ (* 1/2 (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (sqrt 2))) (* 1/2 (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (* (sqrt 2) (+ (* 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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 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 2 binary64)) (log.f64 re)))) (+.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.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 2) (* -1 (log (/ 1 re)))))) (sqrt 2))) (pow re 2))) (+ (* 1/2 (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (sqrt 2))) (+ (* 1/2 (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (* (sqrt 2) (+ (* 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 2) (* -1 (log (/ 1 re)))))) (* (sqrt 2) (+ (* 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 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 re)))) (*.f64 im im)))) (*.f64 re re)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 re))))) (+.f64 (*.f64 #s(literal 1/1440 binary64) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 75/2 binary64))) (+.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 #s(literal 1/3072 binary64) (pow.f64 im #s(literal 6 binary64)))))) (pow.f64 re #s(literal 6 binary64))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 re)))) (+.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.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/2 (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2)))
(*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+ (* -1/16 (/ (* (pow im 2) (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2))) (pow re 2))) (* 1/2 (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2))))
(+.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (*.f64 im (*.f64 im (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 re re)))
(+ (* -1/16 (/ (* (pow im 2) (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2))) (pow re 2))) (+ (* 1/2 (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2))) (* 1/2 (/ (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (* (sqrt 2) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/4 (pow im 4)) (* 3 (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 (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (*.f64 im (*.f64 im (sqrt.f64 #s(literal 2 binary64)))))) (*.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/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.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 (* 1/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2))) (pow re 2))) (+ (* 1/2 (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2))) (+ (* 1/2 (/ (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (* (sqrt 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/2 (pow im 2))) (log (/ -1 re))))) (* (sqrt 2) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/4 (pow im 4)) (* 3 (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 (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (*.f64 im (*.f64 im (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 re re)) (*.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64)) #s(literal -1/384 binary64))) (+.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal -1/3072 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 (pow.f64 im #s(literal 6 binary64)) #s(literal 5/384 binary64))))))) (pow.f64 re #s(literal 6 binary64))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.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/2 (* (sqrt re) (pow (sqrt 2) 2)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(+ (* 1/16 (* (* (pow im 2) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))))
(+.f64 (*.f64 #s(literal 1 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) (+ (* -5/256 (* (* (pow im 2) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 7))))) (* 1/16 (* (sqrt (/ 1 (pow re 3))) (pow (sqrt 2) 2))))))
(+.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 (*.f64 #s(literal -5/128 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) #s(literal 1/8 binary64)))))
(+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* 1/16 (* (sqrt (/ 1 (pow re 3))) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* -5/256 (* (sqrt (/ 1 (pow re 7))) (pow (sqrt 2) 2))) (* 21/2048 (* (* (pow im 2) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 11))))))))))
(+.f64 (*.f64 #s(literal 1 binary64) (sqrt.f64 re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) #s(literal 1/8 binary64)) (*.f64 (*.f64 im im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) #s(literal -5/128 binary64)) (*.f64 (*.f64 #s(literal 21/1024 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 11 binary64))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (*.f64 re (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/4 binary64)))))
(+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (sqrt 2) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2)))))))))
(+.f64 (*.f64 re (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 re re) #s(literal 1/8 binary64)) #s(literal 0 binary64)))))))
(+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (+ (* 1/2 (* (sqrt im) (sqrt 2))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (sqrt 2) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))))) (* 1/2 (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (+ (* 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))))))))))))
(+.f64 (*.f64 re (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/4 binary64)))) (*.f64 #s(literal 1/2 binary64) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 re re) #s(literal 1/8 binary64)) #s(literal 0 binary64)))) (+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/12 binary64)) #s(literal 0 binary64)))))))))
(* 1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(*.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))))
(+.f64 (*.f64 (*.f64 (sqrt.f64 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) im)) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) #s(literal -1/4 binary64))))
(+ (* -1 (/ (+ (* -1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (* (sqrt 2) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2)))))))) (* 1/4 (* (sqrt im) (* re (* (sqrt -1) (sqrt 2)))))) im)) (* 1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))))
(-.f64 (*.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (+.f64 (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/8 binary64)) #s(literal 0 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal -1/2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 im) #s(literal 1/4 binary64)))) im))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (* (sqrt 2) (+ (* 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)))))))))) (* 1/2 (* (sqrt im) (* (sqrt -1) (* (sqrt 2) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))))))) im)) (* 1/4 (* (sqrt im) (* re (* (sqrt -1) (sqrt 2)))))) im)) (* 1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))))
(-.f64 (*.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 im) #s(literal 1/4 binary64))) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/12 binary64)) #s(literal 0 binary64)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))) (*.f64 (*.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/8 binary64)) #s(literal 0 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 im) #s(literal 1/2 binary64)))) 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 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/2 binary64) re)))
(+ (* re (+ (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 re (+.f64 (*.f64 (*.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)) (*.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 2) (* -1 (log (/ 1 re)))))) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 re)))))
(+ (* 1/8 (/ (* (pow im 2) (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (sqrt 2))) (pow re 2))) (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 re))))) (*.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 im im)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 re))))) (*.f64 re re))))
(+ (* 1/8 (/ (* (pow im 2) (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (sqrt 2))) (pow re 2))) (+ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (sqrt 2)) (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (* (sqrt 2) (+ (* 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/8 binary64) (*.f64 im im)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 re))))) (*.f64 re re))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 re)))) (+.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.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/8 (/ (* (pow im 2) (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (sqrt 2))) (pow re 2))) (+ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (sqrt 2)) (+ (/ (* (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (* (sqrt 2) (+ (* 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 2) (* -1 (log (/ 1 re)))))) (* (sqrt 2) (+ (* 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/8 binary64) (*.f64 im im)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 re))))) (*.f64 re re))) (+.f64 (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 re))))) (+.f64 (*.f64 #s(literal 1/1440 binary64) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 75/2 binary64))) (+.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 #s(literal 1/3072 binary64) (pow.f64 im #s(literal 6 binary64)))))) (pow.f64 re #s(literal 6 binary64))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 re)))) (+.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.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 (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re))))))
(+ (* -1/8 (/ (* (pow im 2) (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2))) (pow re 2))) (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re)))))) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (*.f64 im (*.f64 im (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 re re)))
(+ (* -1/8 (/ (* (pow im 2) (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2))) (pow re 2))) (+ (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2)) (/ (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (* (sqrt 2) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))))) (pow re 4))))
(+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (*.f64 im (*.f64 im (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 re re)) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.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/8 (/ (* (pow im 2) (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2))) (pow re 2))) (+ (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (sqrt 2)) (+ (/ (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (* (sqrt 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/2 (pow im 2))) (log (/ -1 re))))) (* (sqrt 2) (+ (* 1/128 (pow im 4)) (* 1/48 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))))) (pow re 4)))))
(+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (*.f64 im (*.f64 im (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 re re)) (+.f64 (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (*.f64 (*.f64 im im) (*.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64)) #s(literal -1/384 binary64))) (+.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal -1/3072 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 (pow.f64 im #s(literal 6 binary64)) #s(literal 5/384 binary64))))))) (pow.f64 re #s(literal 6 binary64))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.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)))))))
(* (sqrt re) (pow (sqrt 2) 2))
(*.f64 #s(literal 2 binary64) (sqrt.f64 re))
(+ (* 1/8 (* (* (pow im 2) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (pow (sqrt 2) 2)))
(+.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))))))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* -5/128 (* (* (pow im 2) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 7))))) (* 1/8 (* (sqrt (/ 1 (pow re 3))) (pow (sqrt 2) 2))))))
(+.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))))))))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* 1/8 (* (sqrt (/ 1 (pow re 3))) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* -5/128 (* (sqrt (/ 1 (pow re 7))) (pow (sqrt 2) 2))) (* 21/1024 (* (* (pow im 2) (pow (sqrt 2) 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)))
(+ (* 1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/2 binary64) re)))
(+ (* 1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (+ (* (sqrt im) (sqrt 2)) (* (sqrt (/ 1 (pow im 3))) (* (sqrt 2) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))))))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/2 binary64) re)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 re re) #s(literal 1/8 binary64)) #s(literal 0 binary64))))))
(+ (* 1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (+ (* (sqrt im) (sqrt 2)) (+ (* (sqrt (/ 1 (pow im 3))) (* (sqrt 2) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2)))))) (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (+ (* 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)))))))))))
(+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (*.f64 #s(literal 1/2 binary64) re)) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 (*.f64 re re) #s(literal 1/8 binary64)) #s(literal 0 binary64)))) (+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/12 binary64)) #s(literal 0 binary64))))))))
(* (sqrt im) (* (sqrt -1) (sqrt 2)))
(*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(+.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal -1/2 binary64))))
(+ (* -1 (/ (+ (* -1 (* (sqrt (/ 1 im)) (* (sqrt -1) (* (sqrt 2) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2)))))))) (* 1/2 (* (sqrt im) (* re (* (sqrt -1) (sqrt 2)))))) im)) (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(-.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 im) #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/8 binary64)) #s(literal 0 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) im))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (sqrt (/ 1 im)) (* (sqrt -1) (* (sqrt 2) (+ (* 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)))))))))) (* (sqrt im) (* (sqrt -1) (* (sqrt 2) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2)))))))) im)) (* 1/2 (* (sqrt im) (* re (* (sqrt -1) (sqrt 2)))))) im)) (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(-.f64 (*.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (-.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 im) #s(literal 1/2 binary64))) (/.f64 (-.f64 (*.f64 (sqrt.f64 im) (*.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/8 binary64)) #s(literal 0 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/12 binary64)) #s(literal 0 binary64)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))) im)) 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 #s(literal 1/8 binary64) re)) (*.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)))))))
(exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re))))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 re))))
(+ (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (* 1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re))))))) (pow re 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 re)))) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 re)))) (*.f64 im im))) (*.f64 re re)))
(+ (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (+ (* 1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re))))))) (pow re 2))) (/ (* (exp (* 1/2 (+ (log 2) (* -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 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 re)))) (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 re)))) (*.f64 im im))) (*.f64 re re))) (/.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 re)))) (+.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 (* 1/2 (+ (log 2) (* -1 (log (/ 1 re)))))) (+ (* 1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log 2) (* -1 (log (/ 1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/2 (+ (log 2) (* -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 2) (* -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 2 binary64)) (log.f64 re)))) (+.f64 (/.f64 (*.f64 #s(literal 1/8 binary64) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 re)))) (*.f64 im im))) (*.f64 re re)) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 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/1440 binary64) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 75/2 binary64))) (+.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 #s(literal 1/3072 binary64) (pow.f64 im #s(literal 6 binary64))))) (pow.f64 re #s(literal 6 binary64)))))))
(exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re)))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re)))))
(+ (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (* -1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re)))))) (pow re 2))))
(+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (/.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/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re)))))) (*.f64 re re)))
(+ (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (+ (* -1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re)))))) (pow re 2))) (/ (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (+ (* 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/8 binary64) (*.f64 im im)) (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re)))))) (*.f64 re re)) (+.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) 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))))))
(+ (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (+ (* -1/8 (/ (* (pow im 2) (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re)))))) (pow re 2))) (+ (/ (* (exp (* 1/2 (+ (log (* 1/2 (pow im 2))) (log (/ -1 re))))) (+ (* -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/2 (pow im 2))) (log (/ -1 re))))) (+ (* 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/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (/.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/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re)))))) (*.f64 re re))) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) 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 (*.f64 im im) (*.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64)) #s(literal -1/384 binary64))) (+.f64 (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal -1/3072 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 (pow.f64 im #s(literal 6 binary64)) #s(literal 5/384 binary64))))) (pow.f64 re #s(literal 6 binary64))))))
(* (sqrt re) (sqrt 2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 re))
(+ (* 1/8 (* (* (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/8 binary64) (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re))))))))
(+ (* (sqrt re) (sqrt 2)) (* (pow im 2) (+ (* -5/128 (* (* (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 7))))) (* 1/8 (* (sqrt (/ 1 (pow re 3))) (sqrt 2))))))
(+.f64 (*.f64 (sqrt.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 (*.f64 im (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) #s(literal -5/128 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/8 binary64))))))
(+ (* (sqrt re) (sqrt 2)) (* (pow im 2) (+ (* 1/8 (* (sqrt (/ 1 (pow re 3))) (sqrt 2))) (* (pow im 2) (+ (* -5/128 (* (sqrt (/ 1 (pow re 7))) (sqrt 2))) (* 21/1024 (* (* (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 11))))))))))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 re)) (*.f64 (*.f64 im im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 re (*.f64 re re)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/8 binary64))) (*.f64 (*.f64 im im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -5/128 binary64))) (*.f64 (*.f64 (*.f64 #s(literal 21/1024 binary64) (*.f64 im im)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 11 binary64))))))))))
(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) (+ (* 1/2 (* (sqrt (/ 1 im)) re)) (* (sqrt (/ 1 (pow im 3))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2)))))))
(+.f64 (sqrt.f64 im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal 1/2 binary64) re)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 1/8 binary64)) #s(literal 0 binary64)))))
(+ (sqrt im) (+ (* 1/2 (* (sqrt (/ 1 im)) re)) (+ (* (sqrt (/ 1 (pow im 3))) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))) (* (sqrt (/ 1 (pow im 5))) (+ (* 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))))))))))
(+.f64 (sqrt.f64 im) (+.f64 (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 #s(literal 1/2 binary64) re)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (*.f64 im (*.f64 im im)))) (+.f64 (*.f64 (*.f64 re re) #s(literal 1/8 binary64)) #s(literal 0 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/12 binary64)) #s(literal 0 binary64))))))
(* (sqrt im) (sqrt -1))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -1 binary64)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt -1)))) (* (sqrt im) (sqrt -1)))
(+.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) #s(literal -1/2 binary64))))
(+ (* -1 (/ (+ (* -1 (* (sqrt (/ 1 im)) (* (sqrt -1) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))))) (* 1/2 (* (sqrt im) (* re (sqrt -1))))) im)) (* (sqrt im) (sqrt -1)))
(-.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (-.f64 (*.f64 (sqrt.f64 im) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64))) (*.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/8 binary64)) #s(literal 0 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))) im))
(+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (sqrt (/ 1 im)) (* (sqrt -1) (+ (* 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))))))))) (* (sqrt im) (* (sqrt -1) (+ (* 1/8 (pow re 2)) (* 1/4 (+ (* -1 (pow re 2)) (pow re 2))))))) im)) (* 1/2 (* (sqrt im) (* re (sqrt -1))))) im)) (* (sqrt im) (sqrt -1)))
(-.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (-.f64 (*.f64 (sqrt.f64 im) (*.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64))) (/.f64 (-.f64 (*.f64 (+.f64 (*.f64 (*.f64 re re) #s(literal 1/8 binary64)) #s(literal 0 binary64)) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -1 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (+.f64 (*.f64 #s(literal 1/48 binary64) (*.f64 re (*.f64 re re))) (+.f64 (*.f64 (*.f64 re (*.f64 re re)) #s(literal -1/12 binary64)) #s(literal 0 binary64))) (sqrt.f64 #s(literal -1 binary64))))) im)) 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) (sqrt -1)))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64)))
(* -1 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64)))
(* -1 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64)))
(* -1 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -1 binary64)))
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(pow re 2)
(*.f64 re re)
(+ re (* -1 re))
#s(literal 0 binary64)
(+ re (+ (* -1 re) (* -1/2 (/ (pow im 2) re))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) re)) #s(literal 0 binary64))
(+ re (+ (* -1 re) (* -1/2 (/ (pow im 2) re))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) re)) #s(literal 0 binary64))
(+ re (+ (* -1 re) (* -1/2 (/ (pow im 2) re))))
(+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) re)) #s(literal 0 binary64))
(* -1/2 (/ (pow im 2) re))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) re))
(* (pow im 2) (- (+ (* -1 (/ re (pow im 2))) (/ re (pow im 2))) (* 1/2 (/ 1 re))))
(*.f64 im (*.f64 im (/.f64 #s(literal -1/2 binary64) re)))
(* (pow im 2) (- (+ (* -1 (/ re (pow im 2))) (/ re (pow im 2))) (* 1/2 (/ 1 re))))
(*.f64 im (*.f64 im (/.f64 #s(literal -1/2 binary64) re)))
(* (pow im 2) (- (+ (* -1 (/ re (pow im 2))) (/ re (pow im 2))) (* 1/2 (/ 1 re))))
(*.f64 im (*.f64 im (/.f64 #s(literal -1/2 binary64) re)))
(* -1/2 (/ (pow im 2) re))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) re))
(* (pow im 2) (- (+ (* -1 (/ re (pow im 2))) (/ re (pow im 2))) (* 1/2 (/ 1 re))))
(*.f64 im (*.f64 im (/.f64 #s(literal -1/2 binary64) re)))
(* (pow im 2) (- (+ (* -1 (/ re (pow im 2))) (/ re (pow im 2))) (* 1/2 (/ 1 re))))
(*.f64 im (*.f64 im (/.f64 #s(literal -1/2 binary64) re)))
(* (pow im 2) (- (+ (* -1 (/ re (pow im 2))) (/ re (pow im 2))) (* 1/2 (/ 1 re))))
(*.f64 im (*.f64 im (/.f64 #s(literal -1/2 binary64) re)))
(* -1/2 (/ (pow im 2) re))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) re))
(* -1/2 (/ (pow im 2) re))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) re))
(* -1/2 (/ (pow im 2) re))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) re))
(* -1/2 (/ (pow im 2) re))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) re))
(* -1/2 (/ (pow im 2) re))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) re))
(* -1/2 (/ (pow im 2) re))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) re))
(* -1/2 (/ (pow im 2) re))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) re))
(* -1/2 (/ (pow im 2) re))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) re))
(* -1/2 (/ (pow im 2) re))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) re))
(* -1/2 (/ (pow im 2) re))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) re))
(* -1/2 (/ (pow im 2) re))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) re))
(* -1/2 (/ (pow im 2) re))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) re))
(* 2 (+ re (* -1 re)))
#s(literal 0 binary64)
(+ (* -1 (/ (pow im 2) re)) (* 2 (+ re (* -1 re))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(+ (* -1 (/ (pow im 2) re)) (* 2 (+ re (* -1 re))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(+ (* -1 (/ (pow im 2) re)) (* 2 (+ re (* -1 re))))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* (pow im 2) (- (* 2 (/ (+ re (* -1 re)) (pow im 2))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 0 binary64) (*.f64 im im)) (/.f64 #s(literal -1 binary64) re)))
(* (pow im 2) (- (* 2 (/ (+ re (* -1 re)) (pow im 2))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 0 binary64) (*.f64 im im)) (/.f64 #s(literal -1 binary64) re)))
(* (pow im 2) (- (* 2 (/ (+ re (* -1 re)) (pow im 2))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 0 binary64) (*.f64 im im)) (/.f64 #s(literal -1 binary64) re)))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* (pow im 2) (- (* 2 (/ (+ re (* -1 re)) (pow im 2))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 0 binary64) (*.f64 im im)) (/.f64 #s(literal -1 binary64) re)))
(* (pow im 2) (- (* 2 (/ (+ re (* -1 re)) (pow im 2))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 0 binary64) (*.f64 im im)) (/.f64 #s(literal -1 binary64) re)))
(* (pow im 2) (- (* 2 (/ (+ re (* -1 re)) (pow im 2))) (/ 1 re)))
(*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 0 binary64) (*.f64 im im)) (/.f64 #s(literal -1 binary64) re)))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(+ (* -1 re) (* -1/2 (/ (pow im 2) re)))
(-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) re)) re)
(+ (* -1 re) (* -1/2 (/ (pow im 2) re)))
(-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) re)) re)
(+ (* -1 re) (* -1/2 (/ (pow im 2) re)))
(-.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) re)) re)
(* -1/2 (/ (pow im 2) re))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) re))
(* (pow im 2) (- (* -1 (/ re (pow im 2))) (* 1/2 (/ 1 re))))
(*.f64 (*.f64 im im) (+.f64 (/.f64 re (*.f64 #s(literal -1 binary64) (*.f64 im im))) (/.f64 #s(literal -1/2 binary64) re)))
(* (pow im 2) (- (* -1 (/ re (pow im 2))) (* 1/2 (/ 1 re))))
(*.f64 (*.f64 im im) (+.f64 (/.f64 re (*.f64 #s(literal -1 binary64) (*.f64 im im))) (/.f64 #s(literal -1/2 binary64) re)))
(* (pow im 2) (- (* -1 (/ re (pow im 2))) (* 1/2 (/ 1 re))))
(*.f64 (*.f64 im im) (+.f64 (/.f64 re (*.f64 #s(literal -1 binary64) (*.f64 im im))) (/.f64 #s(literal -1/2 binary64) re)))
(* -1/2 (/ (pow im 2) re))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) re))
(* (pow im 2) (- (* -1 (/ re (pow im 2))) (* 1/2 (/ 1 re))))
(*.f64 (*.f64 im im) (+.f64 (/.f64 re (*.f64 #s(literal -1 binary64) (*.f64 im im))) (/.f64 #s(literal -1/2 binary64) re)))
(* (pow im 2) (- (* -1 (/ re (pow im 2))) (* 1/2 (/ 1 re))))
(*.f64 (*.f64 im im) (+.f64 (/.f64 re (*.f64 #s(literal -1 binary64) (*.f64 im im))) (/.f64 #s(literal -1/2 binary64) re)))
(* (pow im 2) (- (* -1 (/ re (pow im 2))) (* 1/2 (/ 1 re))))
(*.f64 (*.f64 im im) (+.f64 (/.f64 re (*.f64 #s(literal -1 binary64) (*.f64 im im))) (/.f64 #s(literal -1/2 binary64) re)))
(* -1/2 (/ (pow im 2) re))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) re))
(/ (+ (* -1 (pow re 2)) (* -1/2 (pow im 2))) re)
(/.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re)) re)
(/ (+ (* -1 (pow re 2)) (* -1/2 (pow im 2))) re)
(/.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re)) re)
(/ (+ (* -1 (pow re 2)) (* -1/2 (pow im 2))) re)
(/.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re)) re)
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* re (- (* -1/2 (/ (pow im 2) (pow re 2))) 1))
(*.f64 re (+.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re)) #s(literal -1 binary64)))
(* re (- (* -1/2 (/ (pow im 2) (pow re 2))) 1))
(*.f64 re (+.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re)) #s(literal -1 binary64)))
(* re (- (* -1/2 (/ (pow im 2) (pow re 2))) 1))
(*.f64 re (+.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re)) #s(literal -1 binary64)))
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(-.f64 #s(literal 0 binary64) (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))))
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(-.f64 #s(literal 0 binary64) (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))))
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(-.f64 #s(literal 0 binary64) (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re)))))
(* 1/2 (* (sqrt 2) (sqrt (+ re (* -1 re)))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/2 binary64)))
(+ (* -1/8 (* (/ (* (pow im 2) (sqrt 2)) re) (sqrt (/ 1 (+ re (* -1 re)))))) (* 1/2 (* (sqrt 2) (sqrt (+ re (* -1 re))))))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/8 binary64)))))
(+ (* 1/2 (* (sqrt 2) (sqrt (+ re (* -1 re))))) (* (pow im 2) (+ (* -1/8 (* (/ (sqrt 2) re) (sqrt (/ 1 (+ re (* -1 re)))))) (* -1/64 (* (/ (* (pow im 2) (sqrt 2)) (pow re 2)) (sqrt (/ 1 (pow (+ re (* -1 re)) 3))))))))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 im im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/8 binary64))) (*.f64 #s(literal -1/64 binary64) (*.f64 (*.f64 im (*.f64 im (/.f64 (sqrt.f64 #s(literal 2 binary64)) re))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) re))))))
(+ (* 1/2 (* (sqrt 2) (sqrt (+ re (* -1 re))))) (* (pow im 2) (+ (* -1/8 (* (/ (sqrt 2) re) (sqrt (/ 1 (+ re (* -1 re)))))) (* (pow im 2) (+ (* -1/64 (* (/ (sqrt 2) (pow re 2)) (sqrt (/ 1 (pow (+ re (* -1 re)) 3))))) (* -1/256 (* (/ (* (pow im 2) (sqrt 2)) (pow re 3)) (sqrt (/ 1 (pow (+ re (* -1 re)) 5))))))))))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 0 binary64)) #s(literal 1/2 binary64))) (*.f64 (*.f64 im im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/8 binary64))) (*.f64 (*.f64 im im) (+.f64 (*.f64 #s(literal -1/64 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64)))) (*.f64 re re))) (*.f64 (*.f64 (*.f64 #s(literal -1/256 binary64) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (*.f64 re re)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64)))))))))
(* 1/2 (* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* im (+ (* 1/4 (* (/ (* (sqrt 2) (+ re (* -1 re))) (* (pow im 2) (sqrt -1/2))) (sqrt re))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1/2) (sqrt 2))))))
(*.f64 im (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (sqrt.f64 re))) (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* im (+ (* -1/16 (* (/ (* (sqrt 2) (pow (+ re (* -1 re)) 2)) (* (pow im 4) (pow (sqrt -1/2) 3))) (sqrt (pow re 3)))) (+ (* 1/4 (* (/ (* (sqrt 2) (+ re (* -1 re))) (* (pow im 2) (sqrt -1/2))) (sqrt re))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1/2) (sqrt 2)))))))
(*.f64 im (+.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (sqrt.f64 re))) (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 0 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal -1/2 binary64))))))))
(* im (+ (* -1/16 (* (/ (* (sqrt 2) (pow (+ re (* -1 re)) 2)) (* (pow im 4) (pow (sqrt -1/2) 3))) (sqrt (pow re 3)))) (+ (* 1/32 (* (/ (* (sqrt 2) (pow (+ re (* -1 re)) 3)) (* (pow im 6) (pow (sqrt -1/2) 5))) (sqrt (pow re 5)))) (+ (* 1/4 (* (/ (* (sqrt 2) (+ re (* -1 re))) (* (pow im 2) (sqrt -1/2))) (sqrt re))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1/2) (sqrt 2))))))))
(*.f64 im (+.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (sqrt.f64 re))) (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 0 binary64)) (sqrt.f64 (pow.f64 re #s(literal 5 binary64)))) (*.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal -1/2 binary64)) #s(literal 5 binary64))))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 0 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal -1/2 binary64)))))))))
(* -1/2 (* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal -1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* -1 (* im (+ (* 1/4 (* (/ (* (sqrt 2) (+ re (* -1 re))) (* (pow im 2) (sqrt -1/2))) (sqrt re))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1/2) (sqrt 2)))))))
(*.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (sqrt.f64 re))) (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/16 (* (/ (* (sqrt 2) (pow (+ re (* -1 re)) 2)) (* (pow im 4) (pow (sqrt -1/2) 3))) (sqrt (pow re 3)))) (+ (* 1/4 (* (/ (* (sqrt 2) (+ re (* -1 re))) (* (pow im 2) (sqrt -1/2))) (sqrt re))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1/2) (sqrt 2))))))))
(*.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (sqrt.f64 re))) (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 0 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal -1/2 binary64))))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/16 (* (/ (* (sqrt 2) (pow (+ re (* -1 re)) 2)) (* (pow im 4) (pow (sqrt -1/2) 3))) (sqrt (pow re 3)))) (+ (* 1/32 (* (/ (* (sqrt 2) (pow (+ re (* -1 re)) 3)) (* (pow im 6) (pow (sqrt -1/2) 5))) (sqrt (pow re 5)))) (+ (* 1/4 (* (/ (* (sqrt 2) (+ re (* -1 re))) (* (pow im 2) (sqrt -1/2))) (sqrt re))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1/2) (sqrt 2)))))))))
(*.f64 (+.f64 (+.f64 (*.f64 #s(literal 1/4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 0 binary64) (sqrt.f64 re))) (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1/2 binary64)))))) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (+.f64 (*.f64 #s(literal 1/32 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 0 binary64)) (sqrt.f64 (pow.f64 re #s(literal 5 binary64)))) (*.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal -1/2 binary64)) #s(literal 5 binary64))))) (*.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 0 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal -1/2 binary64)))))))) (-.f64 #s(literal 0 binary64) im))
(* 1/2 (* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re))))
(*.f64 #s(literal 1/2 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal -1 binary64) (*.f64 im (sqrt.f64 #s(literal -1 binary64)))))
(* -1 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal -1 binary64) (*.f64 im (sqrt.f64 #s(literal -1 binary64)))))
(* -1 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal -1 binary64) (*.f64 im (sqrt.f64 #s(literal -1 binary64)))))
(* -1 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal -1 binary64) (*.f64 im (sqrt.f64 #s(literal -1 binary64)))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(* -1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal -1/2 binary64)))
(* -1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal -1/2 binary64)))
(* -1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal -1/2 binary64)))
(* -1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal -1/2 binary64)))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(* (pow (/ -1 re) 1/4) (sqrt im))
(*.f64 (sqrt.f64 im) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64)))
(* (pow (/ -1 re) 1/4) (sqrt im))
(*.f64 (sqrt.f64 im) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64)))
(* (pow (/ -1 re) 1/4) (sqrt im))
(*.f64 (sqrt.f64 im) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64)))
(* (pow (/ -1 re) 1/4) (sqrt im))
(*.f64 (sqrt.f64 im) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64)))
(* (pow (/ -1 re) 1/4) (sqrt im))
(*.f64 (sqrt.f64 im) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64)))
(* (pow (/ -1 re) 1/4) (sqrt im))
(*.f64 (sqrt.f64 im) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64)))
(* (pow (/ -1 re) 1/4) (sqrt im))
(*.f64 (sqrt.f64 im) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64)))
(* (pow (/ -1 re) 1/4) (sqrt im))
(*.f64 (sqrt.f64 im) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64)))
(* -1 (* (pow (/ -1 re) 1/4) (* (sqrt im) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -1 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64))))
(* -1 (* (pow (/ -1 re) 1/4) (* (sqrt im) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -1 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64))))
(* -1 (* (pow (/ -1 re) 1/4) (* (sqrt im) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -1 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64))))
(* -1 (* (pow (/ -1 re) 1/4) (* (sqrt im) (sqrt -1))))
(*.f64 (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -1 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64))))
(* (sqrt im) (exp (* 1/4 (+ (log -1) (* -1 (log re))))))
(*.f64 (sqrt.f64 im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re)))))
(* (sqrt im) (exp (* 1/4 (+ (log -1) (* -1 (log re))))))
(*.f64 (sqrt.f64 im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re)))))
(* (sqrt im) (exp (* 1/4 (+ (log -1) (* -1 (log re))))))
(*.f64 (sqrt.f64 im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re)))))
(* (sqrt im) (exp (* 1/4 (+ (log -1) (* -1 (log re))))))
(*.f64 (sqrt.f64 im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re)))))
(* (sqrt im) (exp (* 1/4 (+ (log -1) (log (/ 1 re))))))
(*.f64 (sqrt.f64 im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re)))))
(* (sqrt im) (exp (* 1/4 (+ (log -1) (log (/ 1 re))))))
(*.f64 (sqrt.f64 im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re)))))
(* (sqrt im) (exp (* 1/4 (+ (log -1) (log (/ 1 re))))))
(*.f64 (sqrt.f64 im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re)))))
(* (sqrt im) (exp (* 1/4 (+ (log -1) (log (/ 1 re))))))
(*.f64 (sqrt.f64 im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal -1 binary64)) (log.f64 re)))))
(* (pow (/ -1 re) 1/4) (sqrt im))
(*.f64 (sqrt.f64 im) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64)))
(* (pow (/ -1 re) 1/4) (sqrt im))
(*.f64 (sqrt.f64 im) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64)))
(* (pow (/ -1 re) 1/4) (sqrt im))
(*.f64 (sqrt.f64 im) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64)))
(* (pow (/ -1 re) 1/4) (sqrt im))
(*.f64 (sqrt.f64 im) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64)))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* 1/2 (exp (* 1/2 (+ (log 2) (log 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/2 (exp (* 1/2 (+ (log 2) (log 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/2 (exp (* 1/2 (+ (log 2) (log 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/2 (exp (* 1/2 (+ (log 2) (log 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/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/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/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/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/2 (exp (* 1/2 (+ (log -1) (+ (log 2) (* -1 (log (/ -1 im))))))))
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) im))))))
(* 1/2 (exp (* 1/2 (+ (log -1) (+ (log 2) (* -1 (log (/ -1 im))))))))
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) im))))))
(* 1/2 (exp (* 1/2 (+ (log -1) (+ (log 2) (* -1 (log (/ -1 im))))))))
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) im))))))
(* 1/2 (exp (* 1/2 (+ (log -1) (+ (log 2) (* -1 (log (/ -1 im))))))))
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) im))))))
(exp (* 1/2 (+ (log 2) (log im))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))
(exp (* 1/2 (+ (log 2) (log im))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))
(exp (* 1/2 (+ (log 2) (log im))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))
(exp (* 1/2 (+ (log 2) (log 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))))))
(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))))))
(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))))))
(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))))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im))))
(exp (* 1/2 (+ (log -1) (+ (log 2) (* -1 (log (/ -1 im)))))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) im)))))
(exp (* 1/2 (+ (log -1) (+ (log 2) (* -1 (log (/ -1 im)))))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) im)))))
(exp (* 1/2 (+ (log -1) (+ (log 2) (* -1 (log (/ -1 im)))))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) im)))))
(exp (* 1/2 (+ (log -1) (+ (log 2) (* -1 (log (/ -1 im)))))))
(exp.f64 (*.f64 #s(literal 1/2 binary64) (-.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) im)))))
(* 2 (+ (log 2) (log im)))
(*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))
(* 2 (+ (log 2) (log im)))
(*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))
(* 2 (+ (log 2) (log im)))
(*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))
(* 2 (+ (log 2) (log im)))
(*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))
(* 2 (+ (log 2) (* -1 (log (/ 1 im)))))
(*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))
(* 2 (+ (log 2) (* -1 (log (/ 1 im)))))
(*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))
(* 2 (+ (log 2) (* -1 (log (/ 1 im)))))
(*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))
(* 2 (+ (log 2) (* -1 (log (/ 1 im)))))
(*.f64 #s(literal 2 binary64) (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 im)))
(* 2 (+ (log -1) (+ (log 2) (* -1 (log (/ -1 im))))))
(*.f64 #s(literal 2 binary64) (-.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) im))))
(* 2 (+ (log -1) (+ (log 2) (* -1 (log (/ -1 im))))))
(*.f64 #s(literal 2 binary64) (-.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) im))))
(* 2 (+ (log -1) (+ (log 2) (* -1 (log (/ -1 im))))))
(*.f64 #s(literal 2 binary64) (-.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) im))))
(* 2 (+ (log -1) (+ (log 2) (* -1 (log (/ -1 im))))))
(*.f64 #s(literal 2 binary64) (-.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal -1 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 (+.f64 #s(literal 2 binary64) (/.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 (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))))
(* -1/2 (/ (pow im 2) re))
(*.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re))
(/.f64 (+.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re))) (-.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 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re)) (+.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 #s(literal -1/2 binary64) (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64))) (pow.f64 re #s(literal 6 binary64))))) (-.f64 #s(literal 0 binary64) re))
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
(+ (* 1/2 (/ (pow im 2) re)) (* 2 re))
(+.f64 (*.f64 #s(literal 2 binary64) re) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re))
(+ (* 2 re) (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+.f64 (*.f64 #s(literal 2 binary64) re) (*.f64 (*.f64 im im) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (/.f64 (*.f64 #s(literal -1/8 binary64) (*.f64 im im)) (*.f64 re (*.f64 re 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 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im)))))
(*.f64 im (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 re re)) (*.f64 im im)) (+.f64 (/.f64 re 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 0 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re (/.f64 (*.f64 #s(literal -1/2 binary64) (*.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) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im)) (*.f64 #s(literal 1/2 binary64) (*.f64 re re))) im)) im)))
(* (sqrt 2) (sqrt (+ re (* -1 re))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 0 binary64)))
(+ (* -1/4 (* (/ (* (pow im 2) (sqrt 2)) re) (sqrt (/ 1 (+ re (* -1 re)))))) (* (sqrt 2) (sqrt (+ re (* -1 re)))))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 0 binary64))) (*.f64 (*.f64 im im) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/4 binary64)))))
(+ (* (sqrt 2) (sqrt (+ re (* -1 re)))) (* (pow im 2) (+ (* -1/4 (* (/ (sqrt 2) re) (sqrt (/ 1 (+ re (* -1 re)))))) (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (pow re 2)) (sqrt (/ 1 (pow (+ re (* -1 re)) 3))))))))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 0 binary64))) (*.f64 (*.f64 im im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/4 binary64))) (*.f64 (*.f64 (*.f64 #s(literal -1/32 binary64) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re))) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64)))))))
(+ (* (sqrt 2) (sqrt (+ re (* -1 re)))) (* (pow im 2) (+ (* -1/4 (* (/ (sqrt 2) re) (sqrt (/ 1 (+ re (* -1 re)))))) (* (pow im 2) (+ (* -1/32 (* (/ (sqrt 2) (pow re 2)) (sqrt (/ 1 (pow (+ re (* -1 re)) 3))))) (* -1/128 (* (/ (* (pow im 2) (sqrt 2)) (pow re 3)) (sqrt (/ 1 (pow (+ re (* -1 re)) 5))))))))))
(+.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 0 binary64))) (*.f64 (*.f64 im im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/4 binary64))) (*.f64 (*.f64 im im) (+.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re re)) #s(literal -1/32 binary64))) (*.f64 (*.f64 (*.f64 #s(literal -1/128 binary64) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 re (*.f64 re re)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) #s(literal 0 binary64)))))))))
(* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))
(* im (+ (* 1/2 (* (/ (* (sqrt 2) (+ re (* -1 re))) (* (pow im 2) (sqrt -1/2))) (sqrt re))) (* (sqrt (/ 1 re)) (* (sqrt -1/2) (sqrt 2)))))
(*.f64 im (+.f64 (*.f64 (*.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/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1/2 binary64)))))) (sqrt.f64 re))))
(* im (+ (* -1/8 (* (/ (* (sqrt 2) (pow (+ re (* -1 re)) 2)) (* (pow im 4) (pow (sqrt -1/2) 3))) (sqrt (pow re 3)))) (+ (* 1/2 (* (/ (* (sqrt 2) (+ re (* -1 re))) (* (pow im 2) (sqrt -1/2))) (sqrt re))) (* (sqrt (/ 1 re)) (* (sqrt -1/2) (sqrt 2))))))
(*.f64 im (+.f64 (*.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1/2 binary64)))))) (sqrt.f64 re)) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 0 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal -1/2 binary64)))))))))
(* im (+ (* -1/8 (* (/ (* (sqrt 2) (pow (+ re (* -1 re)) 2)) (* (pow im 4) (pow (sqrt -1/2) 3))) (sqrt (pow re 3)))) (+ (* 1/16 (* (/ (* (sqrt 2) (pow (+ re (* -1 re)) 3)) (* (pow im 6) (pow (sqrt -1/2) 5))) (sqrt (pow re 5)))) (+ (* 1/2 (* (/ (* (sqrt 2) (+ re (* -1 re))) (* (pow im 2) (sqrt -1/2))) (sqrt re))) (* (sqrt (/ 1 re)) (* (sqrt -1/2) (sqrt 2)))))))
(*.f64 im (+.f64 (+.f64 (*.f64 (*.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 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1/2 binary64)))))) (sqrt.f64 re)) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 0 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal -1/2 binary64)))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 0 binary64)) (sqrt.f64 (pow.f64 re #s(literal 5 binary64)))) (*.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal -1/2 binary64)) #s(literal 5 binary64)))))))
(* -1 (* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re))))
(-.f64 #s(literal 0 binary64) (*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(* -1 (* im (+ (* 1/2 (* (/ (* (sqrt 2) (+ re (* -1 re))) (* (pow im 2) (sqrt -1/2))) (sqrt re))) (* (sqrt (/ 1 re)) (* (sqrt -1/2) (sqrt 2))))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1/2 binary64)))))) (sqrt.f64 re))))
(* -1 (* im (+ (* -1/8 (* (/ (* (sqrt 2) (pow (+ re (* -1 re)) 2)) (* (pow im 4) (pow (sqrt -1/2) 3))) (sqrt (pow re 3)))) (+ (* 1/2 (* (/ (* (sqrt 2) (+ re (* -1 re))) (* (pow im 2) (sqrt -1/2))) (sqrt re))) (* (sqrt (/ 1 re)) (* (sqrt -1/2) (sqrt 2)))))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1/2 binary64)))))) (sqrt.f64 re)) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 0 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal -1/2 binary64)))))))))
(* -1 (* im (+ (* -1/8 (* (/ (* (sqrt 2) (pow (+ re (* -1 re)) 2)) (* (pow im 4) (pow (sqrt -1/2) 3))) (sqrt (pow re 3)))) (+ (* 1/16 (* (/ (* (sqrt 2) (pow (+ re (* -1 re)) 3)) (* (pow im 6) (pow (sqrt -1/2) 5))) (sqrt (pow re 5)))) (+ (* 1/2 (* (/ (* (sqrt 2) (+ re (* -1 re))) (* (pow im 2) (sqrt -1/2))) (sqrt re))) (* (sqrt (/ 1 re)) (* (sqrt -1/2) (sqrt 2))))))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (+.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (+.f64 (*.f64 (*.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 0 binary64) (*.f64 im (*.f64 im (sqrt.f64 #s(literal -1/2 binary64)))))) (sqrt.f64 re)) (*.f64 #s(literal -1/8 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 0 binary64)) (sqrt.f64 (*.f64 re (*.f64 re re)))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 #s(literal -1/2 binary64) (sqrt.f64 #s(literal -1/2 binary64)))))))) (*.f64 #s(literal 1/16 binary64) (/.f64 (*.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 0 binary64)) (sqrt.f64 (pow.f64 re #s(literal 5 binary64)))) (*.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal -1/2 binary64)) #s(literal 5 binary64))))))))
(* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))
(* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))
(* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))
(* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))
(* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))
(* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))
(* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))
(* (* im (* (sqrt -1/2) (sqrt 2))) (sqrt (/ 1 re)))
(*.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (/ (pow im 2) (pow re 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* 1/2 (/ (pow im 2) (pow re 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* 1/2 (/ (pow im 2) (pow re 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* 1/2 (/ (pow im 2) (pow re 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* 1/2 (/ (pow im 2) (pow re 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* 1/2 (/ (pow im 2) (pow re 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* 1/2 (/ (pow im 2) (pow re 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* 1/2 (/ (pow im 2) (pow re 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* 1/2 (/ (pow im 2) (pow re 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* 1/2 (/ (pow im 2) (pow re 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* 1/2 (/ (pow im 2) (pow re 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* 1/2 (/ (pow im 2) (pow re 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* 1/2 (/ (pow im 2) (pow re 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* 1/2 (/ (pow im 2) (pow re 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* 1/2 (/ (pow im 2) (pow re 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* 1/2 (/ (pow im 2) (pow re 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* 1/2 (/ (pow im 2) (pow re 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* 1/2 (/ (pow im 2) (pow re 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* 1/2 (/ (pow im 2) (pow re 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* 1/2 (/ (pow im 2) (pow re 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* 1/2 (/ (pow im 2) (pow re 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* 1/2 (/ (pow im 2) (pow re 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* 1/2 (/ (pow im 2) (pow re 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* 1/2 (/ (pow im 2) (pow re 2)))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) (*.f64 re re))
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(* 1/2 (/ (pow im 2) re))
(/.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im)) re)
(/ (pow im 2) 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)
(+ (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 -1) (+ (log 2) (* -1 (log (/ -1 im)))))
(-.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) im)))
(+ (log -1) (+ (log 2) (* -1 (log (/ -1 im)))))
(-.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) im)))
(+ (log -1) (+ (log 2) (* -1 (log (/ -1 im)))))
(-.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) im)))
(+ (log -1) (+ (log 2) (* -1 (log (/ -1 im)))))
(-.f64 (+.f64 (log.f64 #s(literal -1 binary64)) (log.f64 #s(literal 2 binary64))) (log.f64 (/.f64 #s(literal -1 binary64) im)))

eval156.0ms (1.2%)

Compiler

Compiled 26793 to 3586 computations (86.6% saved)

prune143.0ms (1.1%)

Pruning

33 alts after pruning (24 fresh and 9 done)

PrunedKeptTotal
New1007141021
Fresh131023
Picked325
Done077
Total1023331056
Accuracy
99.8%
Counts
1056 → 33
Alt Table
Click to see full alt table
StatusAccuracyProgram
✓16.7%
(pow.f64 (*.f64 re re) #s(literal 1/4 binary64))
12.1%
(+.f64 (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (+.f64 (log.f64 (*.f64 #s(literal 1/2 binary64) (*.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (*.f64 im (*.f64 im (sqrt.f64 #s(literal 2 binary64)))))) (*.f64 re re)))
48.8%
(*.f64 (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 im #s(literal 2 binary64))))) #s(literal 1/2 binary64))
14.3%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 (neg.f64 im) (/.f64 im re)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
✓51.9%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
✓79.8%
(*.f64 #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)))
51.6%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) im) #s(literal 1/8 binary64)) #s(literal 4 binary64)))
12.0%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal 1/4 binary64)) (+.f64 (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))) (/.f64 (*.f64 #s(literal -1/4 binary64) (*.f64 im im)) (*.f64 re re)))) #s(literal 2 binary64)))
12.3%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))) (/.f64 (*.f64 #s(literal -1/16 binary64) (*.f64 (*.f64 im im) (exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (log.f64 (*.f64 im im))))))) (*.f64 re re))) #s(literal 2 binary64)))
24.4%
(*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (sqrt.f64 im) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64))) #s(literal 2 binary64)))
14.3%
(*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (*.f64 im im)) (sqrt.f64 (-.f64 #s(literal 0 binary64) re))))
10.8%
(*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (/.f64 re (*.f64 im im))))))
✓74.1%
(*.f64 #s(literal 1/2 binary64) (*.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 re (hypot.f64 re im)))) (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 #s(literal 2 binary64)))))
14.3%
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (*.f64 im im)) (sqrt.f64 (neg.f64 (/.f64 #s(literal 1 binary64) re)))))
21.8%
(*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 (neg.f64 (/.f64 im re)))))
13.9%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (-.f64 (/.f64 (/.f64 (*.f64 im im) re) (/.f64 re (*.f64 im im))) (*.f64 (*.f64 re re) #s(literal 16 binary64))) (-.f64 (/.f64 (*.f64 im im) re) (*.f64 re #s(literal 4 binary64))))))
2.6%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (*.f64 (-.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 re re)) #s(literal 2 binary64)) (-.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) re))))
4.1%
(*.f64 #s(literal 1/2 binary64) (sqrt.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 re re) (+.f64 #s(literal 3 binary64) (*.f64 #s(literal 3/2 binary64) (/.f64 (*.f64 im im) (*.f64 re re))))))))
11.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))))
27.4%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 re #s(literal 4 binary64)) (*.f64 (/.f64 im re) im))))
✓52.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))))))
47.6%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (*.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal 2 binary64) (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (/.f64 (*.f64 re re) im) im)) im))))))))
✓53.7%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 #s(literal 2 binary64) re) im)))))
52.3%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
2.6%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (neg.f64 (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) re) (-.f64 (*.f64 (*.f64 re re) (*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 im (*.f64 #s(literal 1/2 binary64) im)) (*.f64 re re))))) (*.f64 re re)))))))
4.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (/.f64 (-.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re)) re) re))))
5.0%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (*.f64 re (+.f64 (/.f64 (*.f64 (*.f64 im im) #s(literal -1/2 binary64)) (*.f64 re re)) #s(literal -1 binary64))) re))))
✓80.4%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
✓54.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 im re))))
13.8%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (*.f64 im (/.f64 #s(literal -1/2 binary64) re))))))
5.2%
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 0 binary64)))
26.1%
(*.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 (log.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 im im)) (*.f64 re (-.f64 re (hypot.f64 re im)))))) #s(literal 1/2 binary64))))
✓27.3%
(sqrt.f64 re)
Compiler

Compiled 1658 to 726 computations (56.2% saved)

regimes142.0ms (1.1%)

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

7 calls:

27.0ms
re
25.0ms
(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
17.0ms
(+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
16.0ms
(*.f64 im im)
16.0ms
(*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
Results
AccuracySegmentsBranch
88.8%2re
80.4%1im
91.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))))
91.6%2(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)))
92.4%2(*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
92.4%2(+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
80.4%1(*.f64 im im)
Compiler

Compiled 69 to 45 computations (34.8% saved)

regimes26.0ms (0.2%)

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

2 calls:

12.0ms
(+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re)
10.0ms
(*.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))
Results
AccuracySegmentsBranch
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)
Compiler

Compiled 26 to 16 computations (38.5% saved)

regimes14.0ms (0.1%)

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

1 calls:

8.0ms
re
Results
AccuracySegmentsBranch
83.5%2re
Compiler

Compiled 3 to 2 computations (33.3% saved)

regimes29.0ms (0.2%)

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

3 calls:

10.0ms
re
8.0ms
im
7.0ms
(*.f64 im im)
Results
AccuracySegmentsBranch
64.8%2im
64.8%2(*.f64 im im)
71.8%3re
Compiler

Compiled 11 to 7 computations (36.4% saved)

regimes4.0ms (0%)

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

1 calls:

4.0ms
re
Results
AccuracySegmentsBranch
69.9%3re
Compiler

Compiled 3 to 2 computations (33.3% saved)

regimes4.0ms (0%)

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

1 calls:

3.0ms
re
Results
AccuracySegmentsBranch
66.5%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/2 binary64) (sqrt.f64 #s(literal 0 binary64)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(pow.f64 (*.f64 re re) #s(literal 1/4 binary64))
Outputs
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 0 binary64)))
(sqrt.f64 re)
Calls

2 calls:

2.0ms
re
2.0ms
im
Results
AccuracySegmentsBranch
27.3%1im
31.1%2re
Compiler

Compiled 6 to 4 computations (33.3% saved)

regimes1.0ms (0%)

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts
1 → 1
Calls
Call 1
Inputs
(sqrt.f64 re)
Outputs
(sqrt.f64 re)
Calls

1 calls:

1.0ms
re
Results
AccuracySegmentsBranch
27.3%1re
Compiler

Compiled 3 to 2 computations (33.3% saved)

bsearch1.0ms (0%)

Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
0.0
1.0427306633628366e-257
Compiler

Compiled 22 to 16 computations (27.3% saved)

bsearch0.0ms (0%)

Algorithm
1×left-value
Steps
TimeLeftRight
0.0ms
0.0
1.0427306633628366e-257
Compiler

Compiled 22 to 16 computations (27.3% saved)

bsearch76.0ms (0.6%)

Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
72.0ms
-1.7137015442112958e+115
-9.875505599755828e+109
Results
38.0ms62×2valid
21.0ms51×0valid
4.0ms24×1valid
3.0ms7×3valid
Compiler

Compiled 274 to 214 computations (21.9% saved)

Precisions
Click to see histograms. Total time spent on operations: 36.0ms
ival-add: 20.0ms (55.1% of total)
ival-mult: 8.0ms (22% of total)
ival-sqrt: 5.0ms (13.8% of total)
backward-pass: 3.0ms (8.3% of total)
const: 0.0ms (0% of total)

bsearch59.0ms (0.5%)

Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
15.0ms
1.0185393800563493e-85
2.0174911175328604e-84
39.0ms
-1.7137015442112958e+115
-9.875505599755828e+109
Results
19.0ms51×2valid
15.0ms166×0valid
6.0ms31×1valid
3.0ms8×3valid
Compiler

Compiled 336 to 280 computations (16.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 29.0ms
ival-mult: 15.0ms (51% of total)
ival-sqrt: 7.0ms (23.8% of total)
ival-add: 4.0ms (13.6% of total)
backward-pass: 3.0ms (10.2% of total)
const: 1.0ms (3.4% of total)

bsearch61.0ms (0.5%)

Algorithm
2×binary-search
Stop Event
1×narrow-enough
1×narrow-enough
Steps
TimeLeftRight
15.0ms
1.0185393800563493e-85
2.0174911175328604e-84
41.0ms
-1.7137015442112958e+115
-9.875505599755828e+109
Results
22.0ms64×2valid
16.0ms162×0valid
4.0ms22×1valid
3.0ms8×3valid
Compiler

Compiled 318 to 262 computations (17.6% saved)

Precisions
Click to see histograms. Total time spent on operations: 26.0ms
ival-mult: 11.0ms (42.2% of total)
ival-sqrt: 7.0ms (26.8% of total)
ival-add: 5.0ms (19.2% of total)
backward-pass: 3.0ms (11.5% of total)
const: 1.0ms (3.8% of total)

bsearch17.0ms (0.1%)

Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
15.0ms
1.0185393800563493e-85
2.0174911175328604e-84
Results
11.0ms112×0valid
Compiler

Compiled 120 to 100 computations (16.7% saved)

Precisions
Click to see histograms. Total time spent on operations: 8.0ms
ival-add: 3.0ms (39.8% of total)
ival-mult: 3.0ms (39.8% of total)
ival-sqrt: 2.0ms (26.5% of total)
const: 0.0ms (0% of total)
backward-pass: 0.0ms (0% of total)

bsearch20.0ms (0.2%)

Algorithm
1×binary-search
Stop Event
1×narrow-enough
Steps
TimeLeftRight
18.0ms
-5.468060946791391e-304
7.12535652631496e-306
Results
13.0ms144×0valid
Compiler

Compiled 130 to 115 computations (11.5% saved)

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

simplify12.0ms (0.1%)

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

Useful iterations: 0 (0.0ms)

IterNodesCost
066171
192171
2103171
3113171
4117171
5118171
Stop Event
1×saturated
Calls
Call 1
Inputs
(if (<=.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #s(literal 0 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (sqrt.f64 im) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(if (<=.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #s(literal 0 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 (neg.f64 (/.f64 im re))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(if (<=.f64 re #s(literal -2200000000000000034230715484827054653390043073226335153413495276947834318562462547182967857813104384887653817909248 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (*.f64 im (/.f64 #s(literal -1/2 binary64) re)))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(if (<=.f64 re #s(literal -200000000000000003111883225893368604853640279384212286673954116086166756232951140652997077983009489535241256173568 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (*.f64 im (/.f64 #s(literal -1/2 binary64) re)))))) (if (<=.f64 re #s(literal 1011603460212143/546812681195752981093125556779405341338292357723303109106442651602488249799843980805878294255763456 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 re)))
(if (<=.f64 re #s(literal -579999999999999993645354696460216360831400525793440406214994375681983649456858731573709500530115559486872616960 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)))) (if (<=.f64 re #s(literal 546812681195753/273406340597876490546562778389702670669146178861651554553221325801244124899921990402939147127881728 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 re)))
(if (<=.f64 re #s(literal 546812681195753/273406340597876490546562778389702670669146178861651554553221325801244124899921990402939147127881728 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 re))
(if (<=.f64 re #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 0 binary64))) (sqrt.f64 re))
(sqrt.f64 re)
Outputs
(if (<=.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #s(literal 0 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (sqrt.f64 im) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(if (<=.f64 (+.f64 re (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))) #s(literal 0 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (*.f64 (sqrt.f64 im) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64))) #s(literal 2 binary64))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(if (<=.f64 (+.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re) #s(literal 0 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 (neg.f64 (/.f64 im re))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(if (<=.f64 (+.f64 re (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im)))) #s(literal 0 binary64)) (*.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(if (<=.f64 re #s(literal -2200000000000000034230715484827054653390043073226335153413495276947834318562462547182967857813104384887653817909248 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (*.f64 im (/.f64 #s(literal -1/2 binary64) re)))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))))
(if (<=.f64 re #s(literal -200000000000000003111883225893368604853640279384212286673954116086166756232951140652997077983009489535241256173568 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (*.f64 im (*.f64 im (/.f64 #s(literal -1/2 binary64) re)))))) (if (<=.f64 re #s(literal 1011603460212143/546812681195752981093125556779405341338292357723303109106442651602488249799843980805878294255763456 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 re)))
(if (<=.f64 re #s(literal -579999999999999993645354696460216360831400525793440406214994375681983649456858731573709500530115559486872616960 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re)))) (if (<=.f64 re #s(literal 546812681195753/273406340597876490546562778389702670669146178861651554553221325801244124899921990402939147127881728 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 re)))
(if (<=.f64 re #s(literal 546812681195753/273406340597876490546562778389702670669146178861651554553221325801244124899921990402939147127881728 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))) (sqrt.f64 re))
(if (<=.f64 re #s(literal -101201126653655/202402253307310618352495346718917307049556649764142118356901358027430339567995346891960383701437124495187077864316811911389808737385793476867013399940738509921517424276566361364466907742093216341239767678472745068562007483424692698618103355649159556340810056512358769552333414615230502532186327508646006263307707741093494784 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 0 binary64))) (sqrt.f64 re))
(sqrt.f64 re)

soundness2.2s (16.7%)

Rules
7820×*-lowering-*.f32
7820×*-lowering-*.f64
7686×*-lowering-*.f32
7686×*-lowering-*.f64
7228×*-lowering-*.f32
Iterations

Useful iterations: 0 (0.0ms)

IterNodesCost
012908382
147287771
092417771
01210
12610
23510
33710
03710
06937255
123625926
086445926
01668
17467
257967
3691367
0809367
034152
1190146
21498143
08550143
041201
1249192
21950178
09845178
05005174
117844554
269124474
090004474
Stop Event
1×fuel
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×node limit
1×iter limit
1×saturated
1×iter limit
1×node limit
Compiler

Compiled 555 to 363 computations (34.6% saved)

preprocess95.0ms (0.7%)

Compiler

Compiled 540 to 248 computations (54.1% saved)

end0.0ms (0%)

Profiling

Loading profile data...