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

analyze139.0ms (1.5%)

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
0%	0%	50%	50%	0%	0%	0%	0
0%	0%	50%	50%	0%	0%	0%	1
50%	25%	25%	50%	0%	0%	0%	2
50%	25%	25%	50%	0%	0%	0%	3
62.5%	31.2%	18.7%	50%	0%	0%	0%	4
62.5%	31.2%	18.7%	50%	0%	0%	0%	5
68.8%	34.3%	15.6%	50%	0%	0%	0%	6
68.8%	34.3%	15.6%	50%	0%	0%	0%	7
71.9%	35.9%	14%	50%	0%	0%	0%	8
71.9%	35.9%	14%	50%	0%	0%	0%	9
73.4%	36.7%	13.3%	50%	0%	0%	0%	10
73.4%	36.7%	13.3%	50%	0%	0%	0%	11
74.2%	37.1%	12.9%	50%	0%	0%	0%	12

Compiler

Compiled 20 to 14 computations (30% saved)

Precisions

Click to see histograms. Total time spent on operations: 64.0ms

ival-mult: 30.0ms (46.9% of total)

ival-sqrt: 16.0ms (25% of total)

ival-sub: 5.0ms (7.8% of total)

ival-add: 5.0ms (7.8% of total)

ival->: 5.0ms (7.8% of total)

const: 2.0ms (3.1% of total)

backward-pass: 0.0ms (0% of total)

sample1.7s (18.4%)

Results

706.0ms	6193×	0	valid
446.0ms	1260×	2	valid
111.0ms	590×	1	valid
78.0ms	213×	3	valid

Precisions

Click to see histograms. Total time spent on operations: 957.0ms

ival-mult: 446.0ms (46.6% of total)

ival-sqrt: 219.0ms (22.9% of total)

ival-sub: 85.0ms (8.9% of total)

ival-add: 83.0ms (8.7% of total)

backward-pass: 63.0ms (6.6% of total)

ival->: 43.0ms (4.5% of total)

const: 17.0ms (1.8% of total)

Bogosity

preprocess130.0ms (1.4%)

Algorithm

2×	egg-herbie

Rules

1110×	`fnmadd-define`
804×	`fmsub-define`
764×	`fnmsub-define`
668×	`fma-define`
602×	`fmm-def`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	36	62
1	87	60
2	177	60
3	371	60
4	786	60
5	1244	60
6	1789	60
7	2488	60
8	3197	60
9	3332	60
0	12	10
1	19	10
2	32	10
3	52	10
4	82	10
5	129	10
6	240	10
7	411	10
8	661	10
9	901	10
10	1200	10
11	1425	10
12	1486	10
13	1566	10
14	1680	10
15	1804	10
16	1928	10
17	1961	10
18	1969	10
0	1969	10

Stop Event

1×	iter limit
1×	saturated
1×	saturated

Calls

Call 1

Inputs
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))

Outputs
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))

Call 2

Inputs
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* (neg re) (neg re)) (* im im))) (neg re)))))
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* (neg im) (neg im)))) re))))
(neg (* 1/2 (sqrt (* 2 (- (sqrt (+ (* (neg re) (neg re)) (* im im))) (neg re))))))
(neg (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* (neg im) (neg im)))) re)))))
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* im im) (* re re))) im))))

Outputs
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
(* 1/2 (sqrt (* 2 (- (hypot re im) re))))
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* (neg re) (neg re)) (* im im))) (neg re)))))
(* 1/2 (sqrt (* 2 (+ re (hypot re im)))))
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* (neg im) (neg im)))) re))))
(* 1/2 (sqrt (* 2 (- (hypot re im) re))))
(neg (* 1/2 (sqrt (* 2 (- (sqrt (+ (* (neg re) (neg re)) (* im im))) (neg re))))))
(* (sqrt (* 2 (+ re (hypot re im)))) -1/2)
(neg (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* (neg im) (neg im)))) re)))))
(* (sqrt (* 2 (- (hypot re im) re))) -1/2)
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* im im) (* re re))) im))))
(* 1/2 (sqrt (* 2 (- (hypot re im) im))))

Symmetry

(abs im)

explain177.0ms (1.9%)

FPErrors

Click to see full error table

Ground Truth	Example	Example	Subexpression
137	-	-	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`
32	-	-	`(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`
22	-	-	`(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`
0	-	-	`#s(literal 1/2 binary64)`
0	-	-	`(*.f64 im im)`
0	-	-	`re`
0	-	-	`#s(literal 2 binary64)`
0	-	-	`(+.f64 (.f64 re re) (.f64 im im))`
0	-	-	`im`
0	-	-	`(*.f64 re re)`
0	-	-	`(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))`
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

53.0ms	396×	0	valid
39.0ms	72×	2	valid
8.0ms	36×	1	valid
4.0ms	8×	3	valid

Compiler

Compiled 173 to 38 computations (78% saved)

Precisions

Click to see histograms. Total time spent on operations: 64.0ms

ival-mult: 27.0ms (42% of total)

ival-sqrt: 23.0ms (35.8% of total)

ival-add: 5.0ms (7.8% of total)

backward-pass: 5.0ms (7.8% of total)

ival-sub: 4.0ms (6.2% of total)

const: 1.0ms (1.6% of total)

eval0.0ms (0%)

Compiler: Compiled 12 to 9 computations (25% saved)

prune1.0ms (0%)

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	80.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
▶	36.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))

Status

Accuracy

Program

▶

80.6%

(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))

▶

36.4%

(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (*.f64 re re) (*.f64 im im))) re))))

Compiler

Compiled 29 to 21 computations (27.6% saved)

simplify58.0ms (0.6%)

Algorithm

1×	egg-herbie

Localize:

Found 8 expressions of interest:

New	Metric	Score	Program
✓	cost-diff	0	(-.f64 (hypot.f64 re im) re)
✓	cost-diff	0	(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
✓	cost-diff	0	(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))
✓	cost-diff	0	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
✓	cost-diff	320	(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)
✓	cost-diff	320	(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))
✓	cost-diff	320	(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))
✓	cost-diff	320	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))

Rules

584×	`fnmadd-define`
408×	`fnmsub-define`
408×	`fmsub-define`
406×	`sum3-define`
402×	`fma-define`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	12	86
1	19	86
2	32	86
3	52	86
4	82	86
5	129	86
6	240	86
7	411	86
8	661	86
9	901	86
10	1200	86
11	1425	86
12	1486	86
13	1566	86
14	1680	86
15	1804	86
16	1928	86
17	1961	86
18	1969	86
0	1969	86

Stop Event

1×	iter limit
1×	saturated

Calls

Call 1

Inputs
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
1/2
(sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))
(* 2 (- (sqrt (+ (* re re) (* im im))) re))
2
(- (sqrt (+ (* re re) (* im im))) re)
(sqrt (+ (* re re) (* im im)))
(+ (* re re) (* im im))
(* re re)
re
(* im im)
im
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
1/2
(sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))
(* 2 (- (sqrt (+ (* re re) (* im im))) re))
2
(- (sqrt (+ (* re re) (* im im))) re)
(sqrt (+ (* re re) (* im im)))
re
im

Outputs
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
1/2
#s(literal 1/2 binary64)
(sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))
(* 2 (- (sqrt (+ (* re re) (* im im))) re))
(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
2
#s(literal 2 binary64)
(- (sqrt (+ (* re re) (* im im))) re)
(-.f64 (hypot.f64 re im) re)
(sqrt (+ (* re re) (* im im)))
(hypot.f64 re im)
(+ (* re re) (* im im))
(+.f64 (.f64 re re) (.f64 im im))
(* re re)
(*.f64 re re)
re
(* im im)
(*.f64 im im)
im
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
1/2
#s(literal 1/2 binary64)
(sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))
(* 2 (- (sqrt (+ (* re re) (* im im))) re))
(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
2
#s(literal 2 binary64)
(- (sqrt (+ (* re re) (* im im))) re)
(-.f64 (hypot.f64 re im) re)
(sqrt (+ (* re re) (* im im)))
(hypot.f64 re im)
re
im

localize149.0ms (1.6%)

Localize:

Found 8 expressions of interest:

New	Metric	Score	Program
✓	accuracy	100.0%	(-.f64 (hypot.f64 re im) re)
✓	accuracy	100.0%	(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
✓	accuracy	100.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
✓	accuracy	100.0%	(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))
✓	accuracy	100.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))))
✓	accuracy	100.0%	(+.f64 (.f64 re re) (.f64 im im))
✓	accuracy	100.0%	(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))
✓	accuracy	59.0%	(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))

Results

82.0ms	59×	5	exit
41.0ms	197×	0	valid

Compiler

Compiled 115 to 18 computations (84.3% saved)

Precisions

Click to see histograms. Total time spent on operations: 68.0ms

ival-mult: 23.0ms (33.9% of total)

ival-sqrt: 14.0ms (20.7% of total)

compiled-spec: 11.0ms (16.2% of total)

backward-pass: 10.0ms (14.8% of total)

ival-sub: 5.0ms (7.4% of total)

ival-add: 4.0ms (5.9% of total)

const: 1.0ms (1.5% of total)

series27.0ms (0.3%)

Counts

10 → 240

Calls

Call 1

Inputs
#<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 (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))>
#<alt (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))>
#<alt (* 2 (- (sqrt (+ (* re re) (* im im))) re))>
#<alt (- (sqrt (+ (* re re) (* im im))) re)>
#<alt (sqrt (+ (* re re) (* im im)))>
#<alt (+ (* re re) (* im im))>

Outputs
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))>
#<alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))>
#<alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))>
#<alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))>
#<alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))>
#<alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))>
#<alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))>
#<alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))>
#<alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))>
#<alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))>
#<alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<alt (* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))>
#<alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))>
#<alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))>
#<alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* 2 im)>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (+ (* 2 im) (* re (- (/ re im) 2)))>
#<alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))>
#<alt (/ (pow im 2) re)>
#<alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)>
#<alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)>
#<alt (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)>
#<alt (* -4 re)>
#<alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))>
#<alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))>
#<alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))>
#<alt (/ (pow im 2) re)>
#<alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))>
#<alt (* 2 im)>
#<alt (* im (+ 2 (* -2 (/ re im))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))>
#<alt (* -2 im)>
#<alt (* -1 (* im (+ 2 (* 2 (/ re im)))))>
#<alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))>
#<alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))>
#<alt im>
#<alt (+ im (* -1 re))>
#<alt (+ im (* re (- (* 1/2 (/ re im)) 1)))>
#<alt (+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))>
#<alt (* 1/2 (/ (pow im 2) re))>
#<alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)>
#<alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)>
#<alt (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)>
#<alt (* -2 re)>
#<alt (* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))>
#<alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))>
#<alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))>
#<alt (* 1/2 (/ (pow im 2) re))>
#<alt (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))>
#<alt im>
#<alt (* im (+ 1 (* -1 (/ re im))))>
#<alt (* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))>
#<alt (* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))>
#<alt (* -1 im)>
#<alt (* -1 (* im (+ 1 (/ re im))))>
#<alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))>
#<alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))>
#<alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))>
#<alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))>
#<alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))>
#<alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))>
#<alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))>
#<alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))>
#<alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))>
#<alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))>
#<alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))>
#<alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))>
#<alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))>
#<alt (* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))>
#<alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))>
#<alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))>
#<alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* 2 im)>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (+ (* 2 im) (* re (- (/ re im) 2)))>
#<alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))>
#<alt (/ (pow im 2) re)>
#<alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)>
#<alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)>
#<alt (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)>
#<alt (* -4 re)>
#<alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))>
#<alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))>
#<alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))>
#<alt (/ (pow im 2) re)>
#<alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))>
#<alt (* 2 im)>
#<alt (* im (+ 2 (* -2 (/ re im))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))>
#<alt (* -2 im)>
#<alt (* -1 (* im (+ 2 (* 2 (/ re im)))))>
#<alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))>
#<alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))>
#<alt im>
#<alt (+ im (* -1 re))>
#<alt (+ im (* re (- (* 1/2 (/ re im)) 1)))>
#<alt (+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))>
#<alt (* 1/2 (/ (pow im 2) re))>
#<alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)>
#<alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)>
#<alt (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)>
#<alt (* -2 re)>
#<alt (* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))>
#<alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))>
#<alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))>
#<alt (* 1/2 (/ (pow im 2) re))>
#<alt (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))>
#<alt im>
#<alt (* im (+ 1 (* -1 (/ re im))))>
#<alt (* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))>
#<alt (* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))>
#<alt (* -1 im)>
#<alt (* -1 (* im (+ 1 (/ re im))))>
#<alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))>
#<alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))>
#<alt im>
#<alt (+ im (* 1/2 (/ (pow re 2) im)))>
#<alt (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))>
#<alt (+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))>
#<alt re>
#<alt (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))>
#<alt (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))>
#<alt (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))>
#<alt (* -1 re)>
#<alt (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))>
#<alt (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))>
#<alt (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))>
#<alt re>
#<alt (+ re (* 1/2 (/ (pow im 2) re)))>
#<alt (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))>
#<alt (+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))>
#<alt im>
#<alt (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))>
#<alt (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))>
#<alt (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))>
#<alt (* -1 im)>
#<alt (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))>
#<alt (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))>
#<alt (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))>
#<alt (pow im 2)>
#<alt (+ (pow im 2) (pow re 2))>
#<alt (+ (pow im 2) (pow re 2))>
#<alt (+ (pow im 2) (pow re 2))>
#<alt (pow re 2)>
#<alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))>
#<alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))>
#<alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))>
#<alt (pow re 2)>
#<alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))>
#<alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))>
#<alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))>
#<alt (pow re 2)>
#<alt (+ (pow im 2) (pow re 2))>
#<alt (+ (pow im 2) (pow re 2))>
#<alt (+ (pow im 2) (pow re 2))>
#<alt (pow im 2)>
#<alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))>
#<alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))>
#<alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))>
#<alt (pow im 2)>
#<alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))>
#<alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))>
#<alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))>

Calls

60 calls:

Time	Variable		Point	Expression
7.0ms	im	@	0	(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
2.0ms	re	@	inf	(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
1.0ms	re	@	-inf	(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
1.0ms	im	@	inf	(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
1.0ms	re	@	inf	(* 2 (- (sqrt (+ (* re re) (* im im))) re))

rewrite308.0ms (3.3%)

Algorithm

1×	batch-egg-rewrite

Rules

2826×	`-lowering-.f32`
2826×	`-lowering-.f64`
1848×	`/-lowering-/.f32`
1848×	`/-lowering-/.f64`
1472×	`+-lowering-+.f64`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	12	69
1	50	68
2	396	68
3	4901	68
0	8427	68

Stop Event

1×	iter limit
1×	node limit

Counts

10 → 365

Calls

Call 1

Inputs
(* 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)
(* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))))
(sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))
(* 2 (- (sqrt (+ (* re re) (* im im))) re))
(- (sqrt (+ (* re re) (* im im))) re)
(sqrt (+ (* re re) (* im im)))
(+ (* re re) (* im im))

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

simplify410.0ms (4.4%)

Algorithm

1×	egg-herbie

Rules

6836×	`-lowering-.f32`
6836×	`-lowering-.f64`
3162×	`+-lowering-+.f64`
3162×	`+-lowering-+.f32`
1642×	`sum3-define`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	551	5460
1	1951	5168
2	7427	5166
0	8260	5166

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/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* (sqrt im) (sqrt 2))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* (sqrt im) (sqrt 2))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* 2 im)
(+ (* -2 re) (* 2 im))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(/ (pow im 2) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(* -4 re)
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(/ (pow im 2) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* 2 im)
(* im (+ 2 (* -2 (/ re im))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(* -2 im)
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
im
(+ im (* -1 re))
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(* 1/2 (/ (pow im 2) re))
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)
(* -2 re)
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(* 1/2 (/ (pow im 2) re))
(* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
im
(* im (+ 1 (* -1 (/ re im))))
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))
(* -1 im)
(* -1 (* im (+ 1 (/ re im))))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* (sqrt im) (sqrt 2))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* (sqrt im) (sqrt 2))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* 2 im)
(+ (* -2 re) (* 2 im))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(/ (pow im 2) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(* -4 re)
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(/ (pow im 2) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* 2 im)
(* im (+ 2 (* -2 (/ re im))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(* -2 im)
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
im
(+ im (* -1 re))
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(* 1/2 (/ (pow im 2) re))
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)
(* -2 re)
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(* 1/2 (/ (pow im 2) re))
(* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
im
(* im (+ 1 (* -1 (/ re im))))
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))
(* -1 im)
(* -1 (* im (+ 1 (/ re im))))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
im
(+ im (* 1/2 (/ (pow re 2) im)))
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
im
(* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
(pow im 2)
(+ (pow im 2) (pow re 2))
(+ (pow im 2) (pow re 2))
(+ (pow im 2) (pow re 2))
(pow re 2)
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(pow re 2)
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(pow re 2)
(+ (pow im 2) (pow re 2))
(+ (pow im 2) (pow re 2))
(+ (pow im 2) (pow re 2))
(pow im 2)
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(pow im 2)
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))

Outputs
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+.f64 (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/4 binary64))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+.f64 (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/16 binary64))))))
(+ (* 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 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+.f64 (.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.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/2 binary64)))) #s(literal -1/32 binary64))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+.f64 (.f64 (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/2 binary64)))) #s(literal -1/32 binary64))) (+.f64 (.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (.f64 (.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (+.f64 (.f64 #s(literal -1/1024 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 (.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.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/2 binary64)))) #s(literal -1/32 binary64)))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(.f64 (.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) im) im) #s(literal -1/8 binary64))) (.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(-.f64 #s(literal 0 binary64) (.f64 re (-.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) #s(literal 1 binary64)) (/.f64 (+.f64 (.f64 (.f64 (.f64 #s(literal -1/32 binary64) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) (.f64 re re)))) (.f64 (sqrt.f64 re) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) im) im) #s(literal 1/8 binary64)))) (.f64 re (*.f64 re re))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) #s(literal 1 binary64)) (/.f64 (+.f64 (.f64 (sqrt.f64 re) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) im) im) #s(literal 1/8 binary64))) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) (.f64 re re))) (+.f64 (.f64 (.f64 #s(literal -1/32 binary64) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 #s(literal -1 binary64))) (.f64 (.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))))) (.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(.f64 im (+.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 #s(literal -1/32 binary64) (.f64 im im)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(.f64 im (+.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/32 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 (.f64 (.f64 im im) (.f64 #s(literal 1/4 binary64) (sqrt.f64 re))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(.f64 im (+.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/32 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 re re))) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64))))) (.f64 (.f64 im im) (sqrt.f64 re)))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(.f64 im (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(.f64 im (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 (.f64 re (.f64 (sqrt.f64 #s(literal 2 binary64)) re)) #s(literal 1/8 binary64))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(.f64 im (+.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re (.f64 (sqrt.f64 #s(literal 2 binary64)) re))) #s(literal 1/16 binary64)) (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(-.f64 #s(literal 0 binary64) (.f64 im (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (sqrt.f64 #s(literal -1 binary64)))) (+.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))) (sqrt.f64 #s(literal -1 binary64)))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(.f64 (-.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 re (.f64 (sqrt.f64 #s(literal 2 binary64)) 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/2 binary64))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/8 binary64))))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(+.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64))) (.f64 re (+.f64 (.f64 (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))))))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (.f64 (.f64 #s(literal -1/16 binary64) (.f64 im (.f64 im im))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (+.f64 (.f64 (.f64 (.f64 #s(literal -1/16 binary64) (.f64 im (.f64 im im))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (.f64 (.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (+.f64 (.f64 #s(literal -1/512 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (.f64 (.f64 #s(literal -1/16 binary64) (.f64 im (.f64 im im))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(.f64 (.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) #s(literal -2 binary64))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 (sqrt.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 5 binary64)))) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im) im) #s(literal -1/4 binary64)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (/.f64 (+.f64 (.f64 (.f64 (.f64 #s(literal -1/16 binary64) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) (.f64 re re)))) (.f64 (sqrt.f64 re) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) im) im) #s(literal 1/4 binary64)))) (.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(.f64 re (neg.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (/.f64 (+.f64 (.f64 (sqrt.f64 re) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) im) im) #s(literal 1/4 binary64))) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) (.f64 re re))) (+.f64 (.f64 (.f64 #s(literal -1/16 binary64) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 #s(literal -1 binary64))) (.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))))) (.f64 re (*.f64 re re))))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))
(.f64 im (+.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (/.f64 (.f64 im (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1/16 binary64)))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(.f64 im (+.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (.f64 (.f64 im im) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1/16 binary64))) (.f64 (.f64 (.f64 im im) (.f64 #s(literal 1/2 binary64) (sqrt.f64 re))) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(.f64 im (+.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (.f64 im (.f64 im (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1/16 binary64))) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 re re))) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64))))) (.f64 (.f64 im im) (sqrt.f64 re)))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))))))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(.f64 im (+.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/2 binary64)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(.f64 im (+.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (+.f64 (.f64 (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 (.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)) #s(literal 1/4 binary64))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(.f64 im (+.f64 (+.f64 (.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 (.f64 re (.f64 (sqrt.f64 #s(literal 2 binary64)) re)) #s(literal 1/8 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))
(* -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 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (*.f64 im im))))) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(-.f64 #s(literal 0 binary64) (.f64 im (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (sqrt.f64 #s(literal -1 binary64)))) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re (.f64 (sqrt.f64 #s(literal 2 binary64)) re))) (sqrt.f64 #s(literal -1 binary64))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(.f64 (-.f64 (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 re (.f64 (sqrt.f64 #s(literal 2 binary64)) re))) (.f64 (sqrt.f64 im) #s(literal 3/8 binary64))) (.f64 im (.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 #s(literal -2 binary64) (.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 re re)) (.f64 im (*.f64 im im))))))))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/.f64 (+.f64 (.f64 im im) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re))) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/.f64 (+.f64 (+.f64 (.f64 im im) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 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)))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(/.f64 (-.f64 (+.f64 (+.f64 (.f64 im im) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 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)))) re)
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(.f64 re (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (/.f64 (*.f64 im im) re) re)) #s(literal -1 binary64)))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(.f64 (+.f64 (+.f64 #s(literal 4 binary64) (/.f64 (/.f64 (.f64 im im) re) re)) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(.f64 (+.f64 (+.f64 (+.f64 #s(literal 4 binary64) (/.f64 (/.f64 (.f64 im im) re) re)) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))) (-.f64 #s(literal 0 binary64) re))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 im im)) (.f64 re (.f64 re re)))))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal -1/4 binary64) (.f64 re (.f64 re re))) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 im im)) (pow.f64 re #s(literal 5 binary64)))))))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(.f64 im (.f64 im (+.f64 (/.f64 #s(literal 1 binary64) re) (.f64 (.f64 im im) (+.f64 (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal -5/64 binary64) (.f64 im im)) (pow.f64 re #s(literal 7 binary64))) (/.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal 5 binary64))))) (/.f64 #s(literal -1/4 binary64) (.f64 re (.f64 re re))))))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (.f64 re #s(literal -2 binary64)) im)))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(.f64 im (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (.f64 re #s(literal -2 binary64)) im)) (/.f64 (.f64 re re) (.f64 im im))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(.f64 im (+.f64 #s(literal 2 binary64) (+.f64 (/.f64 (.f64 re re) (.f64 im im)) (+.f64 (/.f64 (.f64 re #s(literal -2 binary64)) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64)))))))
(* -2 im)
(*.f64 im #s(literal -2 binary64))
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(-.f64 #s(literal 0 binary64) (.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (.f64 re #s(literal 2 binary64)) im))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(.f64 (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im)) im)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(.f64 (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (.f64 re #s(literal -2 binary64)) (/.f64 (+.f64 (.f64 re re) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im))) im)) im)) (-.f64 #s(literal 0 binary64) im))
im
(+ im (* -1 re))
(-.f64 im re)
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+.f64 im (.f64 re (+.f64 #s(literal -1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) re) im))))
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(+.f64 im (.f64 re (+.f64 #s(literal -1 binary64) (.f64 re (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 re re)) (.f64 im (.f64 im im))) (/.f64 #s(literal 1/2 binary64) im))))))
(* 1/2 (/ (pow im 2) re))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)
(/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (.f64 re re)) (.f64 #s(literal 1/2 binary64) (.f64 im im))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (.f64 re re)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) re)
(/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)
(/.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (.f64 re re)) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64))) (pow.f64 re #s(literal 6 binary64))))) re)
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (*.f64 im im) re) re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(.f64 (+.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (.f64 im im) re) re))) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(.f64 (+.f64 #s(literal 2 binary64) (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (.f64 im im) 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/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64))))) (-.f64 #s(literal 0 binary64) re))
(* 1/2 (/ (pow im 2) re))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) re)
(* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))
(.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (/.f64 (/.f64 (.f64 im im) re) re) re)) (/.f64 #s(literal 1/2 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal -1/8 binary64) (.f64 re (.f64 re re))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 im im)) (pow.f64 re #s(literal 5 binary64)))))))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(.f64 im (.f64 im (+.f64 (/.f64 #s(literal 1/2 binary64) re) (.f64 (.f64 im im) (+.f64 (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 (.f64 #s(literal -5/128 binary64) (.f64 im im)) (pow.f64 re #s(literal 7 binary64))))) (/.f64 #s(literal -1/8 binary64) (.f64 re (.f64 re re))))))))
im
(* im (+ 1 (* -1 (/ re im))))
(*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(.f64 im (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))))
(* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))
(.f64 im (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im)) (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))) (/.f64 re im)))))
(* -1 im)
(-.f64 #s(literal 0 binary64) im)
(* -1 (* im (+ 1 (/ re im))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 #s(literal 1 binary64) (/.f64 re im)))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 re re)) im) re) im)))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
(.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (.f64 im im)) (.f64 #s(literal 1/2 binary64) (*.f64 re re))) (-.f64 #s(literal 0 binary64) im)) re) im)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+.f64 (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/4 binary64))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+.f64 (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/16 binary64))))))
(+ (* 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 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+.f64 (.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.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/2 binary64)))) #s(literal -1/32 binary64))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+.f64 (.f64 (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/2 binary64)))) #s(literal -1/32 binary64))) (+.f64 (.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (.f64 (.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (+.f64 (.f64 #s(literal -1/1024 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 (.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.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/2 binary64)))) #s(literal -1/32 binary64)))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(.f64 (.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) im) im) #s(literal -1/8 binary64))) (.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(-.f64 #s(literal 0 binary64) (.f64 re (-.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) #s(literal 1 binary64)) (/.f64 (+.f64 (.f64 (.f64 (.f64 #s(literal -1/32 binary64) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) (.f64 re re)))) (.f64 (sqrt.f64 re) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) im) im) #s(literal 1/8 binary64)))) (.f64 re (*.f64 re re))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) #s(literal 1 binary64)) (/.f64 (+.f64 (.f64 (sqrt.f64 re) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) im) im) #s(literal 1/8 binary64))) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) (.f64 re re))) (+.f64 (.f64 (.f64 #s(literal -1/32 binary64) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 #s(literal -1 binary64))) (.f64 (.f64 #s(literal 1/64 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))))) (.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(.f64 im (+.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 #s(literal -1/32 binary64) (.f64 im im)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(.f64 im (+.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/32 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 (.f64 (.f64 im im) (.f64 #s(literal 1/4 binary64) (sqrt.f64 re))) (/.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(.f64 im (+.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/32 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 re re))) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64))))) (.f64 (.f64 im im) (sqrt.f64 re)))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(.f64 im (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(.f64 im (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 (.f64 re (.f64 (sqrt.f64 #s(literal 2 binary64)) re)) #s(literal 1/8 binary64))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(.f64 im (+.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re (.f64 (sqrt.f64 #s(literal 2 binary64)) re))) #s(literal 1/16 binary64)) (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) re)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(-.f64 #s(literal 0 binary64) (.f64 im (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (sqrt.f64 #s(literal -1 binary64)))) (+.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))) (sqrt.f64 #s(literal -1 binary64)))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(.f64 (-.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 re (.f64 (sqrt.f64 #s(literal 2 binary64)) 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 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/2 binary64))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal 1/8 binary64))))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(+.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64))) (.f64 re (+.f64 (.f64 (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))))))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (.f64 (.f64 #s(literal -1/16 binary64) (.f64 im (.f64 im im))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (+.f64 (.f64 (.f64 (.f64 #s(literal -1/16 binary64) (.f64 im (.f64 im im))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (.f64 (.f64 (*.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (+.f64 (.f64 #s(literal -1/512 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (.f64 (.f64 #s(literal -1/16 binary64) (.f64 im (.f64 im im))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(.f64 (.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) #s(literal -2 binary64))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 (sqrt.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 5 binary64)))) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im) im) #s(literal -1/4 binary64)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (/.f64 (+.f64 (.f64 (.f64 (.f64 #s(literal -1/16 binary64) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) (.f64 re re)))) (.f64 (sqrt.f64 re) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) im) im) #s(literal 1/4 binary64)))) (.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(.f64 re (neg.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (/.f64 (+.f64 (.f64 (sqrt.f64 re) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) im) im) #s(literal 1/4 binary64))) (.f64 (sqrt.f64 (/.f64 (/.f64 #s(literal 1 binary64) re) (.f64 re re))) (+.f64 (.f64 (.f64 #s(literal -1/16 binary64) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 #s(literal -1 binary64))) (.f64 (.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))))) (.f64 re (*.f64 re re))))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))
(.f64 im (+.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (/.f64 (.f64 im (*.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1/16 binary64)))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(.f64 im (+.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (.f64 (.f64 im im) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1/16 binary64))) (.f64 (.f64 (.f64 im im) (.f64 #s(literal 1/2 binary64) (sqrt.f64 re))) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))))))))
(* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(.f64 im (+.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (.f64 im (.f64 im (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) #s(literal -1/16 binary64))) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 re re))) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64))))) (.f64 (.f64 im im) (sqrt.f64 re)))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))))))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(.f64 im (+.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) #s(literal -1/2 binary64)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(.f64 im (+.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (+.f64 (.f64 (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 (.f64 re (*.f64 (sqrt.f64 #s(literal 2 binary64)) re)) #s(literal 1/4 binary64))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(.f64 im (+.f64 (+.f64 (.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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 (.f64 re (.f64 (sqrt.f64 #s(literal 2 binary64)) re)) #s(literal 1/8 binary64)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))
(* -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 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (*.f64 im im))))) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(-.f64 #s(literal 0 binary64) (.f64 im (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (sqrt.f64 #s(literal -1 binary64)))) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re (.f64 (sqrt.f64 #s(literal 2 binary64)) re))) (sqrt.f64 #s(literal -1 binary64))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(.f64 (-.f64 (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 re (.f64 (sqrt.f64 #s(literal 2 binary64)) re))) (.f64 (sqrt.f64 im) #s(literal 3/8 binary64))) (.f64 im (.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 #s(literal -2 binary64) (.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 re re)) (.f64 im (*.f64 im im))))))))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/.f64 (+.f64 (.f64 im im) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re))) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/.f64 (+.f64 (+.f64 (.f64 im im) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 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)))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(/.f64 (-.f64 (+.f64 (+.f64 (.f64 im im) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 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)))) re)
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(.f64 re (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (/.f64 (*.f64 im im) re) re)) #s(literal -1 binary64)))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(.f64 (+.f64 (+.f64 #s(literal 4 binary64) (/.f64 (/.f64 (.f64 im im) re) re)) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(.f64 (+.f64 (+.f64 (+.f64 #s(literal 4 binary64) (/.f64 (/.f64 (.f64 im im) re) re)) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))) (-.f64 #s(literal 0 binary64) re))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 im im)) (.f64 re (.f64 re re)))))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal -1/4 binary64) (.f64 re (.f64 re re))) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 im im)) (pow.f64 re #s(literal 5 binary64)))))))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(.f64 im (.f64 im (+.f64 (/.f64 #s(literal 1 binary64) re) (.f64 (.f64 im im) (+.f64 (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal -5/64 binary64) (.f64 im im)) (pow.f64 re #s(literal 7 binary64))) (/.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal 5 binary64))))) (/.f64 #s(literal -1/4 binary64) (.f64 re (.f64 re re))))))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (.f64 re #s(literal -2 binary64)) im)))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(.f64 im (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (.f64 re #s(literal -2 binary64)) im)) (/.f64 (.f64 re re) (.f64 im im))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(.f64 im (+.f64 #s(literal 2 binary64) (+.f64 (/.f64 (.f64 re re) (.f64 im im)) (+.f64 (/.f64 (.f64 re #s(literal -2 binary64)) im) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64)))))))
(* -2 im)
(*.f64 im #s(literal -2 binary64))
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(-.f64 #s(literal 0 binary64) (.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (.f64 re #s(literal 2 binary64)) im))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(.f64 (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im)) im)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(.f64 (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (.f64 re #s(literal -2 binary64)) (/.f64 (+.f64 (.f64 re re) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im))) im)) im)) (-.f64 #s(literal 0 binary64) im))
im
(+ im (* -1 re))
(-.f64 im re)
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+.f64 im (.f64 re (+.f64 #s(literal -1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) re) im))))
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(+.f64 im (.f64 re (+.f64 #s(literal -1 binary64) (.f64 re (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 re re)) (.f64 im (.f64 im im))) (/.f64 #s(literal 1/2 binary64) im))))))
(* 1/2 (/ (pow im 2) re))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)
(/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (.f64 re re)) (.f64 #s(literal 1/2 binary64) (.f64 im im))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (.f64 re re)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) re)
(/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)
(/.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (.f64 re re)) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64))) (pow.f64 re #s(literal 6 binary64))))) re)
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (*.f64 im im) re) re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(.f64 (+.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (.f64 im im) re) re))) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(.f64 (+.f64 #s(literal 2 binary64) (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (.f64 im im) 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/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64))))) (-.f64 #s(literal 0 binary64) re))
(* 1/2 (/ (pow im 2) re))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) re)
(* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))
(.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (/.f64 (/.f64 (.f64 im im) re) re) re)) (/.f64 #s(literal 1/2 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal -1/8 binary64) (.f64 re (.f64 re re))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 im im)) (pow.f64 re #s(literal 5 binary64)))))))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(.f64 im (.f64 im (+.f64 (/.f64 #s(literal 1/2 binary64) re) (.f64 (.f64 im im) (+.f64 (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 (.f64 #s(literal -5/128 binary64) (.f64 im im)) (pow.f64 re #s(literal 7 binary64))))) (/.f64 #s(literal -1/8 binary64) (.f64 re (.f64 re re))))))))
im
(* im (+ 1 (* -1 (/ re im))))
(*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(.f64 im (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im)) (-.f64 #s(literal 1 binary64) (/.f64 re im))))
(* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))
(.f64 im (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im)) (-.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))) (/.f64 re im)))))
(* -1 im)
(-.f64 #s(literal 0 binary64) im)
(* -1 (* im (+ 1 (/ re im))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 #s(literal 1 binary64) (/.f64 re im)))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 re re)) im) re) im)))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
(.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (.f64 im im)) (.f64 #s(literal 1/2 binary64) (*.f64 re re))) (-.f64 #s(literal 0 binary64) im)) re) im)))
im
(+ im (* 1/2 (/ (pow re 2) im)))
(+.f64 im (.f64 (.f64 re re) (/.f64 #s(literal 1/2 binary64) im)))
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+.f64 im (.f64 (.f64 re re) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 re re)) (.f64 im (.f64 im im))) (/.f64 #s(literal 1/2 binary64) im))))
(+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))
(+.f64 im (.f64 re (.f64 re (+.f64 (/.f64 #s(literal 1/2 binary64) im) (.f64 (.f64 re re) (+.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 re re)) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (.f64 im (.f64 im im)))))))))
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(.f64 re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (*.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 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (.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 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (.f64 im im) 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/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64))))))
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(-.f64 #s(literal 0 binary64) (.f64 re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (*.f64 im im) re) re)))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(.f64 (+.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 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (.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 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (/.f64 (.f64 im im) 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/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64))))) (-.f64 #s(literal 0 binary64) re))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(+.f64 re (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) re))
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+.f64 re (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (/.f64 (/.f64 (.f64 im im) re) re) re)) (/.f64 #s(literal 1/2 binary64) re))))
(+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
(+.f64 re (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal -1/8 binary64) (.f64 re (.f64 re re))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 im im)) (pow.f64 re #s(literal 5 binary64))))))))
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 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im))) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64)))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(.f64 im (+.f64 (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im))) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64)))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64)))))
(* -1 im)
(-.f64 #s(literal 0 binary64) im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(-.f64 #s(literal 0 binary64) (.f64 im (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im))) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
(.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im))) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64)))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64)))))
(pow im 2)
(*.f64 im im)
(+ (pow im 2) (pow re 2))
(+.f64 (.f64 im im) (.f64 re re))
(+ (pow im 2) (pow re 2))
(+.f64 (.f64 im im) (.f64 re re))
(+ (pow im 2) (pow re 2))
(+.f64 (.f64 im im) (.f64 re re))
(pow re 2)
(*.f64 re re)
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(.f64 (.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 im im) re) re)))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(.f64 (.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 im im) re) re)))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(.f64 (.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 im im) 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 (*.f64 im im) re) re)))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(.f64 (.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 im im) re) re)))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(.f64 (.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (*.f64 im im) 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 re re) (.f64 im im))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(.f64 (.f64 im im) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 re re) (.f64 im im))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(.f64 (.f64 im im) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 re re) (.f64 im im))))
(pow im 2)
(*.f64 im im)
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(.f64 (.f64 im im) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 re re) (.f64 im im))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(.f64 (.f64 im im) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 re re) (.f64 im im))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(.f64 (.f64 im im) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 re re) (.f64 im im))))

eval71.0ms (0.8%)

Compiler: Compiled 20637 to 2194 computations (89.4% saved)

prune65.0ms (0.7%)

Pruning

15 alts after pruning (14 fresh and 1 done)

	Pruned	Kept	Total
New	591	14	605
Fresh	0	0	0
Picked	1	1	2
Done	0	0	0
Total	592	15	607

Accuracy

99.7%

Counts

607 → 15

Alt Table

Click to see full alt table

Status	Accuracy	Program
	23.8%	(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
▶	80.1%	(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (hypot.f64 re im) re))) (sqrt.f64 #s(literal 2 binary64)))
	16.7%	(.f64 im (+.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 (.f64 (.f64 #s(literal -1/32 binary64) (.f64 im im)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
▶	80.0%	(.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
	23.9%	(.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
▶	12.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (.f64 im im) re)))
	52.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
	12.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.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)))))))
▶	26.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (/.f64 (.f64 im im) re) re)) #s(literal -1 binary64)))))
	28.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re #s(literal -4 binary64))))
	54.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))))
▶	52.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))))
	11.8%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (-.f64 (.f64 (+.f64 (.f64 re re) (.f64 im im)) (+.f64 (.f64 re re) (.f64 im im))) (.f64 re (.f64 re (.f64 re re)))) (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im)))) (+.f64 (.f64 re re) (+.f64 (.f64 re re) (.f64 im im)))))))
✓	80.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
	55.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 im re))))

Compiler

Compiled 518 to 353 computations (31.9% saved)

simplify181.0ms (1.9%)

Algorithm

1×	egg-herbie

Localize:

Found 19 expressions of interest:

New	Metric	Score	Program
✓	cost-diff	0	(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
✓	cost-diff	0	(pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64))
✓	cost-diff	6528	(pow.f64 (pow.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
✓	cost-diff	6528	(.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
✓	cost-diff	128	(.f64 (+.f64 #s(literal 4 binary64) (/.f64 (/.f64 (.f64 im im) re) re)) #s(literal -1 binary64))
✓	cost-diff	256	(.f64 re (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (/.f64 (*.f64 im im) re) re)) #s(literal -1 binary64)))
✓	cost-diff	256	(sqrt.f64 (.f64 re (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (/.f64 (*.f64 im im) re) re)) #s(literal -1 binary64))))
✓	cost-diff	256	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (/.f64 (.f64 im im) re) re)) #s(literal -1 binary64)))))
✓	cost-diff	0	(*.f64 im im)
✓	cost-diff	0	(/.f64 (*.f64 im im) re)
✓	cost-diff	0	(sqrt.f64 (/.f64 (*.f64 im im) re))
✓	cost-diff	0	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (.f64 im im) re)))
✓	cost-diff	0	(*.f64 im #s(literal 2 binary64))
✓	cost-diff	0	(sqrt.f64 (*.f64 im #s(literal 2 binary64)))
✓	cost-diff	0	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))))
✓	cost-diff	0	(-.f64 (hypot.f64 re im) re)
✓	cost-diff	0	(sqrt.f64 (-.f64 (hypot.f64 re im) re))
✓	cost-diff	0	(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (hypot.f64 re im) re)))
✓	cost-diff	0	(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (hypot.f64 re im) re))) (sqrt.f64 #s(literal 2 binary64)))

Rules

2642×	`sum3-define`
1928×	`fmsub-define`
1710×	`fma-lowering-fma.f32`
1710×	`fma-lowering-fma.f64`
1688×	`-lowering-.f32`

Iterations

Useful iterations: 5 (0.0ms)

Iter	Nodes	Cost
0	32	216
1	56	208
2	111	201
3	236	197
4	469	194
5	771	191
6	1698	191
7	3032	191
8	5788	191
0	8537	191

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

Inputs
(* (* 1/2 (sqrt (- (sqrt (+ (* re re) (* im im))) re))) (sqrt 2))
(* 1/2 (sqrt (- (sqrt (+ (* re re) (* im im))) re)))
1/2
(sqrt (- (sqrt (+ (* re re) (* im im))) re))
(- (sqrt (+ (* re re) (* im im))) re)
(sqrt (+ (* re re) (* im im)))
re
im
(sqrt 2)
2
(* 1/2 (sqrt (* im 2)))
1/2
(sqrt (* im 2))
(* im 2)
im
2
(* 1/2 (sqrt (/ (* im im) re)))
1/2
(sqrt (/ (* im im) re))
(/ (* im im) re)
(* im im)
im
re
(* 1/2 (sqrt (* re (* (+ 4 (/ (/ (* im im) re) re)) -1))))
1/2
(sqrt (* re (* (+ 4 (/ (/ (* im im) re) re)) -1)))
(* re (* (+ 4 (/ (/ (* im im) re) re)) -1))
re
(* (+ 4 (/ (/ (* im im) re) re)) -1)
(+ 4 (/ (/ (* im im) re) re))
4
(/ (/ (* im im) re) re)
(/ (* im im) re)
(* im im)
im
-1
(* 1/2 (pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/4) 2))
1/2
(pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/4) 2)
(pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/4)
(* 2 (- (sqrt (+ (* re re) (* im im))) re))
2
(- (sqrt (+ (* re re) (* im im))) re)
(sqrt (+ (* re re) (* im im)))
re
im
1/4

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

localize167.0ms (1.8%)

Localize:

Found 19 expressions of interest:

New	Metric	Score	Program
✓	accuracy	100.0%	(hypot.f64 re im)
✓	accuracy	100.0%	(-.f64 (hypot.f64 re im) re)
✓	accuracy	100.0%	(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
✓	accuracy	100.0%	(.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
✓	accuracy	100.0%	(.f64 re (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (/.f64 (*.f64 im im) re) re)) #s(literal -1 binary64)))
✓	accuracy	100.0%	(*.f64 im im)
✓	accuracy	100.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (/.f64 (.f64 im im) re) re)) #s(literal -1 binary64)))))
✓	accuracy	100.0%	(sqrt.f64 (.f64 re (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (/.f64 (*.f64 im im) re) re)) #s(literal -1 binary64))))
✓	accuracy	100.0%	(/.f64 (*.f64 im im) re)
✓	accuracy	100.0%	(*.f64 im im)
✓	accuracy	100.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (.f64 im im) re)))
✓	accuracy	100.0%	(sqrt.f64 (/.f64 (*.f64 im im) re))
✓	accuracy	100.0%	(*.f64 im #s(literal 2 binary64))
✓	accuracy	100.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))))
✓	accuracy	100.0%	(sqrt.f64 (*.f64 im #s(literal 2 binary64)))
✓	accuracy	100.0%	(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (hypot.f64 re im) re))) (sqrt.f64 #s(literal 2 binary64)))
✓	accuracy	100.0%	(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (hypot.f64 re im) re)))
✓	accuracy	100.0%	(sqrt.f64 (-.f64 (hypot.f64 re im) re))
✓	accuracy	100.0%	(sqrt.f64 #s(literal 2 binary64))

Results

112.0ms

256×

invalid

Compiler

Compiled 219 to 31 computations (85.8% saved)

Precisions

Click to see histograms. Total time spent on operations: 61.0ms

ival-mult: 21.0ms (34.4% of total)

ival-sqrt: 12.0ms (19.6% of total)

ival-pow: 11.0ms (18% of total)

compiled-spec: 9.0ms (14.7% of total)

ival-div: 4.0ms (6.5% of total)

ival-add: 2.0ms (3.3% of total)

ival-sub: 1.0ms (1.6% of total)

const: 1.0ms (1.6% of total)

backward-pass: 0.0ms (0% of total)

series54.0ms (0.6%)

Counts

21 → 432

Calls

Call 1

Inputs
#<alt (* (* 1/2 (sqrt (- (sqrt (+ (* re re) (* im im))) re))) (sqrt 2))>
#<alt (* 1/2 (sqrt (- (sqrt (+ (* re re) (* im im))) re)))>
#<alt (sqrt (- (sqrt (+ (* re re) (* im im))) re))>
#<alt (- (sqrt (+ (* re re) (* im im))) re)>
#<alt (* 1/2 (sqrt (* im 2)))>
#<alt (sqrt (* im 2))>
#<alt (* im 2)>
#<alt (* 1/2 (sqrt (/ (* im im) re)))>
#<alt (sqrt (/ (* im im) re))>
#<alt (/ (* im im) re)>
#<alt (* im im)>
#<alt (* 1/2 (sqrt (* re (* (+ 4 (/ (/ (* im im) re) re)) -1))))>
#<alt (sqrt (* re (* (+ 4 (/ (/ (* im im) re) re)) -1)))>
#<alt (* re (* (+ 4 (/ (/ (* im im) re) re)) -1))>
#<alt (* (+ 4 (/ (/ (* im im) re) re)) -1)>
#<alt (* 1/2 (pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/4) 2))>
#<alt (pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/4) 2)>
#<alt (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/4)>
#<alt (* 2 (- (sqrt (+ (* re re) (* im im))) re))>
#<alt (sqrt 2)>
#<alt (sqrt (+ (* re re) (* im im)))>

Outputs
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))>
#<alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))>
#<alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))>
#<alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))>
#<alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))>
#<alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))>
#<alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))>
#<alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))>
#<alt (* 1/2 (sqrt im))>
#<alt (+ (* -1/4 (* (sqrt (/ 1 im)) re)) (* 1/2 (sqrt im)))>
#<alt (+ (* 1/2 (sqrt im)) (* re (+ (* -1/4 (sqrt (/ 1 im))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) re)))))>
#<alt (+ (* 1/2 (sqrt im)) (* re (+ (* -1/4 (sqrt (/ 1 im))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) re)) (* 1/16 (sqrt (/ 1 (pow im 3)))))))))>
#<alt (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))>
#<alt (+ (* -1/32 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))))>
#<alt (+ (* -1/32 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))))>
#<alt (+ (* -1/32 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (pow im 5) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))))))>
#<alt (* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* re (+ (* -1/8 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))>
#<alt (* im (+ (* -1/32 (* (/ (pow im 2) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (sqrt 1/2)))))>
#<alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt 1/2))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt re)))))))>
#<alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt 1/2))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (sqrt 1/2))))))))))>
#<alt (* 1/2 (sqrt im))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) re)) (* 1/2 (sqrt (/ 1 im)))))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (sqrt (/ 1 im))))))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (sqrt (/ 1 im)))))))>
#<alt (* -1/2 (* (sqrt im) (sqrt -1)))>
#<alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt -1))))))>
#<alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt -1)))))))>
#<alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (sqrt -1)))) (* 1/8 (* (sqrt im) (* (pow re 2) (sqrt -1))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt -1)))))))>
#<alt (sqrt im)>
#<alt (+ (sqrt im) (* -1/2 (* (sqrt (/ 1 im)) re)))>
#<alt (+ (sqrt im) (* re (+ (* -1/2 (sqrt (/ 1 im))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) re)))))>
#<alt (+ (sqrt im) (* re (+ (* -1/2 (sqrt (/ 1 im))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) re)) (* 1/8 (sqrt (/ 1 (pow im 3)))))))))>
#<alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))>
#<alt (+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))>
#<alt (+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))))>
#<alt (+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (pow im 5) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))))>
#<alt (* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* re (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))>
#<alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))>
#<alt (* im (+ (* -1/16 (* (/ (pow im 2) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 1/2))))>
#<alt (* im (+ (* (sqrt (/ 1 re)) (sqrt 1/2)) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt re)))))))>
#<alt (* im (+ (* (sqrt (/ 1 re)) (sqrt 1/2)) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (sqrt 1/2))))))))))>
#<alt (sqrt im)>
#<alt (* im (+ (sqrt (/ 1 im)) (* -1/2 (* (sqrt (/ 1 (pow im 3))) re))))>
#<alt (* im (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)) (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2))))))>
#<alt (* im (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2)))))))>
#<alt (* -1 (* (sqrt im) (sqrt -1)))>
#<alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1)))))>
#<alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))>
#<alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (sqrt -1)))) (* 1/4 (* (sqrt im) (* (pow re 2) (sqrt -1))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))>
#<alt im>
#<alt (+ im (* -1 re))>
#<alt (+ im (* re (- (* 1/2 (/ re im)) 1)))>
#<alt (+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))>
#<alt (* 1/2 (/ (pow im 2) re))>
#<alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)>
#<alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)>
#<alt (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)>
#<alt (* -2 re)>
#<alt (* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))>
#<alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))>
#<alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))>
#<alt (* 1/2 (/ (pow im 2) re))>
#<alt (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))>
#<alt im>
#<alt (* im (+ 1 (* -1 (/ re im))))>
#<alt (* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))>
#<alt (* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))>
#<alt (* -1 im)>
#<alt (* -1 (* im (+ 1 (/ re im))))>
#<alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))>
#<alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* -1/2 (* im (sqrt (/ 1 re))))>
#<alt (* -1/2 (* im (sqrt (/ 1 re))))>
#<alt (* -1/2 (* im (sqrt (/ 1 re))))>
#<alt (* -1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* -1 (* im (sqrt (/ 1 re))))>
#<alt (* -1 (* im (sqrt (/ 1 re))))>
#<alt (* -1 (* im (sqrt (/ 1 re))))>
#<alt (* -1 (* im (sqrt (/ 1 re))))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))>
#<alt (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))>
#<alt (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))>
#<alt (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (/ (sqrt -1) im) (sqrt (pow re 5)))) re)>
#<alt (/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (pow re 3) (+ (* -1 (* (/ (sqrt -1) (pow im 3)) (sqrt (pow re 3)))) (* (/ (sqrt -1) im) (sqrt (/ 1 re)))))) re)>
#<alt (/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (pow re 3) (+ (* (/ (sqrt -1) im) (sqrt (/ 1 re))) (* (pow re 3) (+ (* -1 (* (/ (sqrt -1) (pow im 3)) (sqrt (/ 1 (pow re 3))))) (* 2 (* (/ (sqrt -1) (pow im 5)) (sqrt re)))))))) re)>
#<alt (* (sqrt re) (sqrt -1))>
#<alt (* re (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1))))>
#<alt (* re (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* re (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/1024 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 (pow re 13))))) (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* (sqrt re) (sqrt -1)))>
#<alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* 1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (pow re 3)))) (* -1/1024 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 re))))) (pow re 3))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* (sqrt re) (sqrt -1))>
#<alt (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt -1)))>
#<alt (+ (* (sqrt re) (sqrt -1)) (* (pow im 2) (+ (* -1/128 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 7))))) (* 1/8 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))))))>
#<alt (+ (* (sqrt re) (sqrt -1)) (* (pow im 2) (+ (* 1/8 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))) (* (pow im 2) (+ (* -1/128 (* (sqrt (/ 1 (pow re 7))) (sqrt -1))) (* 1/1024 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 11))))))))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))>
#<alt (* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))>
#<alt (* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (+ (* 2 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))))>
#<alt (* -1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))>
#<alt (* -1 (* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))))>
#<alt (* -1 (* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (+ (* 2 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (/ (+ (* 2 (* (/ (sqrt -1) im) (sqrt (pow re 5)))) (* (* im (sqrt -1)) (sqrt re))) re)>
#<alt (/ (+ (* (* im (sqrt -1)) (sqrt re)) (* (pow re 3) (+ (* -2 (* (/ (sqrt -1) (pow im 3)) (sqrt (pow re 3)))) (* 2 (* (/ (sqrt -1) im) (sqrt (/ 1 re))))))) re)>
#<alt (/ (+ (* (* im (sqrt -1)) (sqrt re)) (* (pow re 3) (+ (* 2 (* (/ (sqrt -1) im) (sqrt (/ 1 re)))) (* (pow re 3) (+ (* -2 (* (/ (sqrt -1) (pow im 3)) (sqrt (/ 1 (pow re 3))))) (* 4 (* (/ (sqrt -1) (pow im 5)) (sqrt re)))))))) re)>
#<alt (* 2 (* (sqrt re) (sqrt -1)))>
#<alt (* re (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* re (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* re (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/512 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 (pow re 13))))) (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1)))))))>
#<alt (* -2 (* (sqrt re) (sqrt -1)))>
#<alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (pow re 3)))) (* -1/512 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 re))))) (pow re 3))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* 2 (* (sqrt re) (sqrt -1)))>
#<alt (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 2 (* (sqrt re) (sqrt -1))))>
#<alt (+ (* 2 (* (sqrt re) (sqrt -1))) (* (pow im 2) (+ (* -1/64 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 7))))) (* 1/4 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))))))>
#<alt (+ (* 2 (* (sqrt re) (sqrt -1))) (* (pow im 2) (+ (* 1/4 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))) (* (pow im 2) (+ (* -1/64 (* (sqrt (/ 1 (pow re 7))) (sqrt -1))) (* 1/512 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 11))))))))))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* im (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1))))>
#<alt (* im (+ (* -2 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* im (+ (* -2 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (+ (* 4 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* -1 (* im (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* -1 (* im (+ (* -2 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* im (+ (* -2 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (+ (* 4 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (sqrt (/ 1 re)) (sqrt -1)))))))>
#<alt (* -1 (/ (pow im 2) re))>
#<alt (/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)>
#<alt (/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)>
#<alt (/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)>
#<alt (* -4 re)>
#<alt (* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))>
#<alt (* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))>
#<alt (* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))>
#<alt (* -4 re)>
#<alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))>
#<alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))>
#<alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))>
#<alt (* -4 re)>
#<alt (+ (* -4 re) (* -1 (/ (pow im 2) re)))>
#<alt (+ (* -4 re) (* -1 (/ (pow im 2) re)))>
#<alt (+ (* -4 re) (* -1 (/ (pow im 2) re)))>
#<alt (* -1 (/ (pow im 2) re))>
#<alt (* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))>
#<alt (* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))>
#<alt (* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))>
#<alt (* -1 (/ (pow im 2) re))>
#<alt (* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))>
#<alt (* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))>
#<alt (* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))>
#<alt -4>
#<alt (- (* -1 (/ (pow im 2) (pow re 2))) 4)>
#<alt (- (* -1 (/ (pow im 2) (pow re 2))) 4)>
#<alt (- (* -1 (/ (pow im 2) (pow re 2))) 4)>
#<alt (* -1 (/ (pow im 2) (pow re 2)))>
#<alt (* -1 (* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2)))))>
#<alt (* -1 (* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2)))))>
#<alt (* -1 (* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2)))))>
#<alt (* -1 (/ (pow im 2) (pow re 2)))>
#<alt (* -1 (* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2)))))>
#<alt (* -1 (* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2)))))>
#<alt (* -1 (* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2)))))>
#<alt (* -1 (/ (pow im 2) (pow re 2)))>
#<alt (/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) (pow re 2))>
#<alt (/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) (pow re 2))>
#<alt (/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) (pow re 2))>
#<alt -4>
#<alt (- (* -1 (/ (pow im 2) (pow re 2))) 4)>
#<alt (- (* -1 (/ (pow im 2) (pow re 2))) 4)>
#<alt (- (* -1 (/ (pow im 2) (pow re 2))) 4)>
#<alt -4>
#<alt (- (* -1 (/ (pow im 2) (pow re 2))) 4)>
#<alt (- (* -1 (/ (pow im 2) (pow re 2))) 4)>
#<alt (- (* -1 (/ (pow im 2) (pow re 2))) 4)>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))>
#<alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))>
#<alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))>
#<alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))>
#<alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))>
#<alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))>
#<alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))>
#<alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (* im (sqrt (/ 1 re))))>
#<alt (+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re)))))>
#<alt (+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* -1/128 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re))))))>
#<alt (* -2 (* (sqrt re) (sqrt -1)))>
#<alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (+ (sqrt (/ 1 re)) (* -1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))>
#<alt (* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* 7/128 (* (pow im 2) (sqrt (/ 1 (pow re 9)))))))))>
#<alt (* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* (pow im 2) (+ (* -33/1024 (* (pow im 2) (sqrt (/ 1 (pow re 13))))) (* 7/128 (sqrt (/ 1 (pow re 9))))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt 2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -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/4 (pow (/ 2 (pow im 3)) 1/4)) (* 1/32 (* (pow (/ 2 (pow im 7)) 1/4) re)))) (pow (* 2 im) 1/4))>
#<alt (+ (* re (+ (* -1/4 (pow (/ 2 (pow im 3)) 1/4)) (* re (+ (* 1/32 (pow (/ 2 (pow im 7)) 1/4)) (* 5/128 (* (pow (/ 2 (pow im 11)) 1/4) re)))))) (pow (* 2 im) 1/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 (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)) (* 2 (log im)))))>
#<alt (+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 2))))>
#<alt (+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/16 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* 13/512 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 4))))))>
#<alt (+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/16 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* (pow im 2) (+ (* -119/8192 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 6))) (* 13/512 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 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/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/384 (pow re 3)) (* 1/24 (+ (* -2 (pow re 3)) (* 3 (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/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/384 (pow re 3)) (* 1/24 (+ (* -2 (pow re 3)) (* 3 (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 re) (* 2 im))>
#<alt (+ (* 2 im) (* re (- (/ re im) 2)))>
#<alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))>
#<alt (/ (pow im 2) re)>
#<alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)>
#<alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)>
#<alt (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)>
#<alt (* -4 re)>
#<alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))>
#<alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))>
#<alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))>
#<alt (/ (pow im 2) re)>
#<alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))>
#<alt (* 2 im)>
#<alt (* im (+ 2 (* -2 (/ re im))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))>
#<alt (* -2 im)>
#<alt (* -1 (* im (+ 2 (* 2 (/ re im)))))>
#<alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))>
#<alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))>
#<alt im>
#<alt (+ im (* 1/2 (/ (pow re 2) im)))>
#<alt (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))>
#<alt (+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))>
#<alt re>
#<alt (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))>
#<alt (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))>
#<alt (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))>
#<alt (* -1 re)>
#<alt (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))>
#<alt (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))>
#<alt (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))>
#<alt re>
#<alt (+ re (* 1/2 (/ (pow im 2) re)))>
#<alt (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))>
#<alt (+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))>
#<alt im>
#<alt (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))>
#<alt (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))>
#<alt (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))>
#<alt (* -1 im)>
#<alt (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))>
#<alt (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))>
#<alt (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))>

Calls

108 calls:

Time	Variable		Point	Expression
5.0ms	re	@	0	(pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/4)
3.0ms	re	@	-inf	(pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/4)
2.0ms	re	@	-inf	(* 1/2 (sqrt (/ (* im im) re)))
2.0ms	im	@	0	(* im 2)
2.0ms	im	@	0	(pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/4) 2)

rewrite334.0ms (3.5%)

Algorithm

1×	batch-egg-rewrite

Rules

4918×	`-lowering-.f32`
4918×	`-lowering-.f64`
2592×	`/-lowering-/.f32`
2592×	`/-lowering-/.f64`
1622×	`+-lowering-+.f64`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	32	160
1	139	151
2	950	141
0	8548	141

Stop Event

1×	iter limit
1×	node limit

Counts

21 → 498

Calls

Call 1

Inputs
(* (* 1/2 (sqrt (- (sqrt (+ (* re re) (* im im))) re))) (sqrt 2))
(* 1/2 (sqrt (- (sqrt (+ (* re re) (* im im))) re)))
(sqrt (- (sqrt (+ (* re re) (* im im))) re))
(- (sqrt (+ (* re re) (* im im))) re)
(* 1/2 (sqrt (* im 2)))
(sqrt (* im 2))
(* im 2)
(* 1/2 (sqrt (/ (* im im) re)))
(sqrt (/ (* im im) re))
(/ (* im im) re)
(* im im)
(* 1/2 (sqrt (* re (* (+ 4 (/ (/ (* im im) re) re)) -1))))
(sqrt (* re (* (+ 4 (/ (/ (* im im) re) re)) -1)))
(* re (* (+ 4 (/ (/ (* im im) re) re)) -1))
(* (+ 4 (/ (/ (* im im) re) re)) -1)
(* 1/2 (pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/4) 2))
(pow (pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/4) 2)
(pow (* 2 (- (sqrt (+ (* re re) (* im im))) re)) 1/4)
(* 2 (- (sqrt (+ (* re re) (* im im))) re))
(sqrt 2)
(sqrt (+ (* re re) (* im im)))

Outputs
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))))
(.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64))))
(.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)))))
(.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) (.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64))))
(.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (.f64 (*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) (.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) (.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64))))
(.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)) (.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)) (.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64))))
(.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)) (.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 3/8 binary64)) #s(literal 1/2 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 3/8 binary64)) (.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)) #s(literal 1/2 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64))) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 3/8 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 3/8 binary64))) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)))
(.f64 (.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64))) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)))
(.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64))) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)))
(*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) (.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64))) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (-.f64 (hypot.f64 re im) re)) #s(literal 1/2 binary64)))
(exp.f64 (.f64 (.f64 #s(literal 1/4 binary64) (log.f64 (-.f64 (hypot.f64 re im) re))) #s(literal 2 binary64)))
(exp.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (log.f64 (-.f64 (hypot.f64 re im) re))) (.f64 #s(literal 1/4 binary64) (log.f64 (-.f64 (hypot.f64 re im) re)))))
(sqrt.f64 (-.f64 (hypot.f64 re im) re))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (hypot.f64 re im) re))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im)))))) (sqrt.f64 (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (*.f64 re re))))))
(/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 (.f64 re re) (-.f64 (.f64 im im) (*.f64 re re))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re)))) (sqrt.f64 (+.f64 (.f64 re re) (+.f64 (.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re)))) (sqrt.f64 (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im))))))
(/.f64 (sqrt.f64 (+.f64 (.f64 re re) (-.f64 (.f64 im im) (*.f64 re re)))) (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))))
(/.f64 (sqrt.f64 (+.f64 (neg.f64 (+.f64 (.f64 re re) (.f64 im im))) (*.f64 re re))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 re (hypot.f64 re im)))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re))))) (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (+.f64 (.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))))
(/.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (-.f64 (.f64 im im) (*.f64 re re))))) (neg.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64))))
(pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) (-.f64 (hypot.f64 re im) re)) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (-.f64 (hypot.f64 re im) re))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)) (.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64))))
(.f64 (sqrt.f64 (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re)))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im)))))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im))))))))
(.f64 (sqrt.f64 (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im))))))))
(.f64 (sqrt.f64 (+.f64 (.f64 re re) (-.f64 (.f64 im im) (.f64 re re)))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (+.f64 (.f64 re re) (-.f64 (.f64 im im) (.f64 re re)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im)))))
(.f64 (sqrt.f64 (+.f64 (.f64 re re) (-.f64 (.f64 im im) (.f64 re re)))) (/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64))))
(.f64 (.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64))) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)))
(+.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re))
(+.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im))
(+.f64 (/.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im)))))) (neg.f64 (/.f64 (.f64 re (.f64 re re)) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im))))))))
(+.f64 (/.f64 (+.f64 (.f64 re re) (.f64 im im)) (+.f64 re (hypot.f64 re im))) (neg.f64 (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im)))))
(-.f64 (hypot.f64 re im) re)
(-.f64 #s(literal 0 binary64) (-.f64 re (hypot.f64 re im)))
(-.f64 (/.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im)))))) (/.f64 (.f64 re (.f64 re re)) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im)))))))
(-.f64 (/.f64 (+.f64 (.f64 re re) (.f64 im im)) (+.f64 re (hypot.f64 re im))) (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im))))
(-.f64 (+.f64 (hypot.f64 re im) #s(literal 0 binary64)) re)
(fma.f64 #s(literal -1 binary64) re (hypot.f64 re im))
(fma.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 1/4 binary64)) (-.f64 #s(literal 0 binary64) re))
(neg.f64 (/.f64 (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re))) (-.f64 #s(literal 0 binary64) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))))
(neg.f64 (/.f64 (+.f64 (.f64 re re) (-.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) (+.f64 re (hypot.f64 re im)))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re)))) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(neg.f64 (/.f64 (+.f64 (neg.f64 (+.f64 (.f64 re re) (.f64 im im))) (*.f64 re re)) (+.f64 re (hypot.f64 re im))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (-.f64 (hypot.f64 re im) re))))
(/.f64 (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re))) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re))) (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im)))))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (hypot.f64 re im) re)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im)))) (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (*.f64 re re)))))
(/.f64 (+.f64 (.f64 re re) (-.f64 (.f64 im im) (*.f64 re re))) (+.f64 re (hypot.f64 re im)))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re)))) (-.f64 #s(literal 0 binary64) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re)))) (neg.f64 (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (*.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im))))))
(/.f64 (+.f64 (neg.f64 (+.f64 (.f64 re re) (.f64 im im))) (*.f64 re re)) (-.f64 #s(literal 0 binary64) (+.f64 re (hypot.f64 re im))))
(/.f64 (-.f64 (.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im)))))) (.f64 (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im))))) (.f64 re (.f64 re re)))) (.f64 (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im))))) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (-.f64 (.f64 (+.f64 (.f64 re re) (.f64 im im)) (+.f64 re (hypot.f64 re im))) (.f64 (+.f64 re (hypot.f64 re im)) (.f64 re re))) (.f64 (+.f64 re (hypot.f64 re im)) (+.f64 re (hypot.f64 re im))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re))))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))))
(/.f64 (neg.f64 (+.f64 (neg.f64 (+.f64 (.f64 re re) (.f64 im im))) (*.f64 re re))) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 re (hypot.f64 re im)))))
(/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))) (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64))) (+.f64 (.f64 re re) (-.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im)))))
(/.f64 (-.f64 (pow.f64 (/.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im)))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 re (.f64 re re)) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im)))))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im)))))) (/.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im))))))) (+.f64 (.f64 (/.f64 (.f64 re (.f64 re re)) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im)))))) (/.f64 (.f64 re (.f64 re re)) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im))))))) (.f64 (/.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im)))))) (/.f64 (.f64 re (.f64 re re)) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im))))))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (+.f64 (.f64 re re) (.f64 im im)) (+.f64 re (hypot.f64 re im))) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 re re) (+.f64 re (hypot.f64 re im))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (+.f64 (.f64 re re) (.f64 im im)) (+.f64 re (hypot.f64 re im))) (/.f64 (+.f64 (.f64 re re) (.f64 im im)) (+.f64 re (hypot.f64 re im)))) (+.f64 (.f64 (/.f64 (.f64 re re) (+.f64 re (hypot.f64 re im))) (/.f64 (.f64 re re) (+.f64 re (hypot.f64 re im)))) (.f64 (/.f64 (+.f64 (.f64 re re) (.f64 im im)) (+.f64 re (hypot.f64 re im))) (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im)))))))
(/.f64 (-.f64 (.f64 re re) (+.f64 (.f64 re re) (*.f64 im im))) (-.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im)))
(/.f64 (-.f64 (.f64 (/.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im)))))) (/.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im))))))) (.f64 (/.f64 (.f64 re (.f64 re re)) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im)))))) (/.f64 (.f64 re (.f64 re re)) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im)))))))) (+.f64 (/.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im)))))) (/.f64 (.f64 re (.f64 re re)) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im))))))))
(/.f64 (-.f64 (.f64 (/.f64 (+.f64 (.f64 re re) (.f64 im im)) (+.f64 re (hypot.f64 re im))) (/.f64 (+.f64 (.f64 re re) (.f64 im im)) (+.f64 re (hypot.f64 re im)))) (.f64 (/.f64 (.f64 re re) (+.f64 re (hypot.f64 re im))) (/.f64 (.f64 re re) (+.f64 re (hypot.f64 re im))))) (+.f64 (/.f64 (+.f64 (.f64 re re) (.f64 im im)) (+.f64 re (hypot.f64 re im))) (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im)))))
(pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (hypot.f64 re im) re)) #s(literal -1 binary64))
(.f64 (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im)))))))
(.f64 (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im))))))
(.f64 (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im))))) (.f64 (-.f64 (hypot.f64 re im) re) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im))))))))
(*.f64 #s(literal 1 binary64) (-.f64 (hypot.f64 re im) re))
(.f64 (+.f64 (.f64 re re) (-.f64 (.f64 im im) (.f64 re re))) (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))))
(.f64 (+.f64 re (hypot.f64 re im)) (.f64 (-.f64 (hypot.f64 re im) re) (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im)))))
(.f64 (-.f64 #s(literal 0 binary64) (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re)))) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im))))))))
(.f64 (+.f64 (neg.f64 (+.f64 (.f64 re re) (.f64 im im))) (.f64 re re)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 re (hypot.f64 re im)))))
(.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 im #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 im) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 im #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) (.f64 (pow.f64 (.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 im))
(.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64))) (pow.f64 (.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)))
(.f64 (.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 im #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(sqrt.f64 (*.f64 im #s(literal 2 binary64)))
(pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (.f64 (.f64 im #s(literal 2 binary64)) (*.f64 im #s(literal 2 binary64))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (*.f64 im #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im))
(.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (sqrt.f64 im)))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (pow.f64 (.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/4 binary64)))
(.f64 (.f64 (sqrt.f64 im) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(*.f64 im #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) im)
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) (*.f64 im #s(literal 1/2 binary64))))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
(/.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) im)) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (neg.f64 (*.f64 im #s(literal 1/2 binary64))) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(*.f64 #s(literal 1/2 binary64) (/.f64 im (sqrt.f64 re)))
(.f64 im (.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal 1/2 binary64)))
(*.f64 (/.f64 im (sqrt.f64 re)) #s(literal 1/2 binary64))
(.f64 (sqrt.f64 im) (.f64 (pow.f64 (/.f64 im re) #s(literal 1/2 binary64)) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (/.f64 re (.f64 im im)) #s(literal -1/4 binary64)) (.f64 (pow.f64 (/.f64 re (.f64 im im)) #s(literal -1/4 binary64)) #s(literal 1/2 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (pow.f64 (/.f64 im re) #s(literal 1/2 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal -1/2 binary64)))
(.f64 (.f64 im #s(literal 1/2 binary64)) (pow.f64 re #s(literal -1/2 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 re (.f64 im im)) #s(literal -1/4 binary64))) (pow.f64 (/.f64 re (.f64 im im)) #s(literal -1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 im (/.f64 re im))) #s(literal 1/2 binary64)))
(sqrt.f64 (/.f64 im (/.f64 re im)))
(neg.f64 (/.f64 im (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(neg.f64 (/.f64 (-.f64 #s(literal 0 binary64) im) (sqrt.f64 re)))
(/.f64 im (sqrt.f64 re))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 re) im)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 re) im) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 re (*.f64 im im)))))
(/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) im)) (neg.f64 (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64))))
(pow.f64 (/.f64 im (/.f64 re im)) #s(literal 1/2 binary64))
(pow.f64 (/.f64 re (*.f64 im im)) #s(literal -1/2 binary64))
(pow.f64 (/.f64 (sqrt.f64 re) im) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 im (/.f64 re im)) (/.f64 re (*.f64 im im))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (/.f64 re (*.f64 im im)) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 im (/.f64 re im)))) #s(literal 1/2 binary64))
(*.f64 im (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 im (sqrt.f64 re)))
(*.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(*.f64 (sqrt.f64 im) (pow.f64 (/.f64 im re) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 im re) #s(literal 1/2 binary64)) (sqrt.f64 im))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) im)
(.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) im) (pow.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1/2 binary64)))
(.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) im) (sqrt.f64 (/.f64 #s(literal -1 binary64) re)))
(.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) im) (/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64))))
(.f64 (pow.f64 (/.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 #s(literal 1 binary64) #s(literal 1/2 binary64)) (/.f64 im (sqrt.f64 re)))
(exp.f64 (.f64 (log.f64 (/.f64 re (.f64 im im))) #s(literal -1 binary64)))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im (-.f64 #s(literal 0 binary64) im)) re))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re)) (/.f64 (*.f64 im (-.f64 #s(literal 0 binary64) im)) re))
(neg.f64 (/.f64 (*.f64 im (-.f64 #s(literal 0 binary64) im)) re))
(/.f64 im (/.f64 re im))
(/.f64 (*.f64 im im) re)
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (/.f64 re (*.f64 im im))))
(/.f64 (*.f64 im (-.f64 #s(literal 0 binary64) im)) (-.f64 #s(literal 0 binary64) re))
(/.f64 #s(literal 1 binary64) (/.f64 re (*.f64 im im)))
(pow.f64 (/.f64 re (*.f64 im im)) #s(literal -1 binary64))
(*.f64 im (/.f64 im re))
(.f64 im (.f64 (/.f64 #s(literal 1 binary64) re) im))
(.f64 im (.f64 (/.f64 im re) #s(literal 1 binary64)))
(.f64 (.f64 im im) (/.f64 #s(literal 1 binary64) re))
(.f64 (.f64 im im) (*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 1 binary64)))
(*.f64 (/.f64 im (/.f64 re im)) #s(literal 1 binary64))
(*.f64 (/.f64 im (sqrt.f64 re)) (/.f64 im (sqrt.f64 re)))
(.f64 #s(literal -1 binary64) (/.f64 (.f64 im (-.f64 #s(literal 0 binary64) im)) re))
(.f64 (.f64 im (-.f64 #s(literal 0 binary64) im)) (/.f64 #s(literal -1 binary64) re))
(.f64 (.f64 im (-.f64 #s(literal 0 binary64) im)) (*.f64 (/.f64 #s(literal -1 binary64) re) #s(literal 1 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 im (/.f64 re im)))
(.f64 (/.f64 #s(literal 1 binary64) re) (.f64 im im))
(.f64 (/.f64 #s(literal 1 binary64) re) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 im im)) #s(literal -1 binary64)))
(*.f64 (/.f64 im re) im)
(.f64 (/.f64 im re) (.f64 im #s(literal 1 binary64)))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 0 binary64) (/.f64 im re)))
(*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (/.f64 im re))
(*.f64 (/.f64 im #s(literal -1 binary64)) (-.f64 #s(literal 0 binary64) (/.f64 im re)))
(*.f64 (/.f64 (-.f64 #s(literal 0 binary64) im) #s(literal -1 binary64)) (/.f64 im re))
(.f64 (.f64 #s(literal 1 binary64) im) (/.f64 im re))
(.f64 (.f64 #s(literal 1 binary64) (*.f64 im (-.f64 #s(literal 0 binary64) im))) (/.f64 #s(literal -1 binary64) re))
(.f64 (.f64 (/.f64 #s(literal 1 binary64) re) im) im)
(exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)))
(fabs.f64 (*.f64 im im))
(-.f64 #s(literal 0 binary64) (*.f64 im (-.f64 #s(literal 0 binary64) im)))
(sqrt.f64 (.f64 im (.f64 im (*.f64 im im))))
(neg.f64 (*.f64 im (-.f64 #s(literal 0 binary64) im)))
(pow.f64 im #s(literal 2 binary64))
(pow.f64 (*.f64 im im) #s(literal 1 binary64))
(pow.f64 (.f64 im (.f64 im (*.f64 im im))) #s(literal 1/2 binary64))
(pow.f64 (exp.f64 (log.f64 im)) #s(literal 2 binary64))
(*.f64 im im)
(*.f64 im (neg.f64 (-.f64 #s(literal 0 binary64) im)))
(.f64 im (.f64 im #s(literal 1 binary64)))
(.f64 (.f64 im im) #s(literal 1 binary64))
(.f64 #s(literal -1 binary64) (.f64 im (-.f64 #s(literal 0 binary64) im)))
(.f64 #s(literal 1 binary64) (.f64 im im))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 0 binary64) im))
(.f64 (sqrt.f64 im) (.f64 (sqrt.f64 im) im))
(*.f64 (exp.f64 (log.f64 im)) (exp.f64 (log.f64 im)))
(*.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) im)
(.f64 (.f64 #s(literal 1 binary64) im) im)
(.f64 (.f64 im (sqrt.f64 im)) (sqrt.f64 im))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re)))))))
(.f64 (sqrt.f64 (.f64 re (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re)))))) #s(literal 1/2 binary64))
(.f64 (sqrt.f64 re) (.f64 (sqrt.f64 (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re))))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re))))) (.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 re (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re))))) #s(literal 1/4 binary64)) (.f64 (pow.f64 (.f64 re (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re))))) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re))))))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re)))))) (sqrt.f64 re))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re)))))) (sqrt.f64 #s(literal -1 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 re (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re))))) #s(literal 1/4 binary64))) (pow.f64 (.f64 re (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re))))) #s(literal 1/4 binary64)))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))))) (sqrt.f64 #s(literal -1 binary64)))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re)))))
(exp.f64 (.f64 (log.f64 (.f64 re (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re)))))) #s(literal 1/2 binary64)))
(sqrt.f64 (.f64 re (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (*.f64 re re))))))
(pow.f64 (.f64 re (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (*.f64 re re))))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (.f64 re (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (*.f64 re re))))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (.f64 (.f64 re (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re))))) (.f64 re (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (*.f64 re re)))))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (.f64 re (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (*.f64 re re))))))) #s(literal 1/2 binary64))
(.f64 (sqrt.f64 re) (sqrt.f64 (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (*.f64 re re))))))
(.f64 (sqrt.f64 (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (*.f64 re re))))) (sqrt.f64 re))
(.f64 (sqrt.f64 (.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))))) (sqrt.f64 #s(literal -1 binary64)))
(.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))))))
(.f64 (pow.f64 (.f64 re (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re))))) #s(literal 1/4 binary64)) (pow.f64 (.f64 re (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (*.f64 re re))))) #s(literal 1/4 binary64)))
(.f64 (sqrt.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re)))) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 re #s(literal -1 binary64)) #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re)))))
(.f64 (sqrt.f64 (.f64 re #s(literal -1 binary64))) (sqrt.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re)))))
(.f64 (.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re)))))
(+.f64 (.f64 (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re))) re) (.f64 #s(literal -4 binary64) re))
(+.f64 (.f64 re (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re)))) (.f64 re #s(literal -4 binary64)))
(+.f64 (.f64 re #s(literal -4 binary64)) (.f64 re (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re)))))
(+.f64 (.f64 re #s(literal -4 binary64)) (.f64 re (.f64 im (.f64 (/.f64 im (*.f64 re re)) #s(literal -1 binary64)))))
(+.f64 (.f64 re (.f64 im (.f64 (/.f64 im (.f64 re re)) #s(literal -1 binary64)))) (*.f64 re #s(literal -4 binary64)))
(+.f64 (.f64 #s(literal -1 binary64) (.f64 re #s(literal 4 binary64))) (.f64 #s(literal -1 binary64) (.f64 (.f64 re im) (/.f64 im (.f64 re re)))))
(+.f64 (.f64 #s(literal -1 binary64) (.f64 (.f64 re im) (/.f64 im (.f64 re re)))) (.f64 #s(literal -1 binary64) (.f64 re #s(literal 4 binary64))))
(+.f64 (.f64 #s(literal -1 binary64) (.f64 #s(literal 4 binary64) re)) (.f64 #s(literal -1 binary64) (.f64 im (.f64 (/.f64 im (.f64 re re)) re))))
(+.f64 (.f64 #s(literal -1 binary64) (.f64 im (.f64 (/.f64 im (.f64 re re)) re))) (.f64 #s(literal -1 binary64) (.f64 #s(literal 4 binary64) re)))
(+.f64 (.f64 (.f64 re #s(literal -1 binary64)) #s(literal 4 binary64)) (.f64 (.f64 re #s(literal -1 binary64)) (/.f64 (.f64 im im) (.f64 re re))))
(+.f64 (.f64 (.f64 re #s(literal -1 binary64)) (/.f64 (.f64 im im) (.f64 re re))) (.f64 (.f64 re #s(literal -1 binary64)) #s(literal 4 binary64)))
(+.f64 (.f64 #s(literal -4 binary64) re) (.f64 (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re))) re))
(+.f64 (.f64 #s(literal -4 binary64) re) (.f64 (.f64 im (.f64 (/.f64 im (*.f64 re re)) #s(literal -1 binary64))) re))
(+.f64 (.f64 (.f64 im (.f64 (/.f64 im (.f64 re re)) #s(literal -1 binary64))) re) (*.f64 #s(literal -4 binary64) re))
(+.f64 (.f64 (.f64 re #s(literal 4 binary64)) #s(literal -1 binary64)) (.f64 (.f64 (.f64 re im) (/.f64 im (.f64 re re))) #s(literal -1 binary64)))
(+.f64 (.f64 (.f64 (.f64 re im) (/.f64 im (.f64 re re))) #s(literal -1 binary64)) (.f64 (.f64 re #s(literal 4 binary64)) #s(literal -1 binary64)))
(+.f64 (.f64 (.f64 #s(literal 4 binary64) re) #s(literal -1 binary64)) (.f64 (.f64 im (.f64 (/.f64 im (.f64 re re)) re)) #s(literal -1 binary64)))
(+.f64 (.f64 (.f64 im (.f64 (/.f64 im (.f64 re re)) re)) #s(literal -1 binary64)) (.f64 (.f64 #s(literal 4 binary64) re) #s(literal -1 binary64)))
(+.f64 (.f64 #s(literal 4 binary64) (.f64 re #s(literal -1 binary64))) (.f64 (/.f64 (.f64 im im) (.f64 re re)) (.f64 re #s(literal -1 binary64))))
(+.f64 (.f64 (/.f64 (.f64 im im) (.f64 re re)) (.f64 re #s(literal -1 binary64))) (.f64 #s(literal 4 binary64) (.f64 re #s(literal -1 binary64))))
(neg.f64 (.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re)))))
(/.f64 (.f64 re #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re)))))
(.f64 re (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (*.f64 re re)))))
(.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (.f64 re #s(literal -1 binary64)))
(.f64 #s(literal -1 binary64) (.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re)))))
(.f64 (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (*.f64 re re)))) re)
(.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))))
(.f64 (+.f64 #s(literal 64 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (/.f64 (.f64 re re) (.f64 im im)) (/.f64 (.f64 im im) (.f64 re re))))) (.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 16 binary64) (/.f64 (+.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal -4 binary64)) (/.f64 (.f64 re re) (.f64 im im))))) (-.f64 #s(literal 0 binary64) re)))
(.f64 (-.f64 #s(literal 16 binary64) (.f64 (/.f64 im (.f64 re (.f64 re re))) (/.f64 (.f64 im (.f64 im im)) re))) (.f64 (/.f64 #s(literal -1 binary64) (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re)))
(.f64 (.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))
(.f64 (.f64 re #s(literal -1 binary64)) (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))))
(.f64 (.f64 (.f64 re #s(literal -1 binary64)) (+.f64 #s(literal 64 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (/.f64 (.f64 re re) (.f64 im im)) (/.f64 (.f64 im im) (.f64 re re)))))) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 16 binary64) (/.f64 (+.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal -4 binary64)) (/.f64 (.f64 re re) (*.f64 im im))))))
(.f64 (.f64 (.f64 re #s(literal -1 binary64)) (-.f64 #s(literal 16 binary64) (.f64 (/.f64 im (.f64 re (.f64 re re))) (/.f64 (.f64 im (.f64 im im)) re)))) (/.f64 #s(literal -1 binary64) (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (.f64 re re)))))
(+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re))))
(+.f64 #s(literal -4 binary64) (.f64 im (.f64 (/.f64 im (*.f64 re re)) #s(literal -1 binary64))))
(+.f64 (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re))) #s(literal -4 binary64))
(+.f64 (.f64 im (.f64 (/.f64 im (*.f64 re re)) #s(literal -1 binary64))) #s(literal -4 binary64))
(-.f64 #s(literal 0 binary64) (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))))
(fma.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal -1 binary64) #s(literal -4 binary64))
(fma.f64 #s(literal -1 binary64) (/.f64 (.f64 im im) (.f64 re re)) #s(literal -4 binary64))
(neg.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))))
(/.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re)))))
(/.f64 (+.f64 #s(literal 64 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (/.f64 (.f64 re re) (.f64 im im)) (/.f64 (.f64 im im) (.f64 re re))))) (+.f64 (neg.f64 (/.f64 (+.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal -4 binary64)) (/.f64 (.f64 re re) (.f64 im im)))) #s(literal -16 binary64)))
(/.f64 (+.f64 #s(literal 64 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (/.f64 (.f64 re re) (.f64 im im)) (/.f64 (.f64 im im) (.f64 re re))))) (neg.f64 (+.f64 (.f64 (/.f64 im (.f64 re (.f64 re re))) (/.f64 (.f64 im (.f64 im im)) re)) (+.f64 #s(literal 16 binary64) (.f64 (.f64 #s(literal -4 binary64) im) (/.f64 im (.f64 re re)))))))
(/.f64 #s(literal 1 binary64) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 16 binary64) (/.f64 (+.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal -4 binary64)) (/.f64 (.f64 re re) (.f64 im im)))) (+.f64 (neg.f64 (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (/.f64 (.f64 re re) (.f64 im im)) (/.f64 (.f64 im im) (.f64 re re))))) #s(literal -64 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (+.f64 #s(literal -16 binary64) (.f64 (/.f64 im (.f64 re (.f64 re re))) (/.f64 (.f64 im (*.f64 im im)) re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 16 binary64) (/.f64 (+.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal -4 binary64)) (/.f64 (.f64 re re) (.f64 im im)))) (.f64 (+.f64 #s(literal 64 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (/.f64 (.f64 re re) (.f64 im im)) (/.f64 (.f64 im im) (*.f64 re re))))) #s(literal -1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (.f64 (-.f64 #s(literal 16 binary64) (.f64 (/.f64 im (.f64 re (.f64 re re))) (/.f64 (.f64 im (.f64 im im)) re))) #s(literal -1 binary64))))
(/.f64 (-.f64 #s(literal 16 binary64) (.f64 (/.f64 im (.f64 re (.f64 re re))) (/.f64 (.f64 im (.f64 im im)) re))) (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (*.f64 re re))))
(/.f64 (-.f64 #s(literal 16 binary64) (.f64 (/.f64 im (.f64 re (.f64 re re))) (/.f64 (.f64 im (.f64 im im)) re))) (-.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (*.f64 re re)))))
(/.f64 (+.f64 (neg.f64 (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (/.f64 (.f64 re re) (.f64 im im)) (/.f64 (.f64 im im) (.f64 re re))))) #s(literal -64 binary64)) (+.f64 #s(literal 16 binary64) (/.f64 (+.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal -4 binary64)) (/.f64 (.f64 re re) (.f64 im im)))))
(/.f64 (+.f64 (neg.f64 (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (/.f64 (.f64 re re) (.f64 im im)) (/.f64 (.f64 im im) (.f64 re re))))) #s(literal -64 binary64)) (+.f64 (.f64 (/.f64 im (.f64 re (.f64 re re))) (/.f64 (.f64 im (.f64 im im)) re)) (+.f64 #s(literal 16 binary64) (.f64 (.f64 #s(literal -4 binary64) im) (/.f64 im (.f64 re re))))))
(/.f64 (+.f64 (neg.f64 (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (/.f64 (.f64 re re) (.f64 im im)) (/.f64 (.f64 im im) (.f64 re re))))) #s(literal -64 binary64)) (neg.f64 (+.f64 (neg.f64 (/.f64 (+.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal -4 binary64)) (/.f64 (.f64 re re) (.f64 im im)))) #s(literal -16 binary64))))
(/.f64 (+.f64 #s(literal -16 binary64) (.f64 (/.f64 im (.f64 re (.f64 re re))) (/.f64 (.f64 im (.f64 im im)) re))) (-.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))))
(/.f64 (+.f64 #s(literal -16 binary64) (.f64 (/.f64 im (.f64 re (.f64 re re))) (/.f64 (.f64 im (.f64 im im)) re))) (neg.f64 (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (*.f64 re re)))))
(/.f64 (+.f64 (.f64 (/.f64 im (.f64 re (.f64 re re))) (/.f64 (.f64 im (.f64 im im)) re)) #s(literal -16 binary64)) (neg.f64 (+.f64 (/.f64 (.f64 im im) (*.f64 re re)) #s(literal -4 binary64))))
(/.f64 (+.f64 (.f64 (/.f64 im (.f64 re (.f64 re re))) (/.f64 (.f64 im (.f64 im im)) re)) #s(literal -16 binary64)) (-.f64 (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (*.f64 re re))) #s(literal -4 binary64)))
(/.f64 (.f64 (+.f64 #s(literal 64 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (/.f64 (.f64 re re) (.f64 im im)) (/.f64 (.f64 im im) (.f64 re re))))) #s(literal -1 binary64)) (+.f64 #s(literal 16 binary64) (/.f64 (+.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal -4 binary64)) (/.f64 (.f64 re re) (*.f64 im im)))))
(/.f64 (.f64 (-.f64 #s(literal 16 binary64) (.f64 (/.f64 im (.f64 re (.f64 re re))) (/.f64 (.f64 im (.f64 im im)) re))) #s(literal -1 binary64)) (-.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))))
(/.f64 (neg.f64 (+.f64 (neg.f64 (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (/.f64 (.f64 re re) (.f64 im im)) (/.f64 (.f64 im im) (.f64 re re))))) #s(literal -64 binary64))) (+.f64 (neg.f64 (/.f64 (+.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal -4 binary64)) (/.f64 (.f64 re re) (.f64 im im)))) #s(literal -16 binary64)))
(/.f64 (neg.f64 (+.f64 #s(literal -16 binary64) (.f64 (/.f64 im (.f64 re (.f64 re re))) (/.f64 (.f64 im (.f64 im im)) re)))) (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (*.f64 re re))))
(/.f64 (neg.f64 (+.f64 (.f64 (/.f64 im (.f64 re (.f64 re re))) (/.f64 (.f64 im (.f64 im im)) re)) #s(literal -16 binary64))) (+.f64 (/.f64 (.f64 im im) (*.f64 re re)) #s(literal -4 binary64)))
(/.f64 (neg.f64 (.f64 (+.f64 #s(literal 64 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (/.f64 (.f64 re re) (.f64 im im)) (/.f64 (.f64 im im) (.f64 re re))))) #s(literal -1 binary64))) (+.f64 (neg.f64 (/.f64 (+.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal -4 binary64)) (/.f64 (.f64 re re) (*.f64 im im)))) #s(literal -16 binary64)))
(/.f64 (neg.f64 (.f64 (-.f64 #s(literal 16 binary64) (.f64 (/.f64 im (.f64 re (.f64 re re))) (/.f64 (.f64 im (.f64 im im)) re))) #s(literal -1 binary64))) (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (.f64 re re))))
(/.f64 (+.f64 #s(literal -64 binary64) (pow.f64 (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re))) #s(literal 3 binary64))) (+.f64 #s(literal 16 binary64) (/.f64 (+.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal -4 binary64)) (/.f64 (.f64 re re) (.f64 im im)))))
(/.f64 (+.f64 #s(literal -64 binary64) (pow.f64 (.f64 im (.f64 (/.f64 im (.f64 re re)) #s(literal -1 binary64))) #s(literal 3 binary64))) (+.f64 #s(literal 16 binary64) (-.f64 (.f64 (.f64 im (.f64 (/.f64 im (.f64 re re)) #s(literal -1 binary64))) (.f64 im (.f64 (/.f64 im (.f64 re re)) #s(literal -1 binary64)))) (.f64 #s(literal -4 binary64) (.f64 im (.f64 (/.f64 im (.f64 re re)) #s(literal -1 binary64)))))))
(/.f64 (+.f64 (pow.f64 (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re))) #s(literal 3 binary64)) #s(literal -64 binary64)) (+.f64 (.f64 (/.f64 im (.f64 re (.f64 re re))) (/.f64 (.f64 im (.f64 im im)) re)) (-.f64 #s(literal 16 binary64) (.f64 (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re))) #s(literal -4 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 im (.f64 (/.f64 im (.f64 re re)) #s(literal -1 binary64))) #s(literal 3 binary64)) #s(literal -64 binary64)) (+.f64 (.f64 (.f64 im (.f64 (/.f64 im (.f64 re re)) #s(literal -1 binary64))) (.f64 im (.f64 (/.f64 im (.f64 re re)) #s(literal -1 binary64)))) (-.f64 #s(literal 16 binary64) (.f64 (.f64 im (.f64 (/.f64 im (.f64 re re)) #s(literal -1 binary64))) #s(literal -4 binary64)))))
(/.f64 (-.f64 #s(literal 16 binary64) (.f64 (.f64 im (.f64 (/.f64 im (.f64 re re)) #s(literal -1 binary64))) (.f64 im (.f64 (/.f64 im (.f64 re re)) #s(literal -1 binary64))))) (-.f64 #s(literal -4 binary64) (.f64 im (.f64 (/.f64 im (.f64 re re)) #s(literal -1 binary64)))))
(/.f64 (-.f64 (.f64 (.f64 im (.f64 (/.f64 im (.f64 re re)) #s(literal -1 binary64))) (.f64 im (.f64 (/.f64 im (.f64 re re)) #s(literal -1 binary64)))) #s(literal 16 binary64)) (-.f64 (.f64 im (.f64 (/.f64 im (.f64 re re)) #s(literal -1 binary64))) #s(literal -4 binary64)))
(.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) #s(literal -1 binary64))
(.f64 #s(literal -1 binary64) (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))))
(.f64 (+.f64 #s(literal 64 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (/.f64 (.f64 re re) (.f64 im im)) (/.f64 (.f64 im im) (.f64 re re))))) (neg.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 16 binary64) (/.f64 (+.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal -4 binary64)) (/.f64 (.f64 re re) (*.f64 im im)))))))
(.f64 (+.f64 #s(literal 64 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (/.f64 (.f64 re re) (.f64 im im)) (/.f64 (.f64 im im) (.f64 re re))))) (.f64 (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 16 binary64) (/.f64 (+.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal -4 binary64)) (/.f64 (.f64 re re) (.f64 im im))))) #s(literal -1 binary64)))
(.f64 (-.f64 #s(literal 16 binary64) (.f64 (/.f64 im (.f64 re (.f64 re re))) (/.f64 (.f64 im (.f64 im im)) re))) (neg.f64 (/.f64 #s(literal -1 binary64) (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (.f64 re re))))))
(.f64 (-.f64 #s(literal 16 binary64) (.f64 (/.f64 im (.f64 re (.f64 re re))) (/.f64 (.f64 im (.f64 im im)) re))) (.f64 (/.f64 #s(literal -1 binary64) (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64)))
(.f64 (+.f64 (neg.f64 (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (/.f64 (.f64 re re) (.f64 im im)) (/.f64 (.f64 im im) (.f64 re re))))) #s(literal -64 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 16 binary64) (/.f64 (+.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal -4 binary64)) (/.f64 (.f64 re re) (*.f64 im im))))))
(.f64 (+.f64 #s(literal -16 binary64) (.f64 (/.f64 im (.f64 re (.f64 re re))) (/.f64 (.f64 im (.f64 im im)) re))) (/.f64 #s(literal -1 binary64) (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (.f64 re re)))))
(.f64 (.f64 (+.f64 #s(literal 64 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (/.f64 (.f64 re re) (.f64 im im)) (/.f64 (.f64 im im) (.f64 re re))))) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 16 binary64) (/.f64 (+.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal -4 binary64)) (/.f64 (.f64 re re) (.f64 im im))))))
(.f64 (.f64 (-.f64 #s(literal 16 binary64) (.f64 (/.f64 im (.f64 re (.f64 re re))) (/.f64 (.f64 im (.f64 im im)) re))) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (+.f64 #s(literal -4 binary64) (/.f64 (.f64 im im) (*.f64 re re)))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))))
(.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64))))
(.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)))))
(.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) (.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64))))
(.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (.f64 (*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) (.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) (.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64))))
(.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)) (.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)) (.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64))))
(.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)) (.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 3/8 binary64)) #s(literal 1/2 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 3/8 binary64)) (.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)) #s(literal 1/2 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64))) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 3/8 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 3/8 binary64))) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)))
(.f64 (.f64 (*.f64 #s(literal 1/2 binary64) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64))) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)))
(.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64))) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)))
(exp.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)))))
(exp.f64 (.f64 (log.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal 1/4 binary64)))
(exp.f64 (.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)))) #s(literal 1 binary64)))
(exp.f64 (+.f64 (.f64 (log.f64 (-.f64 (hypot.f64 re im) re)) #s(literal 1/2 binary64)) (.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(exp.f64 (+.f64 (.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (log.f64 (-.f64 (hypot.f64 re im) re)) #s(literal 1/2 binary64))))
(sqrt.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)))
(/.f64 (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re))))) (sqrt.f64 (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (.f64 re re) (-.f64 (.f64 im im) (.f64 re re))))) (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)))
(/.f64 (sqrt.f64 (.f64 (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re))) #s(literal 2 binary64))) (sqrt.f64 (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (sqrt.f64 (.f64 (+.f64 (.f64 re re) (-.f64 (.f64 im im) (.f64 re re))) #s(literal 2 binary64))) (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)))
(pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))) #s(literal 1 binary64))
(pow.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)) #s(literal 4 binary64))
(pow.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(pow.f64 (.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 2 binary64)) (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #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 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)))))
(*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)))
(.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 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 (.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) #s(literal 1 binary64)))
(.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64))))
(.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) (pow.f64 (.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)) (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 3/8 binary64)))
(.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)) (pow.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 3/8 binary64)) #s(literal 1 binary64)))
(.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)) (.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 3/8 binary64))))
(.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) (.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) (*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))))
(.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) (.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)) (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 3/8 binary64))))
(.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/16 binary64)) (.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/16 binary64)) (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 3/8 binary64))))
(.f64 (pow.f64 (.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)))
(.f64 (.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 3/8 binary64)) (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)))
(*.f64 (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1 binary64)) (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(.f64 (pow.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 3/8 binary64)) #s(literal 1 binary64)) (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)))
(.f64 (pow.f64 (pow.f64 (.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64))) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)))
(.f64 (.f64 (pow.f64 (.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64))) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)))
(.f64 (.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 3/8 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)))
(.f64 (.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 3/8 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64))) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)))
(.f64 (.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 3/8 binary64)) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/16 binary64))) (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/16 binary64)))
(exp.f64 (.f64 #s(literal 1/4 binary64) (log.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)))))
(exp.f64 (.f64 (.f64 (log.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))) #s(literal 1/8 binary64)) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal 1/8 binary64)))
(pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 1 binary64))
(pow.f64 (sqrt.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1/8 binary64))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)) (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)))
(.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)) (.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)) (.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64))))
(.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) (.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)) (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64))))
(.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) (.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64))))
(.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/16 binary64)) (.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/16 binary64)) (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64))))
(.f64 (.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/16 binary64))) (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/16 binary64)))
(.f64 (.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64))) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)))
(.f64 (.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64))) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64)))
(.f64 (.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)))
(.f64 (.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/8 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 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 (hypot.f64 re im) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)))
(+.f64 (.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)) (.f64 (hypot.f64 re im) #s(literal 2 binary64)))
(exp.f64 (log.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))))
(fma.f64 (hypot.f64 re im) #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) (hypot.f64 re im) (*.f64 #s(literal -2 binary64) re))
(/.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (hypot.f64 re im) re)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im))))) (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re (hypot.f64 re im)) (.f64 #s(literal 2 binary64) (+.f64 (.f64 re re) (-.f64 (.f64 im im) (.f64 re re))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im))))) (.f64 (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re))) #s(literal 2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re (hypot.f64 re im)) (.f64 (+.f64 (.f64 re re) (-.f64 (.f64 im im) (.f64 re re))) #s(literal 2 binary64))))
(/.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re)))) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (.f64 #s(literal 2 binary64) (+.f64 (.f64 re re) (-.f64 (.f64 im im) (.f64 re re)))) (+.f64 re (hypot.f64 re im)))
(/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re))) #s(literal 2 binary64)) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (.f64 (+.f64 (.f64 re re) (-.f64 (.f64 im im) (.f64 re re))) #s(literal 2 binary64)) (+.f64 re (hypot.f64 re im)))
(/.f64 (neg.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re))))) (-.f64 #s(literal 0 binary64) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (neg.f64 (.f64 #s(literal 2 binary64) (+.f64 (.f64 re re) (-.f64 (.f64 im im) (.f64 re re))))) (-.f64 #s(literal 0 binary64) (+.f64 re (hypot.f64 re im))))
(/.f64 (neg.f64 (.f64 (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (neg.f64 (.f64 (+.f64 (.f64 re re) (-.f64 (.f64 im im) (.f64 re re))) #s(literal 2 binary64))) (-.f64 #s(literal 0 binary64) (+.f64 re (hypot.f64 re im))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal 2 binary64) (hypot.f64 re im)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -2 binary64) re) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(literal 2 binary64) (hypot.f64 re im)) (.f64 #s(literal 2 binary64) (hypot.f64 re im))) (-.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 (+.f64 (pow.f64 (.f64 (hypot.f64 re im) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (hypot.f64 re im) #s(literal 2 binary64)) (.f64 (hypot.f64 re im) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64))) (.f64 (.f64 (hypot.f64 re im) #s(literal 2 binary64)) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 2 binary64) (hypot.f64 re im)) (.f64 #s(literal 2 binary64) (hypot.f64 re im))) (.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 (-.f64 (.f64 (.f64 (hypot.f64 re im) #s(literal 2 binary64)) (.f64 (hypot.f64 re im) #s(literal 2 binary64))) (.f64 (.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)))) (-.f64 (.f64 (hypot.f64 re im) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64))))
(*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
(.f64 (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re))) (.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))) #s(literal 2 binary64)))
(.f64 (+.f64 (.f64 re re) (-.f64 (.f64 im im) (.f64 re re))) (*.f64 (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))) #s(literal 2 binary64)))
(.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re)))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(.f64 (.f64 #s(literal 2 binary64) (+.f64 (.f64 re re) (-.f64 (.f64 im im) (*.f64 re re)))) (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))))
(.f64 (.f64 (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(.f64 (.f64 (+.f64 (.f64 re re) (-.f64 (.f64 im im) (*.f64 re re))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))))
(*.f64 (exp.f64 (log.f64 (-.f64 (hypot.f64 re im) re))) (exp.f64 (log.f64 #s(literal 2 binary64))))
(*.f64 (exp.f64 (log.f64 #s(literal 2 binary64))) (exp.f64 (log.f64 (-.f64 (hypot.f64 re im) re))))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(exp.f64 (.f64 (.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 2 binary64))) #s(literal 2 binary64)))
(exp.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 2 binary64))) (.f64 #s(literal 1/4 binary64) (log.f64 #s(literal 2 binary64)))))
(sqrt.f64 #s(literal 2 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) (.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64))))
(.f64 (.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64))) (pow.f64 #s(literal 2 binary64) #s(literal 1/8 binary64)))
(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 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im)))))))
(/.f64 (hypot.f64 (.f64 re (.f64 re re)) (.f64 im (.f64 im im))) (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (*.f64 re re))))))
(/.f64 (hypot.f64 (.f64 re (.f64 re re)) (.f64 im (.f64 im im))) (sqrt.f64 (+.f64 (.f64 im (.f64 im (.f64 im im))) (.f64 (.f64 re re) (-.f64 (.f64 re re) (*.f64 im im))))))
(/.f64 (sqrt.f64 (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im))))) (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 #s(literal 0 binary64) (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im)))))) (sqrt.f64 (+.f64 (-.f64 #s(literal 0 binary64) (.f64 re re)) (.f64 im im))))
(/.f64 (sqrt.f64 (-.f64 (.f64 im (.f64 im (.f64 im im))) (.f64 re (.f64 re (.f64 re re))))) (sqrt.f64 (-.f64 (.f64 im im) (.f64 re re))))
(/.f64 (neg.f64 (hypot.f64 (.f64 re (.f64 re re)) (.f64 im (.f64 im im)))) (neg.f64 (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (*.f64 re re)))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im)))))) (neg.f64 (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im)))))
(pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 1/2 binary64))
(pow.f64 (hypot.f64 re im) #s(literal 1 binary64))
(pow.f64 (.f64 (+.f64 (.f64 re re) (.f64 im im)) (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(.f64 (hypot.f64 (.f64 re (.f64 re re)) (.f64 im (.f64 im im))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re))))) #s(literal 1/2 binary64)))
(.f64 (hypot.f64 (.f64 re (.f64 re re)) (.f64 im (.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re)))))))
(.f64 (hypot.f64 (.f64 re (.f64 re re)) (.f64 im (.f64 im im))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re)))))))
(.f64 (sqrt.f64 (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.f64 re re) (*.f64 im im))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.f64 re re) (*.f64 im im)))))
(.f64 (sqrt.f64 (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 re re) (*.f64 im im)))))
(.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (hypot.f64 re im)) (sqrt.f64 (hypot.f64 re im)))

simplify376.0ms (4%)

Algorithm

1×	egg-herbie

Rules

7436×	`-lowering-.f32`
7436×	`-lowering-.f64`
5168×	`+-lowering-+.f64`
5168×	`+-lowering-+.f32`
1680×	`distribute-lft-in`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	1238	8553
1	4358	8275
0	8638	8275

Stop Event

1×	iter limit
1×	node limit

Counts

432 → 432

Calls

Call 1

Inputs
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* 1/2 (sqrt im))
(+ (* -1/4 (* (sqrt (/ 1 im)) re)) (* 1/2 (sqrt im)))
(+ (* 1/2 (sqrt im)) (* re (+ (* -1/4 (sqrt (/ 1 im))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) re)))))
(+ (* 1/2 (sqrt im)) (* re (+ (* -1/4 (sqrt (/ 1 im))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) re)) (* 1/16 (sqrt (/ 1 (pow im 3)))))))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (pow im 5) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* -1 (* re (+ (* -1/8 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (pow im 2) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (sqrt 1/2)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt 1/2))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt 1/2))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (sqrt 1/2))))))))))
(* 1/2 (sqrt im))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) re)) (* 1/2 (sqrt (/ 1 im)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (sqrt (/ 1 im))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (sqrt (/ 1 im)))))))
(* -1/2 (* (sqrt im) (sqrt -1)))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt -1))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt -1)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (sqrt -1)))) (* 1/8 (* (sqrt im) (* (pow re 2) (sqrt -1))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt -1)))))))
(sqrt im)
(+ (sqrt im) (* -1/2 (* (sqrt (/ 1 im)) re)))
(+ (sqrt im) (* re (+ (* -1/2 (sqrt (/ 1 im))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) re)))))
(+ (sqrt im) (* re (+ (* -1/2 (sqrt (/ 1 im))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) re)) (* 1/8 (sqrt (/ 1 (pow im 3)))))))))
(* (* im (sqrt 1/2)) (sqrt (/ 1 re)))
(+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))))
(+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (pow im 5) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* -1 (* re (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(* (* im (sqrt 1/2)) (sqrt (/ 1 re)))
(* im (+ (* -1/16 (* (/ (pow im 2) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 1/2))))
(* im (+ (* (sqrt (/ 1 re)) (sqrt 1/2)) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* (sqrt (/ 1 re)) (sqrt 1/2)) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (sqrt 1/2))))))))))
(sqrt im)
(* im (+ (sqrt (/ 1 im)) (* -1/2 (* (sqrt (/ 1 (pow im 3))) re))))
(* im (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)) (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2))))))
(* im (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2)))))))
(* -1 (* (sqrt im) (sqrt -1)))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1)))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (sqrt -1)))) (* 1/4 (* (sqrt im) (* (pow re 2) (sqrt -1))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))
im
(+ im (* -1 re))
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(* 1/2 (/ (pow im 2) re))
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)
(* -2 re)
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(* 1/2 (/ (pow im 2) re))
(* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
im
(* im (+ 1 (* -1 (/ re im))))
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))
(* -1 im)
(* -1 (* im (+ 1 (/ re im))))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* (sqrt im) (sqrt 2))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* -1/2 (* im (sqrt (/ 1 re))))
(* -1/2 (* im (sqrt (/ 1 re))))
(* -1/2 (* im (sqrt (/ 1 re))))
(* -1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* -1 (* im (sqrt (/ 1 re))))
(* -1 (* im (sqrt (/ 1 re))))
(* -1 (* im (sqrt (/ 1 re))))
(* -1 (* im (sqrt (/ 1 re))))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (/ (sqrt -1) im) (sqrt (pow re 5)))) re)
(/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (pow re 3) (+ (* -1 (* (/ (sqrt -1) (pow im 3)) (sqrt (pow re 3)))) (* (/ (sqrt -1) im) (sqrt (/ 1 re)))))) re)
(/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (pow re 3) (+ (* (/ (sqrt -1) im) (sqrt (/ 1 re))) (* (pow re 3) (+ (* -1 (* (/ (sqrt -1) (pow im 3)) (sqrt (/ 1 (pow re 3))))) (* 2 (* (/ (sqrt -1) (pow im 5)) (sqrt re)))))))) re)
(* (sqrt re) (sqrt -1))
(* re (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1))))
(* re (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(* re (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/1024 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 (pow re 13))))) (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* (sqrt re) (sqrt -1)))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(* -1 (* re (+ (* -1 (/ (+ (* 1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (pow re 3)))) (* -1/1024 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 re))))) (pow re 3))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(* (sqrt re) (sqrt -1))
(+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt -1)))
(+ (* (sqrt re) (sqrt -1)) (* (pow im 2) (+ (* -1/128 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 7))))) (* 1/8 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))))))
(+ (* (sqrt re) (sqrt -1)) (* (pow im 2) (+ (* 1/8 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))) (* (pow im 2) (+ (* -1/128 (* (sqrt (/ 1 (pow re 7))) (sqrt -1))) (* 1/1024 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 11))))))))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))
(* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))
(* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (+ (* 2 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))))
(* -1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))
(* -1 (* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))))
(* -1 (* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (+ (* 2 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(/ (+ (* 2 (* (/ (sqrt -1) im) (sqrt (pow re 5)))) (* (* im (sqrt -1)) (sqrt re))) re)
(/ (+ (* (* im (sqrt -1)) (sqrt re)) (* (pow re 3) (+ (* -2 (* (/ (sqrt -1) (pow im 3)) (sqrt (pow re 3)))) (* 2 (* (/ (sqrt -1) im) (sqrt (/ 1 re))))))) re)
(/ (+ (* (* im (sqrt -1)) (sqrt re)) (* (pow re 3) (+ (* 2 (* (/ (sqrt -1) im) (sqrt (/ 1 re)))) (* (pow re 3) (+ (* -2 (* (/ (sqrt -1) (pow im 3)) (sqrt (/ 1 (pow re 3))))) (* 4 (* (/ (sqrt -1) (pow im 5)) (sqrt re)))))))) re)
(* 2 (* (sqrt re) (sqrt -1)))
(* re (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1)))))
(* re (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* re (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/512 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 (pow re 13))))) (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1)))))))
(* -2 (* (sqrt re) (sqrt -1)))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* re (+ (* -1 (/ (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (pow re 3)))) (* -1/512 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 re))))) (pow re 3))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* 2 (* (sqrt re) (sqrt -1)))
(+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 2 (* (sqrt re) (sqrt -1))))
(+ (* 2 (* (sqrt re) (sqrt -1))) (* (pow im 2) (+ (* -1/64 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 7))))) (* 1/4 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))))))
(+ (* 2 (* (sqrt re) (sqrt -1))) (* (pow im 2) (+ (* 1/4 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))) (* (pow im 2) (+ (* -1/64 (* (sqrt (/ 1 (pow re 7))) (sqrt -1))) (* 1/512 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 11))))))))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* im (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1))))
(* im (+ (* -2 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(* im (+ (* -2 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (+ (* 4 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* -1 (* im (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(* -1 (* im (+ (* -2 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* im (+ (* -2 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (+ (* 4 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (sqrt (/ 1 re)) (sqrt -1)))))))
(* -1 (/ (pow im 2) re))
(/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)
(/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)
(/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)
(* -4 re)
(* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))
(* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))
(* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))
(* -4 re)
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(* -4 re)
(+ (* -4 re) (* -1 (/ (pow im 2) re)))
(+ (* -4 re) (* -1 (/ (pow im 2) re)))
(+ (* -4 re) (* -1 (/ (pow im 2) re)))
(* -1 (/ (pow im 2) re))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(* -1 (/ (pow im 2) re))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
-4
(- (* -1 (/ (pow im 2) (pow re 2))) 4)
(- (* -1 (/ (pow im 2) (pow re 2))) 4)
(- (* -1 (/ (pow im 2) (pow re 2))) 4)
(* -1 (/ (pow im 2) (pow re 2)))
(* -1 (* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2)))))
(* -1 (* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2)))))
(* -1 (* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2)))))
(* -1 (/ (pow im 2) (pow re 2)))
(* -1 (* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2)))))
(* -1 (* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2)))))
(* -1 (* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2)))))
(* -1 (/ (pow im 2) (pow re 2)))
(/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) (pow re 2))
(/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) (pow re 2))
(/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) (pow re 2))
-4
(- (* -1 (/ (pow im 2) (pow re 2))) 4)
(- (* -1 (/ (pow im 2) (pow re 2))) 4)
(- (* -1 (/ (pow im 2) (pow re 2))) 4)
-4
(- (* -1 (/ (pow im 2) (pow re 2))) 4)
(- (* -1 (/ (pow im 2) (pow re 2))) 4)
(- (* -1 (/ (pow im 2) (pow re 2))) 4)
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* (sqrt im) (sqrt 2))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(* im (sqrt (/ 1 re)))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (* im (sqrt (/ 1 re))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re)))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* -1/128 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re))))))
(* -2 (* (sqrt re) (sqrt -1)))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* im (sqrt (/ 1 re)))
(* im (+ (sqrt (/ 1 re)) (* -1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* 7/128 (* (pow im 2) (sqrt (/ 1 (pow re 9)))))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* (pow im 2) (+ (* -33/1024 (* (pow im 2) (sqrt (/ 1 (pow re 13))))) (* 7/128 (sqrt (/ 1 (pow re 9))))))))))
(* (sqrt im) (sqrt 2))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt 2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -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/4 (pow (/ 2 (pow im 3)) 1/4)) (* 1/32 (* (pow (/ 2 (pow im 7)) 1/4) re)))) (pow (* 2 im) 1/4))
(+ (* re (+ (* -1/4 (pow (/ 2 (pow im 3)) 1/4)) (* re (+ (* 1/32 (pow (/ 2 (pow im 7)) 1/4)) (* 5/128 (* (pow (/ 2 (pow im 11)) 1/4) re)))))) (pow (* 2 im) 1/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)))))
(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)) (* 2 (log im)))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 2))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/16 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* 13/512 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 4))))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/16 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* (pow im 2) (+ (* -119/8192 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 6))) (* 13/512 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 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/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/384 (pow re 3)) (* 1/24 (+ (* -2 (pow re 3)) (* 3 (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/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/384 (pow re 3)) (* 1/24 (+ (* -2 (pow re 3)) (* 3 (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 re) (* 2 im))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(/ (pow im 2) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(* -4 re)
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(/ (pow im 2) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* 2 im)
(* im (+ 2 (* -2 (/ re im))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(* -2 im)
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
im
(+ im (* 1/2 (/ (pow re 2) im)))
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
im
(* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))

Outputs
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (.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/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (.f64 #s(literal 1/16 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (.f64 re (+.f64 (.f64 #s(literal 1/32 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))))) (.f64 #s(literal 1/16 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (*.f64 im im)))))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 #s(literal 1/2 binary64) (.f64 im (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+.f64 (.f64 #s(literal 1/2 binary64) (.f64 im (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))) (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im (.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 im (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))) (.f64 #s(literal 1/64 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im (.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 im (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))) (.f64 #s(literal 1/64 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))))) (.f64 #s(literal -1/1024 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (.f64 (pow.f64 im #s(literal 5 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im)))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (+.f64 (.f64 #s(literal -1/32 binary64) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))))) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))))) (.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (+.f64 (.f64 #s(literal -1/32 binary64) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))))) (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im)))) (.f64 #s(literal 1/64 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (.f64 (pow.f64 im #s(literal 4 binary64)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))))) (.f64 re (.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 #s(literal 1/2 binary64) (.f64 im (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(.f64 im (+.f64 (.f64 #s(literal -1/32 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(.f64 im (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 re) (/.f64 (.f64 (.f64 im im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/256 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 5 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64)))))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(.f64 im (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im im)) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/256 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 5 binary64))))) (.f64 re re))) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64))))) (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/256 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 5 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(.f64 im (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(.f64 im (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (+.f64 (.f64 #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 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(.f64 im (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (+.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -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 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(.f64 (+.f64 (.f64 (.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 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 (.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) (-.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 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (sqrt.f64 im) (.f64 (.f64 re re) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) #s(literal 3/16 binary64)) (.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(* 1/2 (sqrt im))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 im))
(+ (* -1/4 (* (sqrt (/ 1 im)) re)) (* 1/2 (sqrt im)))
(+.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (.f64 #s(literal -1/4 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re)))
(+ (* 1/2 (sqrt im)) (* re (+ (* -1/4 (sqrt (/ 1 im))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) re)))))
(+.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (.f64 re (+.f64 (.f64 #s(literal -1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 #s(literal 1/16 binary64) (.f64 re (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (*.f64 im im)))))))))
(+ (* 1/2 (sqrt im)) (* re (+ (* -1/4 (sqrt (/ 1 im))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) re)) (* 1/16 (sqrt (/ 1 (pow im 3)))))))))
(+.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (.f64 re (+.f64 (.f64 #s(literal -1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 re (+.f64 (.f64 #s(literal 1/32 binary64) (.f64 re (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))))) (.f64 #s(literal 1/16 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (*.f64 im im))))))))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1/32 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))))
(+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (.f64 im (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1/32 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))))
(+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (.f64 im (.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 #s(literal 1/64 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (/.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))
(+ (* -1/32 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (pow im 5) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))))))
(+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (.f64 im (.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 #s(literal 1/64 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (/.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal -1/1024 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (/.f64 (pow.f64 im #s(literal 5 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* re (+ (* -1/8 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (+.f64 (.f64 #s(literal -1/32 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) (sqrt.f64 #s(literal 2 binary64))))) (.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (+.f64 (.f64 #s(literal -1/32 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/64 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))))) (.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))))
(* im (+ (* -1/32 (* (/ (pow im 2) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (sqrt 1/2)))))
(.f64 im (+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt 1/2))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt re)))))))
(.f64 im (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/256 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64))))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt 1/2))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (sqrt 1/2))))))))))
(.f64 im (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/256 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 5 binary64))))) (.f64 re re))) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64))))) (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (sqrt.f64 re) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/256 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))))))))))
(* 1/2 (sqrt im))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 im))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) re)) (* 1/2 (sqrt (/ 1 im)))))
(.f64 im (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 re (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (sqrt (/ 1 im))))))
(.f64 im (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 re (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (+.f64 (.f64 #s(literal 1/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 re re))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (sqrt (/ 1 im)))))))
(.f64 im (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 re (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (+.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re))) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(* -1/2 (* (sqrt im) (sqrt -1)))
(.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -1 binary64)))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt -1))))))
(-.f64 #s(literal 0 binary64) (.f64 im (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 re (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt -1)))))))
(.f64 (+.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 re (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 re re))))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (sqrt -1)))) (* 1/8 (* (sqrt im) (* (pow re 2) (sqrt -1))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt -1)))))))
(.f64 (-.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 re (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (.f64 (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 re re))) #s(literal 3/16 binary64)) (.f64 im (.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(sqrt im)
(sqrt.f64 im)
(+ (sqrt im) (* -1/2 (* (sqrt (/ 1 im)) re)))
(+.f64 (sqrt.f64 im) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re)))
(+ (sqrt im) (* re (+ (* -1/2 (sqrt (/ 1 im))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) re)))))
(+.f64 (sqrt.f64 im) (.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal -1/2 binary64)) (.f64 #s(literal 1/8 binary64) (.f64 re (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))))))
(+ (sqrt im) (* re (+ (* -1/2 (sqrt (/ 1 im))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) re)) (* 1/8 (sqrt (/ 1 (pow im 3)))))))))
(+.f64 (sqrt.f64 im) (.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal -1/2 binary64)) (.f64 re (+.f64 (.f64 #s(literal 1/16 binary64) (.f64 re (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) #s(literal 1/8 binary64)))))))
(* (* im (sqrt 1/2)) (sqrt (/ 1 re)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64))))
(+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 im (.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))))
(+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 im (.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (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 9 binary64)))) (/.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))))
(+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (pow im 5) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))))
(+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (.f64 im (.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (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 9 binary64)))) (/.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (/.f64 (pow.f64 im #s(literal 5 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64))))) #s(literal -1/512 binary64))))
(* -1 (* (sqrt re) (* (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 re)))
(* -1 (* re (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im)) (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) (sqrt.f64 #s(literal 2 binary64))))) (.f64 re (.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/32 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))))) (.f64 re (.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* (* im (sqrt 1/2)) (sqrt (/ 1 re)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64))))
(* im (+ (* -1/16 (* (/ (pow im 2) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 1/2))))
(.f64 im (+.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 #s(literal -1/16 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (*.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64))))))
(* im (+ (* (sqrt (/ 1 re)) (sqrt 1/2)) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt re)))))))
(.f64 im (+.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/256 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64))))))))
(* im (+ (* (sqrt (/ 1 re)) (sqrt 1/2)) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (sqrt 1/2))))))))))
(.f64 im (+.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/256 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 5 binary64))))) (.f64 re re))) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64))))) (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 re) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/256 binary64) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))))))))))
(sqrt im)
(sqrt.f64 im)
(* im (+ (sqrt (/ 1 im)) (* -1/2 (* (sqrt (/ 1 (pow im 3))) re))))
(.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 #s(literal -1/2 binary64) (.f64 re (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (*.f64 im im))))))))
(* im (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)) (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2))))))
(.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 re (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re))))))
(* im (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2)))))))
(.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re))) (.f64 #s(literal -1/2 binary64) (.f64 re (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))))))
(* -1 (* (sqrt im) (sqrt -1)))
(*.f64 (sqrt.f64 im) (neg.f64 (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1)))))
(.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (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 re (sqrt.f64 #s(literal -1 binary64)))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))
(-.f64 #s(literal 0 binary64) (.f64 im (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 re (sqrt.f64 #s(literal -1 binary64))))) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (sqrt -1)))) (* 1/4 (* (sqrt im) (* (pow re 2) (sqrt -1))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))
(.f64 (-.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (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 re (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 (.f64 (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 re re))) #s(literal 3/8 binary64)) (.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
im
(+ im (* -1 re))
(-.f64 im re)
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+.f64 im (.f64 re (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 re im)) #s(literal -1 binary64))))
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(+.f64 im (.f64 re (+.f64 (.f64 re (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 re re)) (.f64 im (.f64 im im))) (/.f64 #s(literal 1/2 binary64) im))) #s(literal -1 binary64))))
(* 1/2 (/ (pow im 2) re))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)
(/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (.f64 re re)) (.f64 #s(literal 1/2 binary64) (.f64 im im))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (.f64 re re)) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) re)
(/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)
(/.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (.f64 re re)) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64))) (pow.f64 re #s(literal 6 binary64)))) re)
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(.f64 (+.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(.f64 (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(.f64 (+.f64 #s(literal 2 binary64) (+.f64 (+.f64 (/.f64 (.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)))) (-.f64 #s(literal 0 binary64) re))
(* 1/2 (/ (pow im 2) re))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) re)
(* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))
(.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 im im)) (.f64 re (.f64 re re))) (/.f64 #s(literal 1/2 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (.f64 re (.f64 re re)))))))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (.f64 (.f64 im im) (+.f64 (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 (.f64 #s(literal -5/128 binary64) (.f64 im im)) (pow.f64 re #s(literal 7 binary64))))) (/.f64 #s(literal -1/8 binary64) (.f64 re (.f64 re re)))))))
im
(* im (+ 1 (* -1 (/ re im))))
(*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(.f64 im (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im)) (/.f64 re im))))
(* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))
(.f64 im (-.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))) (/.f64 re im)))
(* -1 im)
(-.f64 #s(literal 0 binary64) im)
(* -1 (* im (+ 1 (/ re im))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 #s(literal 1 binary64) (/.f64 re im))))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) im)) re) im)))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
(.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (.f64 im im)) (.f64 #s(literal 1/2 binary64) (*.f64 re re))) (-.f64 #s(literal 0 binary64) im)) re) im)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* -1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal -1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* -1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal -1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* -1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal -1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* -1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal -1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* -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))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 #s(literal 0 binary64) im))
(* -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))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 #s(literal 0 binary64) im))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 #s(literal 0 binary64) im))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 #s(literal 0 binary64) im))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 #s(literal 0 binary64) im))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 #s(literal 0 binary64) 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)
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (/ (sqrt -1) im) (sqrt (pow re 5)))) re)
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 im (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 re)) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) im) (sqrt.f64 (pow.f64 re #s(literal 5 binary64))))) re)
(/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (pow re 3) (+ (* -1 (* (/ (sqrt -1) (pow im 3)) (sqrt (pow re 3)))) (* (/ (sqrt -1) im) (sqrt (/ 1 re)))))) re)
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 im (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 re)) (.f64 (.f64 re (.f64 re re)) (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) im)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (.f64 re (.f64 re re)))) (.f64 im (.f64 im im)))))) re)
(/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (pow re 3) (+ (* (/ (sqrt -1) im) (sqrt (/ 1 re))) (* (pow re 3) (+ (* -1 (* (/ (sqrt -1) (pow im 3)) (sqrt (/ 1 (pow re 3))))) (* 2 (* (/ (sqrt -1) (pow im 5)) (sqrt re)))))))) re)
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 im (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 re)) (.f64 (.f64 re (.f64 re re)) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) im)) (.f64 (.f64 re (.f64 re re)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 im #s(literal 5 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im (*.f64 im im))))))))) re)
(* (sqrt re) (sqrt -1))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64)))
(* re (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1))))
(.f64 re (+.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) #s(literal 1/8 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))))
(* re (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(.f64 re (+.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) #s(literal 1/8 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal -1/128 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64)))))))
(* re (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/1024 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 (pow re 13))))) (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(.f64 re (+.f64 (+.f64 (.f64 #s(literal -1/128 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 (.f64 #s(literal 1/1024 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 13 binary64)))))) (+.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) #s(literal 1/8 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))))
(* -1 (* (sqrt re) (sqrt -1)))
(.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* 1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(.f64 (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im)))) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))) #s(literal 1/128 binary64))) (.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (pow re 3)))) (* -1/1024 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 re))))) (pow re 3))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(.f64 (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im)))) (/.f64 (+.f64 (.f64 #s(literal -1/128 binary64) (.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (.f64 re (.f64 re re)))))) (.f64 #s(literal -1/1024 binary64) (.f64 (pow.f64 im #s(literal 6 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))))) (.f64 re (.f64 re re)))) (.f64 re (.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* (sqrt re) (sqrt -1))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64)))
(+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt -1)))
(+.f64 (.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) (.f64 (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (*.f64 re re))))))
(+ (* (sqrt re) (sqrt -1)) (* (pow im 2) (+ (* -1/128 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 7))))) (* 1/8 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))))))
(+.f64 (.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) (.f64 (.f64 im im) (+.f64 (.f64 (.f64 #s(literal -1/128 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64))))) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (*.f64 re re)))))))))
(+ (* (sqrt re) (sqrt -1)) (* (pow im 2) (+ (* 1/8 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))) (* (pow im 2) (+ (* -1/128 (* (sqrt (/ 1 (pow re 7))) (sqrt -1))) (* 1/1024 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 11))))))))))
(+.f64 (.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/128 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))))) (.f64 (.f64 #s(literal 1/1024 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 11 binary64))))))))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))
(.f64 im (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (.f64 re (.f64 re re)))) (*.f64 im im))))
(* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))
(.f64 im (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (.f64 re (.f64 re re)))) (.f64 im im))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (pow.f64 im #s(literal 4 binary64)))))
(* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (+ (* 2 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))))
(.f64 im (-.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 11 binary64)))) (pow.f64 im #s(literal 6 binary64))))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (.f64 re (.f64 re re)))) (.f64 im im))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (pow.f64 im #s(literal 4 binary64)))))
(* -1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal -1/2 binary64) (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))
(-.f64 #s(literal 0 binary64) (.f64 im (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (.f64 re (.f64 re re)))) (*.f64 im im)))))
(* -1 (* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))))
(.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (.f64 re (.f64 re re)))) (.f64 im im))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (pow.f64 im #s(literal 4 binary64)))))
(* -1 (* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (+ (* 2 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))))
(.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 11 binary64)))) (pow.f64 im #s(literal 6 binary64))))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (.f64 re (.f64 re re)))) (.f64 im im))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (pow.f64 im #s(literal 4 binary64)))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal -1 binary64))))
(/ (+ (* 2 (* (/ (sqrt -1) im) (sqrt (pow re 5)))) (* (* im (sqrt -1)) (sqrt re))) re)
(/.f64 (+.f64 (.f64 (sqrt.f64 re) (.f64 im (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) im)) (sqrt.f64 (pow.f64 re #s(literal 5 binary64))))) re)
(/ (+ (* (* im (sqrt -1)) (sqrt re)) (* (pow re 3) (+ (* -2 (* (/ (sqrt -1) (pow im 3)) (sqrt (pow re 3)))) (* 2 (* (/ (sqrt -1) im) (sqrt (/ 1 re))))))) re)
(/.f64 (+.f64 (.f64 (sqrt.f64 re) (.f64 im (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 re (.f64 re re)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (.f64 re (.f64 re re)))) (.f64 im (.f64 im im)))) (.f64 (*.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))) re)
(/ (+ (* (* im (sqrt -1)) (sqrt re)) (* (pow re 3) (+ (* 2 (* (/ (sqrt -1) im) (sqrt (/ 1 re)))) (* (pow re 3) (+ (* -2 (* (/ (sqrt -1) (pow im 3)) (sqrt (/ 1 (pow re 3))))) (* 4 (* (/ (sqrt -1) (pow im 5)) (sqrt re)))))))) re)
(/.f64 (+.f64 (.f64 (sqrt.f64 re) (.f64 im (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 re (.f64 re re)) (+.f64 (.f64 (.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 #s(literal -1 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (.f64 re (.f64 re re)) (+.f64 (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im (.f64 im im))))) (.f64 #s(literal 4 binary64) (/.f64 (.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 im #s(literal 5 binary64))))))))) re)
(* 2 (* (sqrt re) (sqrt -1)))
(.f64 (sqrt.f64 re) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))))
(* re (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1)))))
(.f64 re (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))))))
(* re (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(.f64 re (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64)))) #s(literal -1/64 binary64))))
(* re (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/512 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 (pow re 13))))) (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1)))))))
(.f64 re (+.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64)))) #s(literal -1/64 binary64)) (+.f64 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))))) (.f64 (.f64 #s(literal 1/512 binary64) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 13 binary64))))))))
(* -2 (* (sqrt re) (sqrt -1)))
(.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -1 binary64)))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 #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 re #s(literal 5 binary64)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(.f64 (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))))) (.f64 (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) #s(literal 1/4 binary64))) (.f64 re (.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (pow re 3)))) (* -1/512 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 re))))) (pow re 3))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(.f64 (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (-.f64 (.f64 (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) #s(literal 1/4 binary64)) (/.f64 (+.f64 (.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (.f64 re (.f64 re re))))) #s(literal -1/64 binary64)) (.f64 #s(literal -1/512 binary64) (.f64 (pow.f64 im #s(literal 6 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))))) (.f64 re (.f64 re re)))) (.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* 2 (* (sqrt re) (sqrt -1)))
(.f64 (sqrt.f64 re) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))))
(+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 2 (* (sqrt re) (sqrt -1))))
(+.f64 (.f64 (sqrt.f64 re) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))))))
(+ (* 2 (* (sqrt re) (sqrt -1))) (* (pow im 2) (+ (* -1/64 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 7))))) (* 1/4 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))))))
(+.f64 (.f64 (sqrt.f64 re) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 im im) (+.f64 (.f64 (.f64 #s(literal -1/64 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))))))))
(+ (* 2 (* (sqrt re) (sqrt -1))) (* (pow im 2) (+ (* 1/4 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))) (* (pow im 2) (+ (* -1/64 (* (sqrt (/ 1 (pow re 7))) (sqrt -1))) (* 1/512 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 11))))))))))
(+.f64 (.f64 (sqrt.f64 re) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))))) (.f64 (.f64 im im) (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64))))) #s(literal -1/64 binary64)) (.f64 (.f64 #s(literal 1/512 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 11 binary64))))))))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal -1 binary64))))
(* im (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1))))
(.f64 im (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (.f64 re (.f64 re re)))) (*.f64 im im)))))
(* im (+ (* -2 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(.f64 im (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (.f64 re (.f64 re re)))) (.f64 im im)))) (.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (pow.f64 im #s(literal 4 binary64))))))
(* im (+ (* -2 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (+ (* 4 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(.f64 im (+.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (pow.f64 im #s(literal 4 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (.f64 re (.f64 re re)))) (.f64 im im)))) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 11 binary64)))) (pow.f64 im #s(literal 6 binary64)))))))
(* -1 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 #s(literal -1 binary64) (*.f64 im (sqrt.f64 #s(literal -1 binary64)))))
(* -1 (* im (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (.f64 re (.f64 re re)))) (*.f64 im im)))))
(* -1 (* im (+ (* -2 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (.f64 re (.f64 re re)))) (.f64 im im)))) (.f64 #s(literal -2 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (pow.f64 im #s(literal 4 binary64))))))
(* -1 (* im (+ (* -2 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 2 (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))) (+ (* 4 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (sqrt (/ 1 re)) (sqrt -1)))))))
(.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (pow.f64 im #s(literal 4 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (.f64 re (.f64 re re)))) (.f64 im im)))) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal 4 binary64) (/.f64 (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 11 binary64)))) (pow.f64 im #s(literal 6 binary64)))))))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)
(/.f64 (-.f64 (.f64 (.f64 re re) #s(literal -4 binary64)) (*.f64 im im)) re)
(/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)
(/.f64 (-.f64 (.f64 (.f64 re re) #s(literal -4 binary64)) (*.f64 im im)) re)
(/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)
(/.f64 (-.f64 (.f64 (.f64 re re) #s(literal -4 binary64)) (*.f64 im im)) re)
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))
(.f64 re (+.f64 (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (*.f64 re re))) #s(literal -4 binary64)))
(* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))
(.f64 re (+.f64 (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (*.f64 re re))) #s(literal -4 binary64)))
(* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))
(.f64 re (+.f64 (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (*.f64 re re))) #s(literal -4 binary64)))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(+ (* -4 re) (* -1 (/ (pow im 2) re)))
(-.f64 (.f64 re #s(literal -4 binary64)) (/.f64 (.f64 im im) re))
(+ (* -4 re) (* -1 (/ (pow im 2) re)))
(-.f64 (.f64 re #s(literal -4 binary64)) (/.f64 (.f64 im im) re))
(+ (* -4 re) (* -1 (/ (pow im 2) re)))
(-.f64 (.f64 re #s(literal -4 binary64)) (/.f64 (.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(.f64 (.f64 im im) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 re (.f64 im im))) (/.f64 #s(literal -1 binary64) re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(.f64 (.f64 im im) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 re (.f64 im im))) (/.f64 #s(literal -1 binary64) re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(.f64 (.f64 im im) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 re (.f64 im im))) (/.f64 #s(literal -1 binary64) re)))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(.f64 (.f64 im im) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 re (.f64 im im))) (/.f64 #s(literal -1 binary64) re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(.f64 (.f64 im im) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 re (.f64 im im))) (/.f64 #s(literal -1 binary64) re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(.f64 (.f64 im im) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 re (.f64 im im))) (/.f64 #s(literal -1 binary64) re)))
-4
#s(literal -4 binary64)
(- (* -1 (/ (pow im 2) (pow re 2))) 4)
(+.f64 (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re))) #s(literal -4 binary64))
(- (* -1 (/ (pow im 2) (pow re 2))) 4)
(+.f64 (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re))) #s(literal -4 binary64))
(- (* -1 (/ (pow im 2) (pow re 2))) 4)
(+.f64 (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re))) #s(literal -4 binary64))
(* -1 (/ (pow im 2) (pow re 2)))
(/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re)))
(* -1 (* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2)))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 im im)) (+.f64 (/.f64 #s(literal 4 binary64) (.f64 im im)) (/.f64 #s(literal 1 binary64) (.f64 re re))))
(* -1 (* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2)))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 im im)) (+.f64 (/.f64 #s(literal 4 binary64) (.f64 im im)) (/.f64 #s(literal 1 binary64) (.f64 re re))))
(* -1 (* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2)))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 im im)) (+.f64 (/.f64 #s(literal 4 binary64) (.f64 im im)) (/.f64 #s(literal 1 binary64) (.f64 re re))))
(* -1 (/ (pow im 2) (pow re 2)))
(/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re)))
(* -1 (* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2)))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 im im)) (+.f64 (/.f64 #s(literal 4 binary64) (.f64 im im)) (/.f64 #s(literal 1 binary64) (.f64 re re))))
(* -1 (* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2)))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 im im)) (+.f64 (/.f64 #s(literal 4 binary64) (.f64 im im)) (/.f64 #s(literal 1 binary64) (.f64 re re))))
(* -1 (* (pow im 2) (+ (* 4 (/ 1 (pow im 2))) (/ 1 (pow re 2)))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 im im)) (+.f64 (/.f64 #s(literal 4 binary64) (.f64 im im)) (/.f64 #s(literal 1 binary64) (.f64 re re))))
(* -1 (/ (pow im 2) (pow re 2)))
(/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re)))
(/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) (pow re 2))
(/.f64 (-.f64 (.f64 (.f64 re re) #s(literal -4 binary64)) (.f64 im im)) (.f64 re re))
(/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) (pow re 2))
(/.f64 (-.f64 (.f64 (.f64 re re) #s(literal -4 binary64)) (.f64 im im)) (.f64 re re))
(/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) (pow re 2))
(/.f64 (-.f64 (.f64 (.f64 re re) #s(literal -4 binary64)) (.f64 im im)) (.f64 re re))
-4
#s(literal -4 binary64)
(- (* -1 (/ (pow im 2) (pow re 2))) 4)
(+.f64 (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re))) #s(literal -4 binary64))
(- (* -1 (/ (pow im 2) (pow re 2))) 4)
(+.f64 (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re))) #s(literal -4 binary64))
(- (* -1 (/ (pow im 2) (pow re 2))) 4)
(+.f64 (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re))) #s(literal -4 binary64))
-4
#s(literal -4 binary64)
(- (* -1 (/ (pow im 2) (pow re 2))) 4)
(+.f64 (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re))) #s(literal -4 binary64))
(- (* -1 (/ (pow im 2) (pow re 2))) 4)
(+.f64 (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re))) #s(literal -4 binary64))
(- (* -1 (/ (pow im 2) (pow re 2))) 4)
(+.f64 (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (.f64 re re))) #s(literal -4 binary64))
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (.f64 #s(literal 1/16 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (.f64 re (+.f64 (.f64 #s(literal 1/32 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))))) (.f64 #s(literal 1/16 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (*.f64 im im)))))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 #s(literal 1/2 binary64) (.f64 im (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+.f64 (.f64 #s(literal 1/2 binary64) (.f64 im (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))) (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im (.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 im (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))) (.f64 #s(literal 1/64 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im (.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 im (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))) (.f64 #s(literal 1/64 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))))) (.f64 #s(literal -1/1024 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (.f64 (pow.f64 im #s(literal 5 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im)))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (+.f64 (.f64 #s(literal -1/32 binary64) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))))) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))))) (.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (+.f64 (.f64 #s(literal -1/32 binary64) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))))) (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im)))) (.f64 #s(literal 1/64 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (.f64 (pow.f64 im #s(literal 4 binary64)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))))) (.f64 re (.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 #s(literal 1/2 binary64) (.f64 im (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(.f64 im (+.f64 (.f64 #s(literal -1/32 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(.f64 im (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 re) (/.f64 (.f64 (.f64 im im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/256 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 5 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64)))))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(.f64 im (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im im)) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/256 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 5 binary64))))) (.f64 re re))) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64))))) (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/256 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 5 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(.f64 im (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(.f64 im (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (+.f64 (.f64 #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 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(.f64 im (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (+.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -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 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(.f64 (+.f64 (.f64 (.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 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 (.f64 re re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))) (-.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 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (sqrt.f64 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))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(-.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -1 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 (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(+.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (-.f64 (.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -1 binary64) (.f64 im #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -1 binary64) (.f64 im #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (* im (sqrt (/ 1 re))))
(+.f64 (.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 im (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re)))))
(+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 im (.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (+.f64 (.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* -1/128 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re))))))
(+.f64 (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 im (.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 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))) (+.f64 (.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(* -2 (* (sqrt re) (sqrt -1)))
(.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -1 binary64)))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 #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 re #s(literal 5 binary64)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(.f64 (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (+.f64 (.f64 (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) #s(literal 1/4 binary64)) (.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))))) (.f64 re (.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(.f64 (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (+.f64 (+.f64 (.f64 #s(literal 1/64 binary64) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))))) (.f64 (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) #s(literal 1/4 binary64))) (.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))))) (.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (+ (sqrt (/ 1 re)) (* -1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))
(.f64 im (+.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)))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* 7/128 (* (pow im 2) (sqrt (/ 1 (pow re 9)))))))))
(.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 im im) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/8 binary64)) (.f64 (.f64 #s(literal 7/128 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* (pow im 2) (+ (* -33/1024 (* (pow im 2) (sqrt (/ 1 (pow re 13))))) (* 7/128 (sqrt (/ 1 (pow re 9))))))))))
(.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 im im) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/8 binary64)) (.f64 (.f64 im im) (+.f64 (.f64 (.f64 #s(literal -33/1024 binary64) (.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 13 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) #s(literal 7/128 binary64))))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(.f64 im (-.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(.f64 im (-.f64 (+.f64 (.f64 (sqrt.f64 #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 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(.f64 im (-.f64 (+.f64 (+.f64 (.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 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* -1 (* (sqrt im) (* (sqrt -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 (* (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)) (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)))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (.f64 #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 -1 binary64)) (.f64 re re)) (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)))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt 2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 #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 (.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)))))
(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/4 (pow (/ 2 (pow im 3)) 1/4)) (* 1/32 (* (pow (/ 2 (pow im 7)) 1/4) re)))) (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 #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)))))))
(+ (* re (+ (* -1/4 (pow (/ 2 (pow im 3)) 1/4)) (* re (+ (* 1/32 (pow (/ 2 (pow im 7)) 1/4)) (* 5/128 (* (pow (/ 2 (pow im 11)) 1/4) re)))))) (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 1/32 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 7 binary64))) #s(literal 1/4 binary64))) (.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)))))))))
(exp (* 1/4 (+ (log (/ 1 re)) (log (pow im 2)))))
(exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (.f64 im im)) (log.f64 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))))
(+.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (.f64 im im)) (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 (.f64 im im)) (log.f64 re)))))) (.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 im im)) (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 (.f64 im im)) (log.f64 re)))))) (.f64 re re)) (.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (.f64 im im)) (log.f64 re)))) (/.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 im im)) (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 (.f64 im im)) (log.f64 re)))))) (.f64 re re)) (+.f64 (.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (.f64 im im)) (log.f64 re)))) (/.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 im im)) (log.f64 re)))) (+.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 (.f64 #s(literal -720 binary64) (.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64))) (.f64 im im)) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 75/4 binary64)))))) (pow.f64 re #s(literal 6 binary64))))))
(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 (/.f64 #s(literal -1 binary64) 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 (/.f64 #s(literal -1 binary64) 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 (/.f64 #s(literal -1 binary64) 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 (/.f64 #s(literal -1 binary64) 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 (/.f64 #s(literal -1 binary64) re))))))) (.f64 re re)) (.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (/.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 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 (/.f64 #s(literal -1 binary64) 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 (/.f64 #s(literal -1 binary64) re))))))) (.f64 re re)) (+.f64 (.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (/.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 (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (/.f64 (+.f64 (.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 1/24576 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)) (* 2 (log im)))))
(exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* -1/16 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 2))))
(+.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))) (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 (.f64 im im) (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))))) (.f64 re re)))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/16 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* 13/512 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 4))))))
(+.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal -1/16 binary64) (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))) (.f64 re re)) (/.f64 (.f64 #s(literal 13/512 binary64) (.f64 (.f64 im im) (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))))) (pow.f64 re #s(literal 4 binary64))))))
(+ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/16 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* (pow im 2) (+ (* -119/8192 (/ (* (pow im 2) (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 6))) (* 13/512 (/ (exp (* 1/4 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 4))))))))
(+.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal -1/16 binary64) (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))) (.f64 re re)) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal -119/8192 binary64) (.f64 (.f64 im im) (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))))) (pow.f64 re #s(literal 6 binary64))) (/.f64 (.f64 #s(literal 13/512 binary64) (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))) (pow.f64 re #s(literal 4 binary64))))))))
(exp (* 1/4 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64)))))
(+ (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 im) (log.f64 #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 re (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))))) 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 im) (log.f64 #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 re (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))))) im) (.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))) (/.f64 (+.f64 (.f64 #s(literal 1/32 binary64) (.f64 re re)) #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/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/384 (pow re 3)) (* 1/24 (+ (* -2 (pow re 3)) (* 3 (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 im) (log.f64 #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 re (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))))) im) (+.f64 (.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))) (/.f64 (+.f64 (.f64 #s(literal 1/32 binary64) (.f64 re re)) #s(literal 0 binary64)) (.f64 im im))) (.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))) (/.f64 (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/32 binary64) re) #s(literal 0 binary64)) (.f64 (.f64 re (.f64 re re)) #s(literal -1/384 binary64))) (.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 (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 #s(literal 1/32 binary64) (.f64 re re)) #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/32 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/384 (pow re 3)) (* 1/24 (+ (* -2 (pow re 3)) (* 3 (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 #s(literal 1/32 binary64) (.f64 re re)) #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 #s(literal -1/32 binary64) re) #s(literal 0 binary64)) (.f64 (.f64 re (.f64 re re)) #s(literal -1/384 binary64))) (.f64 (.f64 re (.f64 re re)) #s(literal 1/24 binary64))) im))) im)) im))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(+.f64 (.f64 re #s(literal -2 binary64)) (.f64 im #s(literal 2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 re re)) (.f64 im (*.f64 im im))))) #s(literal -2 binary64))))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/.f64 (+.f64 (.f64 im im) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re))) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 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 im im)) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(/.f64 (-.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 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 im im)) (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (pow.f64 re #s(literal 6 binary64)))) re)
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(.f64 (+.f64 #s(literal 4 binary64) (+.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(.f64 (+.f64 #s(literal 4 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 im im) (.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 0 binary64) re))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 im im)) (.f64 re (.f64 re re)))))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (.f64 (.f64 im im) (+.f64 (/.f64 (.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)))))))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (.f64 (.f64 im im) (+.f64 (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal -5/64 binary64) (.f64 im im)) (pow.f64 re #s(literal 7 binary64))) (/.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal 5 binary64))))) (/.f64 #s(literal -1/4 binary64) (.f64 re (.f64 re re)))))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(.f64 im (+.f64 #s(literal 2 binary64) (.f64 (/.f64 re im) #s(literal -2 binary64))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(.f64 im (+.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 re im) #s(literal -2 binary64))) (/.f64 (.f64 re re) (.f64 im im))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(.f64 im (+.f64 #s(literal 2 binary64) (+.f64 (+.f64 (.f64 (/.f64 re im) #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)))) (/.f64 (.f64 re re) (*.f64 im im)))))
(* -2 im)
(*.f64 im #s(literal -2 binary64))
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(-.f64 #s(literal 0 binary64) (.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 2 binary64) re) im))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im)) im)))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (.f64 re #s(literal -2 binary64)) (/.f64 (+.f64 (.f64 re re) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im))) im)) im)))
im
(+ im (* 1/2 (/ (pow re 2) im)))
(+.f64 im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 re re) im)))
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+.f64 im (.f64 (.f64 re re) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 re re)) (.f64 im (.f64 im im))) (/.f64 #s(literal 1/2 binary64) im))))
(+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))
(+.f64 im (.f64 (.f64 re re) (+.f64 (/.f64 #s(literal 1/2 binary64) im) (.f64 (.f64 re re) (+.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 re re)) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (.f64 im (.f64 im im))))))))
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(.f64 re (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (*.f64 re re))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(.f64 re (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re)) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64))))))
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(.f64 (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(.f64 (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re)) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64))))) (-.f64 #s(literal 0 binary64) re))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(+.f64 re (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) re))
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+.f64 re (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 im im)) (.f64 re (.f64 re re))) (/.f64 #s(literal 1/2 binary64) re))))
(+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
(+.f64 re (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (.f64 re (.f64 re re))))))))
im
(* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))
(.f64 im (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))
(.f64 im (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(.f64 im (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im)) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64)))))))
(* -1 im)
(-.f64 #s(literal 0 binary64) im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
(.f64 (-.f64 #s(literal 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)))))))

eval233.0ms (2.5%)

Compiler: Compiled 27358 to 4087 computations (85.1% saved)

prune127.0ms (1.4%)

Pruning

19 alts after pruning (17 fresh and 2 done)

	Pruned	Kept	Total
New	1127	12	1139
Fresh	4	5	9
Picked	4	1	5
Done	0	1	1
Total	1135	19	1154

Accuracy

99.9%

Counts

1154 → 19

Alt Table

Click to see full alt table

Status	Accuracy	Program
	24.1%	(/.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re))
	23.4%	(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
▶	23.8%	(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
	24.1%	(.f64 (.f64 im #s(literal 1/2 binary64)) (pow.f64 re #s(literal -1/2 binary64)))
	54.8%	(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64)))
	74.6%	(.f64 (.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 (log.f64 (-.f64 (hypot.f64 re im) re)) #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
▶	79.6%	(.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)) #s(literal 4 binary64)))
	24.2%	(.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #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 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)))) #s(literal 2 binary64)))
	16.8%	(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 im (/.f64 re im))))
	26.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))
▶	52.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
	12.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 re (*.f64 im im))) (/.f64 #s(literal -1 binary64) re)))))
▶	28.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re #s(literal -4 binary64))))
	54.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))))
✓	52.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))))
✓	80.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
▶	55.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 im re))))
	74.1%	(.f64 #s(literal 1/2 binary64) (exp.f64 (+.f64 (.f64 (log.f64 (-.f64 (hypot.f64 re im) re)) #s(literal 1/2 binary64)) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))

Compiler

Compiled 482 to 366 computations (24.1% saved)

simplify192.0ms (2%)

Algorithm

1×	egg-herbie

Localize:

Found 19 expressions of interest:

New	Metric	Program
✓	cost-diff	(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))
✓	cost-diff	(*.f64 #s(literal 1/2 binary64) im)
✓	cost-diff	(.f64 (.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
✓	cost-diff	(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
✓	cost-diff	(*.f64 im #s(literal 2 binary64))
✓	cost-diff	(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))
✓	cost-diff	(sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))
✓	cost-diff	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
✓	cost-diff	(-.f64 im re)
✓	cost-diff	(*.f64 #s(literal 2 binary64) (-.f64 im re))
✓	cost-diff	(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re)))
✓	cost-diff	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 im re))))
✓	cost-diff	(*.f64 re #s(literal -4 binary64))
✓	cost-diff	(sqrt.f64 (*.f64 re #s(literal -4 binary64)))
✓	cost-diff	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re #s(literal -4 binary64))))
✓	cost-diff	(*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))
✓	cost-diff	(pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64))
✓	cost-diff	(pow.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)) #s(literal 4 binary64))
✓	cost-diff	(.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)) #s(literal 4 binary64)))

Rules

3066×	`fnmadd-define`
2396×	`-lowering-.f32`
2396×	`-lowering-.f64`
1910×	`sum3-define`
1180×	`fma-define`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	40	197
1	77	197
2	159	197
3	316	197
4	548	197
5	839	197
6	1811	197
7	2548	197
8	4981	197
9	6995	197
10	7273	197
11	7630	197
12	7856	197
13	7927	197
0	9241	197

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

Inputs
(* 1/2 (pow (pow (* (- (sqrt (+ (* re re) (* im im))) re) 2) 1/8) 4))
1/2
(pow (pow (* (- (sqrt (+ (* re re) (* im im))) re) 2) 1/8) 4)
(pow (* (- (sqrt (+ (* re re) (* im im))) re) 2) 1/8)
(* (- (sqrt (+ (* re re) (* im im))) re) 2)
(- (sqrt (+ (* re re) (* im im))) re)
(sqrt (+ (* re re) (* im im)))
re
im
2
1/8
4
(* 1/2 (sqrt (* re -4)))
1/2
(sqrt (* re -4))
(* re -4)
re
-4
(* 1/2 (sqrt (* 2 (- im re))))
1/2
(sqrt (* 2 (- im re)))
(* 2 (- im re))
2
(- im re)
im
re
(* 1/2 (sqrt (+ (* im 2) (* re (+ -2 (/ re im))))))
1/2
(sqrt (+ (* im 2) (* re (+ -2 (/ re im)))))
(+ (* im 2) (* re (+ -2 (/ re im))))
(* im 2)
im
2
(* re (+ -2 (/ re im)))
re
(+ -2 (/ re im))
-2
(/ re im)
(* (* (* 1/2 im) (* (sqrt 2) (sqrt 1/2))) (sqrt (/ 1 re)))
(* (* 1/2 im) (* (sqrt 2) (sqrt 1/2)))
(* 1/2 im)
1/2
im
(* (sqrt 2) (sqrt 1/2))
(sqrt 2)
2
(sqrt 1/2)
(sqrt (/ 1 re))
(/ 1 re)
1
re

Outputs
(* 1/2 (pow (pow (* (- (sqrt (+ (* re re) (* im im))) re) 2) 1/8) 4))
(.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)) #s(literal 4 binary64)))
1/2
#s(literal 1/2 binary64)
(pow (pow (* (- (sqrt (+ (* re re) (* im im))) re) 2) 1/8) 4)
(pow.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)) #s(literal 4 binary64))
(pow (* (- (sqrt (+ (* re re) (* im im))) re) 2) 1/8)
(pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64))
(* (- (sqrt (+ (* re re) (* im im))) re) 2)
(*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))
(- (sqrt (+ (* re re) (* im im))) re)
(-.f64 (hypot.f64 re im) re)
(sqrt (+ (* re re) (* im im)))
(hypot.f64 re im)
re
im
2
#s(literal 2 binary64)
1/8
#s(literal 1/8 binary64)
4
#s(literal 4 binary64)
(* 1/2 (sqrt (* re -4)))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re #s(literal -4 binary64))))
1/2
#s(literal 1/2 binary64)
(sqrt (* re -4))
(sqrt.f64 (*.f64 re #s(literal -4 binary64)))
(* re -4)
(*.f64 re #s(literal -4 binary64))
re
-4
#s(literal -4 binary64)
(* 1/2 (sqrt (* 2 (- im re))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 im re))))
1/2
#s(literal 1/2 binary64)
(sqrt (* 2 (- im re)))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re)))
(* 2 (- im re))
(*.f64 #s(literal 2 binary64) (-.f64 im re))
2
#s(literal 2 binary64)
(- im re)
(-.f64 im re)
im
re
(* 1/2 (sqrt (+ (* im 2) (* re (+ -2 (/ re im))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
1/2
#s(literal 1/2 binary64)
(sqrt (+ (* im 2) (* re (+ -2 (/ re im)))))
(sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))
(+ (* im 2) (* re (+ -2 (/ re im))))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))
(* im 2)
(*.f64 im #s(literal 2 binary64))
im
2
#s(literal 2 binary64)
(* re (+ -2 (/ re im)))
(*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))
re
(+ -2 (/ re im))
(+.f64 #s(literal -2 binary64) (/.f64 re im))
-2
#s(literal -2 binary64)
(/ re im)
(/.f64 re im)
(* (* (* 1/2 im) (* (sqrt 2) (sqrt 1/2))) (sqrt (/ 1 re)))
(.f64 (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 #s(literal 1/2 binary64) (.f64 im (sqrt.f64 #s(literal 2 binary64))))))
(* (* 1/2 im) (* (sqrt 2) (sqrt 1/2)))
(.f64 im (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))))
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
1/2
#s(literal 1/2 binary64)
im
(* (sqrt 2) (sqrt 1/2))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))
(sqrt 2)
(sqrt.f64 #s(literal 2 binary64))
2
#s(literal 2 binary64)
(sqrt 1/2)
(sqrt.f64 #s(literal 1/2 binary64))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(/ 1 re)
(/.f64 #s(literal 1 binary64) re)
1
#s(literal 1 binary64)
re

localize190.0ms (2%)

Localize:

Found 19 expressions of interest:

New	Metric	Score	Program
✓	accuracy	100.0%	(*.f64 #s(literal 1/2 binary64) im)
✓	accuracy	100.0%	(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
✓	accuracy	100.0%	(sqrt.f64 #s(literal 2 binary64))
✓	accuracy	100.0%	(sqrt.f64 #s(literal 1/2 binary64))
✓	accuracy	100.0%	(*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))
✓	accuracy	100.0%	(*.f64 im #s(literal 2 binary64))
✓	accuracy	100.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))))))
✓	accuracy	100.0%	(sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))
✓	accuracy	100.0%	(-.f64 im re)
✓	accuracy	100.0%	(*.f64 #s(literal 2 binary64) (-.f64 im re))
✓	accuracy	100.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 im re))))
✓	accuracy	100.0%	(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re)))
✓	accuracy	100.0%	(*.f64 re #s(literal -4 binary64))
✓	accuracy	100.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re #s(literal -4 binary64))))
✓	accuracy	100.0%	(sqrt.f64 (*.f64 re #s(literal -4 binary64)))
✓	accuracy	100.0%	(hypot.f64 re im)
✓	accuracy	100.0%	(-.f64 (hypot.f64 re im) re)
✓	accuracy	100.0%	(*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))
✓	accuracy	100.0%	(.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)) #s(literal 4 binary64)))

Results

144.0ms

256×

invalid

Compiler

Compiled 206 to 38 computations (81.6% saved)

Precisions

Click to see histograms. Total time spent on operations: 107.0ms

ival-mult: 47.0ms (43.9% of total)

compiled-spec: 19.0ms (17.7% of total)

ival-pow: 13.0ms (12.1% of total)

ival-sqrt: 12.0ms (11.2% of total)

ival-add: 8.0ms (7.5% of total)

ival-div: 4.0ms (3.7% of total)

ival-sub: 3.0ms (2.8% of total)

const: 1.0ms (0.9% of total)

backward-pass: 0.0ms (0% of total)

series45.0ms (0.5%)

Counts

25 → 444

Calls

Call 1

Inputs
#<alt (* 1/2 (pow (pow (* (- (sqrt (+ (* re re) (* im im))) re) 2) 1/8) 4))>
#<alt (pow (pow (* (- (sqrt (+ (* re re) (* im im))) re) 2) 1/8) 4)>
#<alt (pow (* (- (sqrt (+ (* re re) (* im im))) re) 2) 1/8)>
#<alt (* (- (sqrt (+ (* re re) (* im im))) re) 2)>
#<alt (* 1/2 (sqrt (* re -4)))>
#<alt (sqrt (* re -4))>
#<alt (* re -4)>
#<alt (* 1/2 (sqrt (* 2 (- im re))))>
#<alt (sqrt (* 2 (- im re)))>
#<alt (* 2 (- im re))>
#<alt (- im re)>
#<alt (* 1/2 (sqrt (+ (* im 2) (* re (+ -2 (/ re im))))))>
#<alt (sqrt (+ (* im 2) (* re (+ -2 (/ re im)))))>
#<alt (+ (* im 2) (* re (+ -2 (/ re im))))>
#<alt (* im 2)>
#<alt (* (* (* 1/2 im) (* (sqrt 2) (sqrt 1/2))) (sqrt (/ 1 re)))>
#<alt (* (* 1/2 im) (* (sqrt 2) (sqrt 1/2)))>
#<alt (* 1/2 im)>
#<alt (* (sqrt 2) (sqrt 1/2))>
#<alt (- (sqrt (+ (* re re) (* im im))) re)>
#<alt (sqrt (+ (* re re) (* im im)))>
#<alt (* re (+ -2 (/ re im)))>
#<alt (sqrt 1/2)>
#<alt (sqrt 2)>
#<alt (sqrt (/ 1 re))>

Outputs
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))>
#<alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))>
#<alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))>
#<alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))>
#<alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))>
#<alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))>
#<alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))>
#<alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (* im (sqrt (/ 1 re))))>
#<alt (+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re)))))>
#<alt (+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* -1/128 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re))))))>
#<alt (* -2 (* (sqrt re) (sqrt -1)))>
#<alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (+ (sqrt (/ 1 re)) (* -1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))>
#<alt (* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* 7/128 (* (pow im 2) (sqrt (/ 1 (pow re 9)))))))))>
#<alt (* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* (pow im 2) (+ (* -33/1024 (* (pow im 2) (sqrt (/ 1 (pow re 13))))) (* 7/128 (sqrt (/ 1 (pow re 9))))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt 2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (pow (* 2 im) 1/8)>
#<alt (+ (* -1/8 (* (pow (/ 2 (pow im 7)) 1/8) re)) (pow (* 2 im) 1/8))>
#<alt (+ (* re (+ (* -1/8 (pow (/ 2 (pow im 7)) 1/8)) (* 1/128 (* (pow (/ 2 (pow im 15)) 1/8) re)))) (pow (* 2 im) 1/8))>
#<alt (+ (* re (+ (* -1/8 (pow (/ 2 (pow im 7)) 1/8)) (* re (+ (* 1/128 (pow (/ 2 (pow im 15)) 1/8)) (* 21/1024 (* (pow (/ 2 (pow im 23)) 1/8) re)))))) (pow (* 2 im) 1/8))>
#<alt (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))>
#<alt (+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))))>
#<alt (+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))>
#<alt (+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/6144 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/196608 (pow im 6)) (* 1/5760 (+ (* -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/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))>
#<alt (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))>
#<alt (+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))))>
#<alt (+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))>
#<alt (+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/196608 (pow im 6)) (+ (* 1/6144 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))))) (* 1/5760 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))>
#<alt (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))>
#<alt (+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 2))))>
#<alt (+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/32 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* 25/2048 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 4))))))>
#<alt (+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/32 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* (pow im 2) (+ (* -451/65536 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 6))) (* 25/2048 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 4))))))))>
#<alt (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))>
#<alt (+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))>
#<alt (+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))>
#<alt (+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/128 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/3072 (pow re 3)) (* 1/48 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) (pow im 3)) (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))>
#<alt (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))>
#<alt (+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* 1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))>
#<alt (+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* -1/8 (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))>
#<alt (+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* -1/128 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/3072 (pow re 3)) (* 1/48 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) im)) (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* -1/8 (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))>
#<alt (* 2 im)>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (+ (* 2 im) (* re (- (/ re im) 2)))>
#<alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))>
#<alt (/ (pow im 2) re)>
#<alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)>
#<alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)>
#<alt (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)>
#<alt (* -4 re)>
#<alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))>
#<alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))>
#<alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))>
#<alt (/ (pow im 2) re)>
#<alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))>
#<alt (* 2 im)>
#<alt (* im (+ 2 (* -2 (/ re im))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))>
#<alt (* -2 im)>
#<alt (* -1 (* im (+ 2 (* 2 (/ re im)))))>
#<alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))>
#<alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))>
#<alt (* 1/2 (* (sqrt re) (sqrt -4)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -4)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -4)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -4)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -4)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -4)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -4)))>
#<alt (* 1/2 (* (sqrt re) (sqrt -4)))>
#<alt (* -1 (* (sqrt re) (sqrt -1)))>
#<alt (* -1 (* (sqrt re) (sqrt -1)))>
#<alt (* -1 (* (sqrt re) (sqrt -1)))>
#<alt (* -1 (* (sqrt re) (sqrt -1)))>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (* -2 (* (sqrt re) (sqrt -1)))>
#<alt (* -2 (* (sqrt re) (sqrt -1)))>
#<alt (* -2 (* (sqrt re) (sqrt -1)))>
#<alt (* -2 (* (sqrt re) (sqrt -1)))>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* -4 re)>
#<alt (* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 re)))) (* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2)))))>
#<alt (+ (* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2)))) (* im (+ (* -1/16 (* (/ (* im (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (sqrt (/ 1 re)) (/ (sqrt 2) (sqrt -1)))))))>
#<alt (+ (* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2)))) (* im (+ (* 1/4 (* (sqrt (/ 1 re)) (/ (sqrt 2) (sqrt -1)))) (* im (+ (* -1/16 (* (sqrt (/ 1 (pow re 3))) (/ (sqrt 2) (pow (sqrt -1) 3)))) (* 1/32 (* (/ (* im (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 5))))))))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* -1/32 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))>
#<alt (* -1 (* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))>
#<alt (* -1 (* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/32 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (* (sqrt -2) (sqrt -1))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* -1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))) (* -1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))))))))>
#<alt (* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (* re (+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))>
#<alt (* re (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* re (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 3) (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))))>
#<alt (* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* re (+ (* 1/4 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* -1 (* re (+ (* -1/16 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))))>
#<alt (* -1 (* re (+ (* -1/16 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 7))))) (+ (* 1/4 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))))>
#<alt (* (sqrt re) (* (sqrt -1) (sqrt 2)))>
#<alt (+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 re)))) (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (+ (* im (+ (* -1/8 (* (/ (* im (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (/ (sqrt 2) (sqrt -1)))))) (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (+ (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (/ (sqrt 2) (sqrt -1)))) (* im (+ (* -1/8 (* (sqrt (/ 1 (pow re 3))) (/ (sqrt 2) (pow (sqrt -1) 3)))) (* 1/16 (* (/ (* im (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 5))))))))) (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))>
#<alt (* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))>
#<alt (* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/16 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (* (sqrt -2) (sqrt -1))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* -1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))) (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))))))) (* (sqrt im) (sqrt 2)))>
#<alt (* (sqrt re) (* (sqrt -1) (sqrt 2)))>
#<alt (* re (+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))>
#<alt (* re (+ (* -1/8 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))>
#<alt (* re (+ (* -1/8 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (/ (* (pow im 3) (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* re (+ (* 1/2 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))>
#<alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))))>
#<alt (* -2 re)>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (* 2 im)>
#<alt (* im (+ 2 (* -2 (/ re im))))>
#<alt (* im (+ 2 (* -2 (/ re im))))>
#<alt (* im (+ 2 (* -2 (/ re im))))>
#<alt (* 2 im)>
#<alt (* -1 (* im (- (* 2 (/ re im)) 2)))>
#<alt (* -1 (* im (- (* 2 (/ re im)) 2)))>
#<alt (* -1 (* im (- (* 2 (/ re im)) 2)))>
#<alt (* 2 im)>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (* -2 re)>
#<alt (* re (- (* 2 (/ im re)) 2))>
#<alt (* re (- (* 2 (/ im re)) 2))>
#<alt (* re (- (* 2 (/ im re)) 2))>
#<alt (* -2 re)>
#<alt (* -1 (* re (+ 2 (* -2 (/ im re)))))>
#<alt (* -1 (* re (+ 2 (* -2 (/ im re)))))>
#<alt (* -1 (* re (+ 2 (* -2 (/ im re)))))>
#<alt (* -1 re)>
#<alt (- im re)>
#<alt (- im re)>
#<alt (- im re)>
#<alt im>
#<alt (* im (+ 1 (* -1 (/ re im))))>
#<alt (* im (+ 1 (* -1 (/ re im))))>
#<alt (* im (+ 1 (* -1 (/ re im))))>
#<alt im>
#<alt (* -1 (* im (- (/ re im) 1)))>
#<alt (* -1 (* im (- (/ re im) 1)))>
#<alt (* -1 (* im (- (/ re im) 1)))>
#<alt im>
#<alt (+ im (* -1 re))>
#<alt (+ im (* -1 re))>
#<alt (+ im (* -1 re))>
#<alt (* -1 re)>
#<alt (* re (- (/ im re) 1))>
#<alt (* re (- (/ im re) 1))>
#<alt (* re (- (/ im re) 1))>
#<alt (* -1 re)>
#<alt (* -1 (* re (+ 1 (* -1 (/ im re)))))>
#<alt (* -1 (* re (+ 1 (* -1 (/ im re)))))>
#<alt (* -1 (* re (+ 1 (* -1 (/ im re)))))>
#<alt (* 1/2 (* (sqrt (/ 1 im)) re))>
#<alt (/ (+ (* -1/2 (sqrt (pow im 3))) (* 1/2 (* (sqrt im) re))) im)>
#<alt (/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* -1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re)))))) im)>
#<alt (/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* -1/2 (sqrt (/ 1 im))) (* im (+ (* -1/4 (* (sqrt (/ 1 im)) (/ 1 re))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 re)))))))) im)>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))>
#<alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))>
#<alt (* -1 (* im (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (+ (* -1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))))>
#<alt (* 1/2 (* (sqrt (/ 1 im)) re))>
#<alt (* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im)))))>
#<alt (* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* 1/2 (sqrt (/ 1 im))))))>
#<alt (* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (+ (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3)))) (* 1/2 (sqrt (/ 1 im)))))))>
#<alt (* -1/2 (* (sqrt (/ 1 im)) re))>
#<alt (* -1 (* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (- (* 2 im) im) re))) (* 1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (sqrt im) (- (* 2 im) im))) (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re)))) re)) (* 1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))>
#<alt (* (sqrt (/ 1 im)) re)>
#<alt (/ (+ (* -1 (sqrt (pow im 3))) (* (sqrt im) re)) im)>
#<alt (/ (+ (* (sqrt im) re) (* (pow im 2) (+ (* -1 (sqrt (/ 1 im))) (* (sqrt im) (/ 1 re))))) im)>
#<alt (/ (+ (* (sqrt im) re) (* (pow im 2) (+ (* -1 (sqrt (/ 1 im))) (* im (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 re))) (* (sqrt (/ 1 im)) (/ 1 re))))))) im)>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))>
#<alt (* (sqrt (/ 1 im)) re)>
#<alt (* re (+ (sqrt (/ 1 im)) (* -1 (* (sqrt im) (/ 1 re)))))>
#<alt (* re (+ (sqrt (/ 1 im)) (+ (* -1 (* (sqrt im) (/ 1 re))) (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))))))>
#<alt (* re (+ (sqrt (/ 1 im)) (+ (* -1 (* (sqrt im) (/ 1 re))) (+ (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3))))))))>
#<alt (* -1 (* (sqrt (/ 1 im)) re))>
#<alt (* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (* (sqrt im) (/ 1 re))))))>
#<alt (* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (sqrt im) (* -1/2 (* (sqrt im) (/ (- (* 2 im) im) re)))) re)))))>
#<alt (* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (sqrt im) (* -1 (/ (+ (* 1/2 (* (sqrt im) (- (* 2 im) im))) (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re)))) re))) re)))))>
#<alt (/ (pow re 2) im)>
#<alt (/ (+ (* -2 (* im re)) (pow re 2)) im)>
#<alt (/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)>
#<alt (/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)>
#<alt (* 2 im)>
#<alt (* im (+ 2 (* -2 (/ re im))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))>
#<alt (* 2 im)>
#<alt (* -1 (* im (- (* 2 (/ re im)) 2)))>
#<alt (* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))>
#<alt (* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))>
#<alt (* 2 im)>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (+ (* 2 im) (* re (- (/ re im) 2)))>
#<alt (+ (* 2 im) (* re (- (/ re im) 2)))>
#<alt (/ (pow re 2) im)>
#<alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))>
#<alt (* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re))))>
#<alt (* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re))))>
#<alt (/ (pow re 2) im)>
#<alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))>
#<alt (* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im)))>
#<alt (* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im)))>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))>
#<alt (* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))>
#<alt (* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))>
#<alt (* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))>
#<alt (* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))>
#<alt (* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))>
#<alt (* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))>
#<alt (* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))>
#<alt (* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))>
#<alt (* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))>
#<alt (* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))>
#<alt (* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))>
#<alt (* 1/2 im)>
#<alt (* 1/2 im)>
#<alt (* 1/2 im)>
#<alt (* 1/2 im)>
#<alt (* 1/2 im)>
#<alt (* 1/2 im)>
#<alt (* 1/2 im)>
#<alt (* 1/2 im)>
#<alt (* 1/2 im)>
#<alt (* 1/2 im)>
#<alt (* 1/2 im)>
#<alt (* 1/2 im)>
#<alt im>
#<alt (+ im (* -1 re))>
#<alt (+ im (* re (- (* 1/2 (/ re im)) 1)))>
#<alt (+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))>
#<alt (* 1/2 (/ (pow im 2) re))>
#<alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)>
#<alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)>
#<alt (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)>
#<alt (* -2 re)>
#<alt (* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))>
#<alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))>
#<alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))>
#<alt (* 1/2 (/ (pow im 2) re))>
#<alt (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))>
#<alt im>
#<alt (* im (+ 1 (* -1 (/ re im))))>
#<alt (* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))>
#<alt (* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))>
#<alt (* -1 im)>
#<alt (* -1 (* im (+ 1 (/ re im))))>
#<alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))>
#<alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))>
#<alt im>
#<alt (+ im (* 1/2 (/ (pow re 2) im)))>
#<alt (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))>
#<alt (+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))>
#<alt re>
#<alt (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))>
#<alt (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))>
#<alt (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))>
#<alt (* -1 re)>
#<alt (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))>
#<alt (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))>
#<alt (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))>
#<alt re>
#<alt (+ re (* 1/2 (/ (pow im 2) re)))>
#<alt (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))>
#<alt (+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))>
#<alt im>
#<alt (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))>
#<alt (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))>
#<alt (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))>
#<alt (* -1 im)>
#<alt (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))>
#<alt (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))>
#<alt (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))>
#<alt (* -2 re)>
#<alt (* re (- (/ re im) 2))>
#<alt (* re (- (/ re im) 2))>
#<alt (* re (- (/ re im) 2))>
#<alt (/ (pow re 2) im)>
#<alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))>
#<alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))>
#<alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))>
#<alt (/ (pow re 2) im)>
#<alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))>
#<alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))>
#<alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))>
#<alt (/ (pow re 2) im)>
#<alt (/ (+ (* -2 (* im re)) (pow re 2)) im)>
#<alt (/ (+ (* -2 (* im re)) (pow re 2)) im)>
#<alt (/ (+ (* -2 (* im re)) (pow re 2)) im)>
#<alt (* -2 re)>
#<alt (+ (* -2 re) (/ (pow re 2) im))>
#<alt (+ (* -2 re) (/ (pow re 2) im))>
#<alt (+ (* -2 re) (/ (pow re 2) im))>
#<alt (* -2 re)>
#<alt (+ (* -2 re) (/ (pow re 2) im))>
#<alt (+ (* -2 re) (/ (pow re 2) im))>
#<alt (+ (* -2 re) (/ (pow re 2) im))>
#<alt (sqrt (/ 1 re))>
#<alt (sqrt (/ 1 re))>
#<alt (sqrt (/ 1 re))>
#<alt (sqrt (/ 1 re))>
#<alt (sqrt (/ 1 re))>
#<alt (sqrt (/ 1 re))>
#<alt (sqrt (/ 1 re))>
#<alt (sqrt (/ 1 re))>
#<alt (* (sqrt (/ 1 re)) (pow (sqrt -1) 2))>
#<alt (* (sqrt (/ 1 re)) (pow (sqrt -1) 2))>
#<alt (* (sqrt (/ 1 re)) (pow (sqrt -1) 2))>
#<alt (* (sqrt (/ 1 re)) (pow (sqrt -1) 2))>

Calls

111 calls:

Time	Variable		Point	Expression
4.0ms	im	@	-inf	(pow (* (- (sqrt (+ (* re re) (* im im))) re) 2) 1/8)
1.0ms	im	@	0	(* (* (* 1/2 im) (* (sqrt 2) (sqrt 1/2))) (sqrt (/ 1 re)))
1.0ms	re	@	inf	(* 1/2 (sqrt (* 2 (- im re))))
1.0ms	re	@	-inf	(* 1/2 (sqrt (* 2 (- im re))))
1.0ms	re	@	inf	(pow (* (- (sqrt (+ (* re re) (* im im))) re) 2) 1/8)

rewrite336.0ms (3.6%)

Algorithm

1×	batch-egg-rewrite

Rules

3084×	`/-lowering-/.f32`
3084×	`/-lowering-/.f64`
3080×	`-lowering-.f32`
3080×	`-lowering-.f64`
2008×	`+-lowering-+.f64`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	40	150
1	185	140
2	1256	140
0	8256	140

Stop Event

1×	iter limit
1×	node limit

Counts

25 → 418

Calls

Call 1

Inputs
(* 1/2 (pow (pow (* (- (sqrt (+ (* re re) (* im im))) re) 2) 1/8) 4))
(pow (pow (* (- (sqrt (+ (* re re) (* im im))) re) 2) 1/8) 4)
(pow (* (- (sqrt (+ (* re re) (* im im))) re) 2) 1/8)
(* (- (sqrt (+ (* re re) (* im im))) re) 2)
(* 1/2 (sqrt (* re -4)))
(sqrt (* re -4))
(* re -4)
(* 1/2 (sqrt (* 2 (- im re))))
(sqrt (* 2 (- im re)))
(* 2 (- im re))
(- im re)
(* 1/2 (sqrt (+ (* im 2) (* re (+ -2 (/ re im))))))
(sqrt (+ (* im 2) (* re (+ -2 (/ re im)))))
(+ (* im 2) (* re (+ -2 (/ re im))))
(* im 2)
(* (* (* 1/2 im) (* (sqrt 2) (sqrt 1/2))) (sqrt (/ 1 re)))
(* (* 1/2 im) (* (sqrt 2) (sqrt 1/2)))
(* 1/2 im)
(* (sqrt 2) (sqrt 1/2))
(- (sqrt (+ (* re re) (* im im))) re)
(sqrt (+ (* re re) (* im im)))
(* re (+ -2 (/ re im)))
(sqrt 1/2)
(sqrt 2)
(sqrt (/ 1 re))

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

simplify449.0ms (4.8%)

Algorithm

1×	egg-herbie

Rules

7414×	`-lowering-.f32`
7414×	`-lowering-.f64`
5378×	`+-lowering-+.f64`
5378×	`+-lowering-+.f32`
1760×	`distribute-lft-in`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	1230	7966
1	4341	7693
0	8767	7693

Stop Event

1×	iter limit
1×	node limit

Counts

444 → 444

Calls

Call 1

Inputs
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* (sqrt im) (sqrt 2))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(* im (sqrt (/ 1 re)))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (* im (sqrt (/ 1 re))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re)))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* -1/128 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re))))))
(* -2 (* (sqrt re) (sqrt -1)))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* im (sqrt (/ 1 re)))
(* im (+ (sqrt (/ 1 re)) (* -1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* 7/128 (* (pow im 2) (sqrt (/ 1 (pow re 9)))))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* (pow im 2) (+ (* -33/1024 (* (pow im 2) (sqrt (/ 1 (pow re 13))))) (* 7/128 (sqrt (/ 1 (pow re 9))))))))))
(* (sqrt im) (sqrt 2))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt 2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(pow (* 2 im) 1/8)
(+ (* -1/8 (* (pow (/ 2 (pow im 7)) 1/8) re)) (pow (* 2 im) 1/8))
(+ (* re (+ (* -1/8 (pow (/ 2 (pow im 7)) 1/8)) (* 1/128 (* (pow (/ 2 (pow im 15)) 1/8) re)))) (pow (* 2 im) 1/8))
(+ (* re (+ (* -1/8 (pow (/ 2 (pow im 7)) 1/8)) (* re (+ (* 1/128 (pow (/ 2 (pow im 15)) 1/8)) (* 21/1024 (* (pow (/ 2 (pow im 23)) 1/8) re)))))) (pow (* 2 im) 1/8))
(exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/6144 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/196608 (pow im 6)) (* 1/5760 (+ (* -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/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))
(exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))
(+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))))
(+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))
(+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/196608 (pow im 6)) (+ (* 1/6144 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))))) (* 1/5760 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))
(exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 2))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/32 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* 25/2048 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 4))))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/32 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* (pow im 2) (+ (* -451/65536 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 6))) (* 25/2048 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 4))))))))
(exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/128 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/3072 (pow re 3)) (* 1/48 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) (pow im 3)) (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))
(exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* 1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* -1/8 (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* -1/128 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/3072 (pow re 3)) (* 1/48 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) im)) (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* -1/8 (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(* 2 im)
(+ (* -2 re) (* 2 im))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(/ (pow im 2) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(* -4 re)
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(/ (pow im 2) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* 2 im)
(* im (+ 2 (* -2 (/ re im))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(* -2 im)
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(* 1/2 (* (sqrt re) (sqrt -4)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(* -1 (* (sqrt re) (sqrt -1)))
(* -1 (* (sqrt re) (sqrt -1)))
(* -1 (* (sqrt re) (sqrt -1)))
(* -1 (* (sqrt re) (sqrt -1)))
(* (sqrt re) (sqrt -4))
(* (sqrt re) (sqrt -4))
(* (sqrt re) (sqrt -4))
(* (sqrt re) (sqrt -4))
(* (sqrt re) (sqrt -4))
(* (sqrt re) (sqrt -4))
(* (sqrt re) (sqrt -4))
(* (sqrt re) (sqrt -4))
(* -2 (* (sqrt re) (sqrt -1)))
(* -2 (* (sqrt re) (sqrt -1)))
(* -2 (* (sqrt re) (sqrt -1)))
(* -2 (* (sqrt re) (sqrt -1)))
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* -4 re)
(* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 re)))) (* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2)))))
(+ (* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2)))) (* im (+ (* -1/16 (* (/ (* im (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (sqrt (/ 1 re)) (/ (sqrt 2) (sqrt -1)))))))
(+ (* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2)))) (* im (+ (* 1/4 (* (sqrt (/ 1 re)) (/ (sqrt 2) (sqrt -1)))) (* im (+ (* -1/16 (* (sqrt (/ 1 (pow re 3))) (/ (sqrt 2) (pow (sqrt -1) 3)))) (* 1/32 (* (/ (* im (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 5))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* -1/32 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(* -1 (* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(* -1 (* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/32 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (* (sqrt -2) (sqrt -1))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* -1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))) (* -1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))))))))
(* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* re (+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(* re (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(* re (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 3) (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* -1 (* re (+ (* 1/4 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* re (+ (* -1/16 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* re (+ (* -1/16 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 7))))) (+ (* 1/4 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))))
(* (sqrt re) (* (sqrt -1) (sqrt 2)))
(+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 re)))) (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(+ (* im (+ (* -1/8 (* (/ (* im (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (/ (sqrt 2) (sqrt -1)))))) (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(+ (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (/ (sqrt 2) (sqrt -1)))) (* im (+ (* -1/8 (* (sqrt (/ 1 (pow re 3))) (/ (sqrt 2) (pow (sqrt -1) 3)))) (* 1/16 (* (/ (* im (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 5))))))))) (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* (sqrt im) (sqrt 2))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))
(* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/16 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (* (sqrt -2) (sqrt -1))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(* (sqrt im) (sqrt 2))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* -1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))) (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))))))) (* (sqrt im) (sqrt 2)))
(* (sqrt re) (* (sqrt -1) (sqrt 2)))
(* re (+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))
(* re (+ (* -1/8 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(* re (+ (* -1/8 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (/ (* (pow im 3) (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* -1 (* re (+ (* 1/2 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))))
(* -2 re)
(+ (* -2 re) (* 2 im))
(+ (* -2 re) (* 2 im))
(+ (* -2 re) (* 2 im))
(* 2 im)
(* im (+ 2 (* -2 (/ re im))))
(* im (+ 2 (* -2 (/ re im))))
(* im (+ 2 (* -2 (/ re im))))
(* 2 im)
(* -1 (* im (- (* 2 (/ re im)) 2)))
(* -1 (* im (- (* 2 (/ re im)) 2)))
(* -1 (* im (- (* 2 (/ re im)) 2)))
(* 2 im)
(+ (* -2 re) (* 2 im))
(+ (* -2 re) (* 2 im))
(+ (* -2 re) (* 2 im))
(* -2 re)
(* re (- (* 2 (/ im re)) 2))
(* re (- (* 2 (/ im re)) 2))
(* re (- (* 2 (/ im re)) 2))
(* -2 re)
(* -1 (* re (+ 2 (* -2 (/ im re)))))
(* -1 (* re (+ 2 (* -2 (/ im re)))))
(* -1 (* re (+ 2 (* -2 (/ im re)))))
(* -1 re)
(- im re)
(- im re)
(- im re)
im
(* im (+ 1 (* -1 (/ re im))))
(* im (+ 1 (* -1 (/ re im))))
(* im (+ 1 (* -1 (/ re im))))
im
(* -1 (* im (- (/ re im) 1)))
(* -1 (* im (- (/ re im) 1)))
(* -1 (* im (- (/ re im) 1)))
im
(+ im (* -1 re))
(+ im (* -1 re))
(+ im (* -1 re))
(* -1 re)
(* re (- (/ im re) 1))
(* re (- (/ im re) 1))
(* re (- (/ im re) 1))
(* -1 re)
(* -1 (* re (+ 1 (* -1 (/ im re)))))
(* -1 (* re (+ 1 (* -1 (/ im re)))))
(* -1 (* re (+ 1 (* -1 (/ im re)))))
(* 1/2 (* (sqrt (/ 1 im)) re))
(/ (+ (* -1/2 (sqrt (pow im 3))) (* 1/2 (* (sqrt im) re))) im)
(/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* -1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re)))))) im)
(/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* -1/2 (sqrt (/ 1 im))) (* im (+ (* -1/4 (* (sqrt (/ 1 im)) (/ 1 re))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 re)))))))) im)
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(* -1 (* im (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))))
(* 1/2 (* (sqrt (/ 1 im)) re))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im)))))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* 1/2 (sqrt (/ 1 im))))))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (+ (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3)))) (* 1/2 (sqrt (/ 1 im)))))))
(* -1/2 (* (sqrt (/ 1 im)) re))
(* -1 (* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (- (* 2 im) im) re))) (* 1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (sqrt im) (- (* 2 im) im))) (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re)))) re)) (* 1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))
(* (sqrt (/ 1 im)) re)
(/ (+ (* -1 (sqrt (pow im 3))) (* (sqrt im) re)) im)
(/ (+ (* (sqrt im) re) (* (pow im 2) (+ (* -1 (sqrt (/ 1 im))) (* (sqrt im) (/ 1 re))))) im)
(/ (+ (* (sqrt im) re) (* (pow im 2) (+ (* -1 (sqrt (/ 1 im))) (* im (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 re))) (* (sqrt (/ 1 im)) (/ 1 re))))))) im)
(* (sqrt im) (sqrt 2))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(* (sqrt im) (sqrt 2))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(* (sqrt (/ 1 im)) re)
(* re (+ (sqrt (/ 1 im)) (* -1 (* (sqrt im) (/ 1 re)))))
(* re (+ (sqrt (/ 1 im)) (+ (* -1 (* (sqrt im) (/ 1 re))) (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))))))
(* re (+ (sqrt (/ 1 im)) (+ (* -1 (* (sqrt im) (/ 1 re))) (+ (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3))))))))
(* -1 (* (sqrt (/ 1 im)) re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (* (sqrt im) (/ 1 re))))))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (sqrt im) (* -1/2 (* (sqrt im) (/ (- (* 2 im) im) re)))) re)))))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (sqrt im) (* -1 (/ (+ (* 1/2 (* (sqrt im) (- (* 2 im) im))) (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re)))) re))) re)))))
(/ (pow re 2) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)
(/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)
(* 2 im)
(* im (+ 2 (* -2 (/ re im))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(* 2 im)
(* -1 (* im (- (* 2 (/ re im)) 2)))
(* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))
(* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2)))
(* 2 im)
(+ (* -2 re) (* 2 im))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(/ (pow re 2) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re))))
(* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re))))
(/ (pow re 2) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im)))
(* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im)))
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
im
(+ im (* -1 re))
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(* 1/2 (/ (pow im 2) re))
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)
(* -2 re)
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(* 1/2 (/ (pow im 2) re))
(* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
im
(* im (+ 1 (* -1 (/ re im))))
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))
(* -1 im)
(* -1 (* im (+ 1 (/ re im))))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
im
(+ im (* 1/2 (/ (pow re 2) im)))
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
im
(* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
(* -2 re)
(* re (- (/ re im) 2))
(* re (- (/ re im) 2))
(* re (- (/ re im) 2))
(/ (pow re 2) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(/ (pow re 2) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(/ (pow re 2) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(* -2 re)
(+ (* -2 re) (/ (pow re 2) im))
(+ (* -2 re) (/ (pow re 2) im))
(+ (* -2 re) (/ (pow re 2) im))
(* -2 re)
(+ (* -2 re) (/ (pow re 2) im))
(+ (* -2 re) (/ (pow re 2) im))
(+ (* -2 re) (/ (pow re 2) im))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))

Outputs
(* 1/2 (* (sqrt 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/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (.f64 #s(literal 1/16 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (.f64 re (+.f64 (.f64 #s(literal 1/32 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))))) (.f64 #s(literal 1/16 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (*.f64 im im)))))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+.f64 (.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im (.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 #s(literal 1/64 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im (.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (+.f64 (.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 #s(literal 1/64 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))))) (.f64 #s(literal -1/1024 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (*.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (pow.f64 im #s(literal 5 binary64)) #s(literal 1/2 binary64)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im)))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/32 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))))) (.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/32 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))) (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im)))) (.f64 (.f64 #s(literal 1/64 binary64) (.f64 (pow.f64 im #s(literal 4 binary64)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))))) (.f64 re (.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(.f64 im (+.f64 (.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(.f64 im (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/32 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 im im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/256 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 5 binary64))))))) (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64))))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(.f64 im (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/32 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im im)) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/256 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 5 binary64))))) (.f64 re re))) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64))))) (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/256 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 5 binary64))))))) (sqrt.f64 #s(literal 1/2 binary64))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(.f64 im (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(.f64 im (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (+.f64 (.f64 #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 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(.f64 im (+.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (.f64 #s(literal -1/16 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (.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 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(.f64 (.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 (.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 0 binary64) im))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal -1/8 binary64) (.f64 (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 #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 (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))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(-.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) 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 (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(+.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (-.f64 (.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64))))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (* im (sqrt (/ 1 re))))
(+.f64 (.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 im (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re)))))
(+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 im (.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (+.f64 (.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* -1/128 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re))))))
(+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 im (.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (+.f64 (+.f64 (.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))) (.f64 (*.f64 #s(literal -1/128 binary64) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(* -2 (* (sqrt re) (sqrt -1)))
(.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -1 binary64)))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(.f64 (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))) (.f64 (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) #s(literal 1/4 binary64))) (.f64 re (.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(.f64 (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))) (+.f64 (.f64 (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) #s(literal 1/4 binary64)) (.f64 (.f64 #s(literal 1/64 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))))) (.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (+ (sqrt (/ 1 re)) (* -1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))
(.f64 im (+.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)))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* 7/128 (* (pow im 2) (sqrt (/ 1 (pow re 9)))))))))
(.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 im im) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/8 binary64)) (.f64 (.f64 #s(literal 7/128 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* (pow im 2) (+ (* -33/1024 (* (pow im 2) (sqrt (/ 1 (pow re 13))))) (* 7/128 (sqrt (/ 1 (pow re 9))))))))))
(.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 im im) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/8 binary64)) (.f64 (.f64 im im) (+.f64 (.f64 (.f64 #s(literal -33/1024 binary64) (.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 13 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) #s(literal 7/128 binary64))))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(.f64 im (-.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(.f64 im (-.f64 (+.f64 (.f64 (sqrt.f64 #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 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(.f64 im (-.f64 (+.f64 (+.f64 (.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 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* -1 (* (sqrt im) (* (sqrt -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 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (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 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -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 #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 -1 binary64)) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt 2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -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 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 re re))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 re re))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (.f64 im (.f64 im im)))) (/.f64 (.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))
(pow (* 2 im) 1/8)
(pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/8 binary64))
(+ (* -1/8 (* (pow (/ 2 (pow im 7)) 1/8) re)) (pow (* 2 im) 1/8))
(+.f64 (pow.f64 (.f64 im #s(literal 2 binary64)) #s(literal 1/8 binary64)) (.f64 #s(literal -1/8 binary64) (*.f64 re (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 7 binary64))) #s(literal 1/8 binary64)))))
(+ (* re (+ (* -1/8 (pow (/ 2 (pow im 7)) 1/8)) (* 1/128 (* (pow (/ 2 (pow im 15)) 1/8) re)))) (pow (* 2 im) 1/8))
(+.f64 (pow.f64 (.f64 im #s(literal 2 binary64)) #s(literal 1/8 binary64)) (.f64 re (+.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 7 binary64))) #s(literal 1/8 binary64))) (.f64 #s(literal 1/128 binary64) (*.f64 re (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 15 binary64))) #s(literal 1/8 binary64)))))))
(+ (* re (+ (* -1/8 (pow (/ 2 (pow im 7)) 1/8)) (* re (+ (* 1/128 (pow (/ 2 (pow im 15)) 1/8)) (* 21/1024 (* (pow (/ 2 (pow im 23)) 1/8) re)))))) (pow (* 2 im) 1/8))
(+.f64 (pow.f64 (.f64 im #s(literal 2 binary64)) #s(literal 1/8 binary64)) (.f64 re (+.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 7 binary64))) #s(literal 1/8 binary64))) (.f64 re (+.f64 (.f64 #s(literal 1/128 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 15 binary64))) #s(literal 1/8 binary64))) (.f64 #s(literal 21/1024 binary64) (*.f64 re (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 23 binary64))) #s(literal 1/8 binary64)))))))))
(exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))
(exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (.f64 im im)) (log.f64 re))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))))
(+.f64 (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (.f64 im im)) (log.f64 re)))) (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 (.f64 im im) (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (.f64 im im)) (log.f64 re)))))) (.f64 re re)))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))
(+.f64 (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (.f64 im im)) (log.f64 re)))) (+.f64 (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 (.f64 im im) (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (.f64 im im)) (log.f64 re)))))) (.f64 re re)) (.f64 (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (.f64 im im)) (log.f64 re)))) (/.f64 (+.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/2048 binary64)) (.f64 #s(literal 1/192 binary64) (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64)))) (pow.f64 re #s(literal 4 binary64))))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/6144 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/196608 (pow im 6)) (* 1/5760 (+ (* -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/8 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))
(+.f64 (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (.f64 im im)) (log.f64 re)))) (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 (.f64 im im) (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (.f64 im im)) (log.f64 re)))))) (.f64 re re)) (/.f64 (.f64 (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 (.f64 im im)) (log.f64 re)))) (+.f64 (.f64 (.f64 #s(literal -1/6144 binary64) (.f64 im im)) (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64))) (+.f64 (.f64 #s(literal -1/196608 binary64) (pow.f64 im #s(literal 6 binary64))) (.f64 #s(literal 1/5760 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/8 binary64) (-.f64 (log.f64 (.f64 im im)) (log.f64 re)))) (/.f64 (+.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/2048 binary64)) (.f64 #s(literal 1/192 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64)))) (pow.f64 re #s(literal 4 binary64))))))
(exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))
(exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re)))))
(+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))))
(+.f64 (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (/.f64 (.f64 #s(literal 1/32 binary64) (.f64 (.f64 im im) (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))))) (.f64 re re)))
(+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))
(+.f64 (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (/.f64 (.f64 #s(literal 1/32 binary64) (.f64 (.f64 im im) (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))))) (.f64 re re)) (.f64 (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (/.f64 (+.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/2048 binary64)) (.f64 #s(literal 1/192 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64)))) (pow.f64 re #s(literal 4 binary64))))))
(+ (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/196608 (pow im 6)) (+ (* 1/6144 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))))) (* 1/5760 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/8 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/2048 (pow im 4)) (* 1/192 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))
(+.f64 (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (/.f64 (.f64 #s(literal 1/32 binary64) (.f64 (.f64 im im) (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))))) (.f64 re re)) (+.f64 (.f64 (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (/.f64 (+.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/2048 binary64)) (.f64 #s(literal 1/192 binary64) (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64)))) (pow.f64 re #s(literal 4 binary64)))) (.f64 (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (/.f64 (+.f64 (+.f64 (.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 1/196608 binary64)) (.f64 (.f64 #s(literal 1/6144 binary64) (.f64 im im)) (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64)))) (.f64 #s(literal 1/5760 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)))))))
(exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))
(exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* -1/32 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 2))))
(+.f64 (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))) (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 (.f64 im im) (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))))) (.f64 re re)))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/32 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* 25/2048 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 4))))))
(+.f64 (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal -1/32 binary64) (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))) (.f64 re re)) (/.f64 (.f64 #s(literal 25/2048 binary64) (.f64 (.f64 im im) (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))))) (pow.f64 re #s(literal 4 binary64))))))
(+ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/32 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* (pow im 2) (+ (* -451/65536 (/ (* (pow im 2) (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 6))) (* 25/2048 (/ (exp (* 1/8 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 4))))))))
(+.f64 (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal -1/32 binary64) (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))) (.f64 re re)) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal -451/65536 binary64) (.f64 (.f64 im im) (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))))) (pow.f64 re #s(literal 6 binary64))) (/.f64 (.f64 #s(literal 25/2048 binary64) (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))) (pow.f64 re #s(literal 4 binary64))))))))
(exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp.f64 (*.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64)))))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))
(+.f64 (exp.f64 (.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 re (exp.f64 (.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))))) im))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))
(+.f64 (exp.f64 (.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 re (exp.f64 (.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))))) im) (.f64 (exp.f64 (.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))) (/.f64 (+.f64 (.f64 (.f64 re re) #s(literal 1/128 binary64)) #s(literal 0 binary64)) (*.f64 im im)))))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/128 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/3072 (pow re 3)) (* 1/48 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) (pow im 3)) (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))
(+.f64 (exp.f64 (.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 re (exp.f64 (.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))))) im) (+.f64 (.f64 (exp.f64 (.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))) (/.f64 (+.f64 (.f64 (.f64 re re) #s(literal 1/128 binary64)) #s(literal 0 binary64)) (.f64 im im))) (.f64 (exp.f64 (.f64 #s(literal 1/8 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/128 binary64) re) #s(literal 0 binary64)) (+.f64 (.f64 (.f64 re (.f64 re re)) #s(literal -1/3072 binary64)) (.f64 (.f64 re (.f64 re re)) #s(literal 1/48 binary64)))) (.f64 im (*.f64 im im)))))))
(exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))
(exp.f64 (*.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* 1/8 (/ (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))
(+.f64 (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 re (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))))) im))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* -1/8 (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(-.f64 (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (-.f64 (.f64 (.f64 #s(literal -1/8 binary64) re) (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (.f64 (exp.f64 (.f64 #s(literal 1/8 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/128 binary64)) #s(literal 0 binary64)) im))) im))
(+ (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* -1/128 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/3072 (pow re 3)) (* 1/48 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) im)) (* (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/128 (pow re 2)) (* 1/16 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* -1/8 (* re (exp (* 1/8 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(-.f64 (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (-.f64 (.f64 (.f64 #s(literal -1/8 binary64) re) (exp.f64 (.f64 #s(literal 1/8 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/128 binary64)) #s(literal 0 binary64)) (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (.f64 (exp.f64 (.f64 #s(literal 1/8 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/128 binary64) re) #s(literal 0 binary64)) (+.f64 (.f64 (.f64 re (.f64 re re)) #s(literal -1/3072 binary64)) (.f64 (.f64 re (.f64 re re)) #s(literal 1/48 binary64)))) im))) im)) im))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 re re)) (.f64 im (*.f64 im im))))) #s(literal -2 binary64))))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/.f64 (+.f64 (.f64 im im) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re))) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (.f64 re re)) (+.f64 (.f64 im im) (/.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(/.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (.f64 re re)) (+.f64 (.f64 im im) (/.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (pow.f64 re #s(literal 6 binary64)))) re)
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(.f64 (+.f64 #s(literal 4 binary64) (+.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(.f64 (+.f64 (+.f64 #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))))) (-.f64 #s(literal 0 binary64) re))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 im im)) (.f64 re (.f64 re re)))))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (.f64 (.f64 im im) (+.f64 (/.f64 (.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)))))))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (.f64 (.f64 im im) (+.f64 (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal -5/64 binary64) (.f64 im im)) (pow.f64 re #s(literal 7 binary64))) (/.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal 5 binary64))))) (/.f64 #s(literal -1/4 binary64) (.f64 re (.f64 re re)))))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (.f64 re #s(literal -2 binary64)) im)))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(.f64 im (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (.f64 re #s(literal -2 binary64)) im)) (/.f64 (.f64 re re) (.f64 im im))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(.f64 im (+.f64 #s(literal 2 binary64) (+.f64 (+.f64 (/.f64 (.f64 re #s(literal -2 binary64)) im) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64)))) (/.f64 (.f64 re re) (*.f64 im im)))))
(* -2 im)
(*.f64 im #s(literal -2 binary64))
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (/.f64 re im))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(.f64 (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im)) im)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(.f64 (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (.f64 re #s(literal -2 binary64)) (/.f64 (+.f64 (.f64 re re) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im))) im)) im)) (-.f64 #s(literal 0 binary64) im))
(* 1/2 (* (sqrt re) (sqrt -4)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(* 1/2 (* (sqrt re) (sqrt -4)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -4 binary64)))
(* -1 (* (sqrt re) (sqrt -1)))
(.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(* -1 (* (sqrt re) (sqrt -1)))
(.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(* -1 (* (sqrt re) (sqrt -1)))
(.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(* -1 (* (sqrt re) (sqrt -1)))
(.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 #s(literal -1 binary64) (sqrt.f64 re)))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(* -2 (* (sqrt re) (sqrt -1)))
(.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -1 binary64)))
(* -2 (* (sqrt re) (sqrt -1)))
(.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -1 binary64)))
(* -2 (* (sqrt re) (sqrt -1)))
(.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -1 binary64)))
(* -2 (* (sqrt re) (sqrt -1)))
(.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -1 binary64)))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))
(+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 re)))) (* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2)))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(+ (* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2)))) (* im (+ (* -1/16 (* (/ (* im (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (sqrt (/ 1 re)) (/ (sqrt 2) (sqrt -1)))))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 im (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (/.f64 (.f64 im (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal -1 binary64)))))))
(+ (* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2)))) (* im (+ (* 1/4 (* (sqrt (/ 1 re)) (/ (sqrt 2) (sqrt -1)))) (* im (+ (* -1/16 (* (sqrt (/ 1 (pow re 3))) (/ (sqrt 2) (pow (sqrt -1) 3)))) (* 1/32 (* (/ (* im (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 5))))))))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 im (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (.f64 im (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))))) (.f64 #s(literal 1/32 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 5 binary64))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(.f64 im (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(.f64 im (+.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (.f64 #s(literal -1/16 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* -1/32 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(.f64 im (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.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/16 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))) (+.f64 (.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) (* (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 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (.f64 re (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(.f64 (+.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (.f64 re (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))) (.f64 #s(literal -1/16 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.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/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/32 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (* (sqrt -2) (sqrt -1))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))))
(.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))) (+.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (.f64 re (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64))))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))) (.f64 (.f64 #s(literal 1/32 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64))))) (.f64 (.f64 re (.f64 re re)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 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/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* -1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) #s(literal -1/16 binary64)))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))) (* -1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))))))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (.f64 re (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) #s(literal -1/16 binary64)) (.f64 (.f64 (*.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) #s(literal -1/32 binary64)))))))
(* 1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))
(* re (+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(.f64 re (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (/.f64 (.f64 im (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) re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))
(* re (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(.f64 re (+.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (/.f64 (.f64 im (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) re)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im im)) (.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64))))))))
(* re (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 3) (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/4 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))))
(.f64 re (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im im)) (.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))))) (+.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (/.f64 (.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (.f64 #s(literal 1/32 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64))))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 5 binary64)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 re) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))
(* -1 (* re (+ (* 1/4 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(-.f64 #s(literal 0 binary64) (.f64 re (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.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) (.f64 re (.f64 re re)))) (.f64 (.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))))))
(* -1 (* re (+ (* -1/16 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/4 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))))
(.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.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) (.f64 re (.f64 re re)))) (.f64 (.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (.f64 im im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1/16 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 7))))) (+ (* 1/4 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))))
(.f64 (+.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (.f64 im im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (.f64 (.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/32 binary64) (.f64 (.f64 im (.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64))))))) (-.f64 #s(literal 0 binary64) re))
(* (sqrt re) (* (sqrt -1) (sqrt 2)))
(.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))
(+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 re)))) (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(+.f64 (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (*.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (sqrt.f64 #s(literal -1 binary64)))))
(+ (* im (+ (* -1/8 (* (/ (* im (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt (/ 1 re)) (/ (sqrt 2) (sqrt -1)))))) (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(+.f64 (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 im (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (/.f64 (.f64 im (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))))) (.f64 #s(literal 1/2 binary64) (/.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal -1 binary64)))))))
(+ (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (/ (sqrt 2) (sqrt -1)))) (* im (+ (* -1/8 (* (sqrt (/ 1 (pow re 3))) (/ (sqrt 2) (pow (sqrt -1) 3)))) (* 1/16 (* (/ (* im (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 5))))))))) (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(+.f64 (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 im (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (.f64 im (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))))) (.f64 #s(literal 1/16 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (.f64 im (sqrt.f64 #s(literal 2 binary64))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 5 binary64))))))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(.f64 im (+.f64 (.f64 (sqrt.f64 #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/2 binary64))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(.f64 im (+.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) #s(literal -1/2 binary64)) (+.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(.f64 im (+.f64 (+.f64 (.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/2 binary64)) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (.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 7 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 re (.f64 re re))))))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))
(.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (*.f64 re (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(.f64 (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (.f64 re (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.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/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -2) (sqrt -1))))) (+ (* 1/16 (* (sqrt (/ 1 (pow im 7))) (* (pow re 3) (* (sqrt -2) (sqrt -1))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -2) (sqrt -1))))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(.f64 (+.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))))) (.f64 (.f64 #s(literal 1/16 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64))))) (.f64 (.f64 re (.f64 re re)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))))) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (.f64 re (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal -1 binary64))))))) (-.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 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) re)) #s(literal -1/2 binary64)))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* -1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) #s(literal -1/2 binary64)) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (*.f64 im im))))) #s(literal -1/8 binary64)))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))) (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))))))) (* (sqrt im) (sqrt 2)))
(+.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) #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))))) #s(literal -1/8 binary64)) (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) #s(literal -1/16 binary64)))))))
(* (sqrt re) (* (sqrt -1) (sqrt 2)))
(.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))
(* re (+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))
(.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (/.f64 (.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal -1 binary64)))))))
(* re (+ (* -1/8 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(.f64 re (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.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 re (.f64 re re)))) (/.f64 (.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal -1 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im im)) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64))))))))
(* re (+ (* -1/8 (* (/ (* (pow im 2) (sqrt 2)) (pow (sqrt -1) 3)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (/ (* (pow im 3) (sqrt 2)) (pow (sqrt -1) 5)) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (/ (* im (sqrt 2)) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(.f64 re (+.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im im)) (.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))))) (.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im (.f64 im im))) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))))) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (/.f64 (.f64 im (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal -1 binary64))))))))
(* -1 (* (sqrt re) (* (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 re)))
(* -1 (* re (+ (* 1/2 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))
(.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (.f64 (*.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/2 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(.f64 (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (.f64 (.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (.f64 im im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 7))))) (+ (* 1/2 (* (* im (* (sqrt -1) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2))))))))
(.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (.f64 im im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (.f64 (.f64 im (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))) (.f64 (.f64 #s(literal 1/16 binary64) (.f64 (.f64 im (.f64 im im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64))))))) (-.f64 #s(literal 0 binary64) re))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(+ (* -2 re) (* 2 im))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re #s(literal -2 binary64)))
(+ (* -2 re) (* 2 im))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re #s(literal -2 binary64)))
(+ (* -2 re) (* 2 im))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re #s(literal -2 binary64)))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (.f64 re #s(literal -2 binary64)) im)))
(* im (+ 2 (* -2 (/ re im))))
(.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (.f64 re #s(literal -2 binary64)) im)))
(* im (+ 2 (* -2 (/ re im))))
(.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (.f64 re #s(literal -2 binary64)) im)))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* -1 (* im (- (* 2 (/ re im)) 2)))
(.f64 (+.f64 (.f64 #s(literal 2 binary64) (/.f64 re im)) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (- (* 2 (/ re im)) 2)))
(.f64 (+.f64 (.f64 #s(literal 2 binary64) (/.f64 re im)) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (- (* 2 (/ re im)) 2)))
(.f64 (+.f64 (.f64 #s(literal 2 binary64) (/.f64 re im)) #s(literal -2 binary64)) (-.f64 #s(literal 0 binary64) im))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re #s(literal -2 binary64)))
(+ (* -2 re) (* 2 im))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re #s(literal -2 binary64)))
(+ (* -2 re) (* 2 im))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re #s(literal -2 binary64)))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* re (- (* 2 (/ im re)) 2))
(.f64 re (+.f64 (.f64 #s(literal 2 binary64) (/.f64 im re)) #s(literal -2 binary64)))
(* re (- (* 2 (/ im re)) 2))
(.f64 re (+.f64 (.f64 #s(literal 2 binary64) (/.f64 im re)) #s(literal -2 binary64)))
(* re (- (* 2 (/ im re)) 2))
(.f64 re (+.f64 (.f64 #s(literal 2 binary64) (/.f64 im re)) #s(literal -2 binary64)))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -1 (* re (+ 2 (* -2 (/ im re)))))
(.f64 (+.f64 #s(literal 2 binary64) (/.f64 (.f64 im #s(literal -2 binary64)) re)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 2 (* -2 (/ im re)))))
(.f64 (+.f64 #s(literal 2 binary64) (/.f64 (.f64 im #s(literal -2 binary64)) re)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 2 (* -2 (/ im re)))))
(.f64 (+.f64 #s(literal 2 binary64) (/.f64 (.f64 im #s(literal -2 binary64)) re)) (-.f64 #s(literal 0 binary64) re))
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(- im re)
(-.f64 im re)
(- im re)
(-.f64 im re)
(- im re)
(-.f64 im re)
im
(* im (+ 1 (* -1 (/ re im))))
(*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(* im (+ 1 (* -1 (/ re im))))
(*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(* im (+ 1 (* -1 (/ re im))))
(*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))
im
(* -1 (* im (- (/ re im) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (/.f64 re im) #s(literal -1 binary64))))
(* -1 (* im (- (/ re im) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (/.f64 re im) #s(literal -1 binary64))))
(* -1 (* im (- (/ re im) 1)))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 (/.f64 re im) #s(literal -1 binary64))))
im
(+ im (* -1 re))
(-.f64 im re)
(+ im (* -1 re))
(-.f64 im re)
(+ im (* -1 re))
(-.f64 im re)
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* re (- (/ im re) 1))
(*.f64 re (+.f64 (/.f64 im re) #s(literal -1 binary64)))
(* re (- (/ im re) 1))
(*.f64 re (+.f64 (/.f64 im re) #s(literal -1 binary64)))
(* re (- (/ im re) 1))
(*.f64 re (+.f64 (/.f64 im re) #s(literal -1 binary64)))
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* -1 (* re (+ 1 (* -1 (/ im re)))))
(-.f64 #s(literal 0 binary64) (*.f64 re (-.f64 #s(literal 1 binary64) (/.f64 im re))))
(* -1 (* re (+ 1 (* -1 (/ im re)))))
(-.f64 #s(literal 0 binary64) (*.f64 re (-.f64 #s(literal 1 binary64) (/.f64 im re))))
(* -1 (* re (+ 1 (* -1 (/ im re)))))
(-.f64 #s(literal 0 binary64) (*.f64 re (-.f64 #s(literal 1 binary64) (/.f64 im re))))
(* 1/2 (* (sqrt (/ 1 im)) re))
(.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re))
(/ (+ (* -1/2 (sqrt (pow im 3))) (* 1/2 (* (sqrt im) re))) im)
(/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (.f64 im (.f64 im im)))) (.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) re))) im)
(/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* -1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re)))))) im)
(/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 im) re)) (.f64 (.f64 im im) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal -1/2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 im) re))))) im)
(/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* -1/2 (sqrt (/ 1 im))) (* im (+ (* -1/4 (* (sqrt (/ 1 im)) (/ 1 re))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 re)))))))) im)
(/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 im) re)) (.f64 (.f64 im im) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal -1/2 binary64)) (.f64 im (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re) #s(literal 1/4 binary64)))))) im)
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(.f64 im (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #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 re (sqrt.f64 #s(literal 2 binary64)))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(.f64 im (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #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 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(.f64 im (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (+.f64 (.f64 #s(literal 1/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 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (.f64 #s(literal 2 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 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 (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) (.f64 im (.f64 im im))))) (/.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(-.f64 #s(literal 0 binary64) (.f64 im (+.f64 (.f64 (.f64 #s(literal -1/2 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 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 (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)))))))))
(* -1 (* im (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(.f64 (-.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 (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) (.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/4 binary64) (sqrt.f64 im)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 re re)) (sqrt.f64 #s(literal -2 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 im) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -2 binary64)) (/.f64 (.f64 re re) (sqrt.f64 #s(literal -2 binary64))))))) (.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 re (.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64))))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))))))
(* 1/2 (* (sqrt (/ 1 im)) re))
(.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im)))))
(.f64 re (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 im) re)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* 1/2 (sqrt (/ 1 im))))))
(.f64 re (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 im) re)) (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (sqrt.f64 im) re) (/.f64 (-.f64 (.f64 im #s(literal 2 binary64)) im) re)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (+ (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3)))) (* 1/2 (sqrt (/ 1 im)))))))
(.f64 re (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 im) re)) (+.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (sqrt.f64 im) re) (/.f64 (-.f64 (.f64 im #s(literal 2 binary64)) im) re))) (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (.f64 im (.f64 im im))) (/.f64 (-.f64 (.f64 im #s(literal 2 binary64)) im) (.f64 re (.f64 re re)))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(* -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 im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im))))))
(.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 im) re)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (- (* 2 im) im) re))) (* 1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))
(.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (sqrt.f64 im)) (/.f64 (-.f64 (.f64 im #s(literal 2 binary64)) im) re)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 im))) re)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (sqrt im) (- (* 2 im) im))) (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re)))) re)) (* 1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))
(.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (/.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 (sqrt.f64 im) (-.f64 (.f64 im #s(literal 2 binary64)) im)) (.f64 (sqrt.f64 (.f64 im (.f64 im im))) (/.f64 (-.f64 (.f64 im #s(literal 2 binary64)) im) re)))) re)) re)) (-.f64 #s(literal 0 binary64) re))
(* (sqrt (/ 1 im)) re)
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re)
(/ (+ (* -1 (sqrt (pow im 3))) (* (sqrt im) re)) im)
(/.f64 (-.f64 (.f64 (sqrt.f64 im) re) (sqrt.f64 (.f64 im (*.f64 im im)))) im)
(/ (+ (* (sqrt im) re) (* (pow im 2) (+ (* -1 (sqrt (/ 1 im))) (* (sqrt im) (/ 1 re))))) im)
(/.f64 (+.f64 (.f64 (sqrt.f64 im) re) (.f64 (*.f64 im im) (-.f64 (/.f64 (sqrt.f64 im) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))) im)
(/ (+ (* (sqrt im) re) (* (pow im 2) (+ (* -1 (sqrt (/ 1 im))) (* im (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 re))) (* (sqrt (/ 1 im)) (/ 1 re))))))) im)
(/.f64 (+.f64 (.f64 (sqrt.f64 im) re) (.f64 (.f64 im im) (-.f64 (.f64 im (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))) im)
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(.f64 im (-.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(.f64 im (-.f64 (+.f64 (.f64 (sqrt.f64 #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 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(.f64 im (-.f64 (+.f64 (+.f64 (.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 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))
(.f64 (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(.f64 (-.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal -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 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 re re)) (sqrt.f64 #s(literal -2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 im) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal -2 binary64)) (/.f64 (.f64 re re) (sqrt.f64 #s(literal -2 binary64))))))) (.f64 im (.f64 im im)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(-.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) 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 (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(+.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (-.f64 (.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64))))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(* (sqrt (/ 1 im)) re)
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re)
(* re (+ (sqrt (/ 1 im)) (* -1 (* (sqrt im) (/ 1 re)))))
(*.f64 re (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) re)))
(* re (+ (sqrt (/ 1 im)) (+ (* -1 (* (sqrt im) (/ 1 re))) (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))))))
(.f64 re (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (sqrt.f64 im) re) (/.f64 (-.f64 (.f64 im #s(literal 2 binary64)) im) re))) (/.f64 (sqrt.f64 im) re))))
(* re (+ (sqrt (/ 1 im)) (+ (* -1 (* (sqrt im) (/ 1 re))) (+ (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3))))))))
(.f64 re (+.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) re)) (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (/.f64 (sqrt.f64 im) re) (/.f64 (-.f64 (.f64 im #s(literal 2 binary64)) im) re)) (.f64 (sqrt.f64 (.f64 im (.f64 im im))) (/.f64 (-.f64 (.f64 im #s(literal 2 binary64)) im) (.f64 re (.f64 re re))))))))
(* -1 (* (sqrt (/ 1 im)) re))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (* (sqrt im) (/ 1 re))))))
(*.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) re)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (sqrt im) (* -1/2 (* (sqrt im) (/ (- (* 2 im) im) re)))) re)))))
(.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (+.f64 (sqrt.f64 im) (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (/.f64 (-.f64 (.f64 im #s(literal 2 binary64)) im) re))) re)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (sqrt im) (* -1 (/ (+ (* 1/2 (* (sqrt im) (- (* 2 im) im))) (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re)))) re))) re)))))
(.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (-.f64 (sqrt.f64 im) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 im) (-.f64 (.f64 im #s(literal 2 binary64)) im)) (.f64 (sqrt.f64 (.f64 im (.f64 im im))) (/.f64 (-.f64 (.f64 im #s(literal 2 binary64)) im) re)))) re)) re)) (-.f64 #s(literal 0 binary64) re))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/.f64 (+.f64 (.f64 re re) (.f64 (*.f64 im #s(literal -2 binary64)) re)) im)
(/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)
(/.f64 (+.f64 (.f64 re re) (.f64 im (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re #s(literal -2 binary64))))) im)
(/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im)
(/.f64 (+.f64 (.f64 re re) (.f64 im (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re #s(literal -2 binary64))))) im)
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (.f64 re #s(literal -2 binary64)) im)))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(.f64 im (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (.f64 re #s(literal -2 binary64)) im)) (/.f64 (.f64 re re) (.f64 im im))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(.f64 im (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (.f64 re #s(literal -2 binary64)) im)) (/.f64 (.f64 re re) (.f64 im im))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* -1 (* im (- (* 2 (/ re im)) 2)))
(.f64 (+.f64 (.f64 #s(literal 2 binary64) (/.f64 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 re #s(literal -2 binary64)) (/.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 re #s(literal -2 binary64)) (/.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 re) (* 2 im))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(.f64 (.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))
(* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re))))
(.f64 (.f64 re re) (+.f64 (/.f64 (.f64 im #s(literal 2 binary64)) (.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 im #s(literal 2 binary64)) (.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 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im)))
(.f64 (.f64 re re) (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 im #s(literal -2 binary64)) re)) re)))
(* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im)))
(.f64 (.f64 re re) (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 im #s(literal -2 binary64)) re)) re)))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (-.f64 #s(literal 0 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (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 #s(literal 0 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (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 #s(literal 0 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))
(* 1/2 (* (* im (* (pow (sqrt -1) 2) (* (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 #s(literal 0 binary64) im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
(* 1/2 (* im (* (sqrt 1/2) (sqrt 2))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
(* 1/2 im)
(*.f64 #s(literal 1/2 binary64) im)
im
(+ im (* -1 re))
(-.f64 im re)
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+.f64 im (.f64 re (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) re) im) #s(literal -1 binary64))))
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(+.f64 im (.f64 re (+.f64 (.f64 re (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 re re)) (.f64 im (.f64 im im))) (/.f64 #s(literal 1/2 binary64) im))) #s(literal -1 binary64))))
(* 1/2 (/ (pow im 2) re))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)
(/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (.f64 re re)) (.f64 #s(literal 1/2 binary64) (.f64 im im))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (.f64 re re)) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) re)
(/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)
(/.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (.f64 re re)) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64))) (pow.f64 re #s(literal 6 binary64)))) re)
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(.f64 (+.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(.f64 (+.f64 #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))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(.f64 (+.f64 #s(literal 2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re)) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))))) (-.f64 #s(literal 0 binary64) re))
(* 1/2 (/ (pow im 2) re))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) re)
(* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))
(.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 im im)) (.f64 re (.f64 re re))) (/.f64 #s(literal 1/2 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (.f64 re (.f64 re re)))))))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (.f64 (.f64 im im) (+.f64 (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 (.f64 #s(literal -5/128 binary64) (.f64 im im)) (pow.f64 re #s(literal 7 binary64))))) (/.f64 #s(literal -1/8 binary64) (.f64 re (.f64 re re)))))))
im
(* im (+ 1 (* -1 (/ re im))))
(*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(.f64 im (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im)) (/.f64 re im))))
(* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))
(.f64 im (-.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))) (/.f64 re im)))
(* -1 im)
(-.f64 #s(literal 0 binary64) im)
(* -1 (* im (+ 1 (/ re im))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 re im)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 re re)) im) re) im)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (.f64 im im)) (.f64 #s(literal 1/2 binary64) (*.f64 re re))) (-.f64 #s(literal 0 binary64) im)) re) im)) (-.f64 #s(literal 0 binary64) im))
im
(+ im (* 1/2 (/ (pow re 2) im)))
(+.f64 im (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) im))
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+.f64 im (.f64 (.f64 re re) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 re re)) (.f64 im (.f64 im im))) (/.f64 #s(literal 1/2 binary64) im))))
(+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))
(+.f64 im (.f64 (.f64 re re) (+.f64 (/.f64 #s(literal 1/2 binary64) im) (.f64 (.f64 re re) (+.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 re re)) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (.f64 im (.f64 im im))))))))
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(.f64 re (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(.f64 re (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re)) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))))))
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re)) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))))) (-.f64 #s(literal 0 binary64) re))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(+.f64 re (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) re))
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+.f64 re (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 im im)) (.f64 re (.f64 re re))) (/.f64 #s(literal 1/2 binary64) re))))
(+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
(+.f64 re (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (.f64 re (.f64 re re))))))))
im
(* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))
(.f64 im (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))
(.f64 im (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(.f64 im (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im)) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64)))))))
(* -1 im)
(-.f64 #s(literal 0 binary64) im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
(.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im)) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64)))))) (-.f64 #s(literal 0 binary64) im))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* re (- (/ re im) 2))
(*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))
(* re (- (/ re im) 2))
(*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))
(* re (- (/ re im) 2))
(*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(.f64 (.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(.f64 (.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(.f64 (.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(.f64 (.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(.f64 (.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(.f64 (.f64 re re) (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -2 binary64) re)))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/.f64 (+.f64 (.f64 re re) (.f64 (*.f64 im #s(literal -2 binary64)) re)) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/.f64 (+.f64 (.f64 re re) (.f64 (*.f64 im #s(literal -2 binary64)) re)) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/.f64 (+.f64 (.f64 re re) (.f64 (*.f64 im #s(literal -2 binary64)) re)) im)
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(+ (* -2 re) (/ (pow re 2) im))
(+.f64 (.f64 re #s(literal -2 binary64)) (/.f64 (.f64 re re) im))
(+ (* -2 re) (/ (pow re 2) im))
(+.f64 (.f64 re #s(literal -2 binary64)) (/.f64 (.f64 re re) im))
(+ (* -2 re) (/ (pow re 2) im))
(+.f64 (.f64 re #s(literal -2 binary64)) (/.f64 (.f64 re re) im))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(+ (* -2 re) (/ (pow re 2) im))
(+.f64 (.f64 re #s(literal -2 binary64)) (/.f64 (.f64 re re) im))
(+ (* -2 re) (/ (pow re 2) im))
(+.f64 (.f64 re #s(literal -2 binary64)) (/.f64 (.f64 re re) im))
(+ (* -2 re) (/ (pow re 2) im))
(+.f64 (.f64 re #s(literal -2 binary64)) (/.f64 (.f64 re re) im))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1 binary64))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1 binary64))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1 binary64))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1 binary64))

eval131.0ms (1.4%)

Compiler: Compiled 22167 to 3388 computations (84.7% saved)

prune149.0ms (1.6%)

Pruning

22 alts after pruning (17 fresh and 5 done)

	Pruned	Kept	Total
New	856	6	862
Fresh	1	11	12
Picked	2	3	5
Done	0	2	2
Total	859	22	881

Accuracy

99.9%

Counts

881 → 22

Alt Table

Click to see full alt table

Status	Accuracy	Program
	24.1%	(/.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re))
	23.4%	(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
	24.1%	(.f64 (pow.f64 re #s(literal -1/2 binary64)) (.f64 #s(literal 1/2 binary64) im))
	24.0%	(.f64 (.f64 #s(literal 1/2 binary64) (.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) re))))
	54.8%	(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64)))
	74.6%	(.f64 (.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 (log.f64 (-.f64 (hypot.f64 re im) re)) #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
▶	24.1%	(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
▶	78.9%	(.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/16 binary64)) #s(literal 8 binary64)))
▶	24.2%	(.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #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 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)))) #s(literal 2 binary64)))
▶	52.3%	(.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))))
▶	16.8%	(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 im (/.f64 re im))))
	26.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))
	47.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (/.f64 (-.f64 (.f64 (/.f64 (.f64 re re) im) (/.f64 (.f64 re re) im)) (.f64 (.f64 re #s(literal -2 binary64)) (.f64 re #s(literal -2 binary64)))) (-.f64 (/.f64 (.f64 re re) im) (.f64 re #s(literal -2 binary64)))))))
✓	52.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
	12.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 re (*.f64 im im))) (/.f64 #s(literal -1 binary64) re)))))
✓	28.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re #s(literal -4 binary64))))
	54.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))))
✓	52.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))))
✓	80.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
✓	55.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 im re))))
	74.1%	(.f64 #s(literal 1/2 binary64) (exp.f64 (+.f64 (.f64 (log.f64 (-.f64 (hypot.f64 re im) re)) #s(literal 1/2 binary64)) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))

Compiler

Compiled 578 to 413 computations (28.5% saved)

simplify161.0ms (1.7%)

Algorithm

1×	egg-herbie

Localize:

Found 19 expressions of interest:

New	Metric	Score	Program
✓	cost-diff	256	(.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
✓	cost-diff	256	(pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/4 binary64))
✓	cost-diff	6784	(pow.f64 (pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
✓	cost-diff	6784	(.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
✓	cost-diff	0	(/.f64 #s(literal 1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))
✓	cost-diff	0	(sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
✓	cost-diff	0	(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))))))
✓	cost-diff	128	(.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))))
✓	cost-diff	0	(/.f64 re im)
✓	cost-diff	0	(/.f64 im (/.f64 re im))
✓	cost-diff	0	(sqrt.f64 (/.f64 im (/.f64 re im)))
✓	cost-diff	0	(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 im (/.f64 re im))))
✓	cost-diff	0	(sqrt.f64 re)
✓	cost-diff	0	(/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))
✓	cost-diff	0	(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
✓	cost-diff	0	(*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))
✓	cost-diff	0	(pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/16 binary64))
✓	cost-diff	0	(pow.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/16 binary64)) #s(literal 8 binary64))
✓	cost-diff	0	(.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/16 binary64)) #s(literal 8 binary64)))

Rules

2060×	`fnmadd-define`
1688×	`sum3-define`
1686×	`fma-lowering-fma.f32`
1686×	`fma-lowering-fma.f64`
1606×	`fma-define`

Iterations

Useful iterations: 6 (0.0ms)

Iter	Nodes	Cost
0	42	268
1	84	259
2	156	257
3	306	257
4	792	253
5	1734	249
6	3591	245
7	5942	245
0	8684	245

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

Inputs
(* 1/2 (pow (pow (* (- (sqrt (+ (* re re) (* im im))) re) 2) 1/16) 8))
1/2
(pow (pow (* (- (sqrt (+ (* re re) (* im im))) re) 2) 1/16) 8)
(pow (* (- (sqrt (+ (* re re) (* im im))) re) 2) 1/16)
(* (- (sqrt (+ (* re re) (* im im))) re) 2)
(- (sqrt (+ (* re re) (* im im))) re)
(sqrt (+ (* re re) (* im im)))
re
im
2
1/16
8
(* im (/ 1/2 (sqrt re)))
im
(/ 1/2 (sqrt re))
1/2
(sqrt re)
re
(* 1/2 (sqrt (/ im (/ re im))))
1/2
(sqrt (/ im (/ re im)))
(/ im (/ re im))
im
(/ re im)
re
(* 1/2 (/ 1 (sqrt (/ 1 (+ (* im 2) (* re (+ -2 (/ re im))))))))
1/2
(/ 1 (sqrt (/ 1 (+ (* im 2) (* re (+ -2 (/ re im)))))))
1
(sqrt (/ 1 (+ (* im 2) (* re (+ -2 (/ re im))))))
(/ 1 (+ (* im 2) (* re (+ -2 (/ re im)))))
(+ (* im 2) (* re (+ -2 (/ re im))))
(* im 2)
im
2
(* re (+ -2 (/ re im)))
re
(+ -2 (/ re im))
-2
(/ re im)
(* 1/2 (pow (pow (* (+ 4 (/ (* im im) (* re re))) (- 0 re)) 1/4) 2))
1/2
(pow (pow (* (+ 4 (/ (* im im) (* re re))) (- 0 re)) 1/4) 2)
(pow (* (+ 4 (/ (* im im) (* re re))) (- 0 re)) 1/4)
(* (+ 4 (/ (* im im) (* re re))) (- 0 re))
(+ 4 (/ (* im im) (* re re)))
4
(/ (* im im) (* re re))
(* im im)
im
(* re re)
re
(- 0 re)
0
1/4
2

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

localize178.0ms (1.9%)

Localize:

Found 19 expressions of interest:

New	Metric	Score	Program
✓	accuracy	100.0%	(.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
✓	accuracy	100.0%	(*.f64 re re)
✓	accuracy	100.0%	(*.f64 im im)
✓	accuracy	100.0%	(.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
✓	accuracy	100.0%	(*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)))
✓	accuracy	100.0%	(*.f64 im #s(literal 2 binary64))
✓	accuracy	100.0%	(.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))))
✓	accuracy	100.0%	(sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
✓	accuracy	100.0%	(/.f64 re im)
✓	accuracy	100.0%	(/.f64 im (/.f64 re im))
✓	accuracy	100.0%	(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 im (/.f64 re im))))
✓	accuracy	100.0%	(sqrt.f64 (/.f64 im (/.f64 re im)))
✓	accuracy	100.0%	(/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))
✓	accuracy	100.0%	(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
✓	accuracy	100.0%	(sqrt.f64 re)
✓	accuracy	100.0%	(hypot.f64 re im)
✓	accuracy	100.0%	(-.f64 (hypot.f64 re im) re)
✓	accuracy	100.0%	(*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))
✓	accuracy	100.0%	(.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/16 binary64)) #s(literal 8 binary64)))

Results

127.0ms

256×

invalid

Compiler

Compiled 289 to 42 computations (85.5% saved)

Precisions

Click to see histograms. Total time spent on operations: 78.0ms

ival-mult: 22.0ms (28.2% of total)

ival-pow: 20.0ms (25.6% of total)

ival-div: 11.0ms (14.1% of total)

compiled-spec: 9.0ms (11.5% of total)

ival-sqrt: 7.0ms (9% of total)

ival-add: 5.0ms (6.4% of total)

ival-sub: 2.0ms (2.6% of total)

const: 1.0ms (1.3% of total)

backward-pass: 0.0ms (0% of total)

series56.0ms (0.6%)

Counts

25 → 540

Calls

Call 1

Inputs
#<alt (* 1/2 (pow (pow (* (- (sqrt (+ (* re re) (* im im))) re) 2) 1/16) 8))>
#<alt (pow (pow (* (- (sqrt (+ (* re re) (* im im))) re) 2) 1/16) 8)>
#<alt (pow (* (- (sqrt (+ (* re re) (* im im))) re) 2) 1/16)>
#<alt (* (- (sqrt (+ (* re re) (* im im))) re) 2)>
#<alt (* im (/ 1/2 (sqrt re)))>
#<alt (/ 1/2 (sqrt re))>
#<alt (sqrt re)>
#<alt (* 1/2 (sqrt (/ im (/ re im))))>
#<alt (sqrt (/ im (/ re im)))>
#<alt (/ im (/ re im))>
#<alt (/ re im)>
#<alt (* 1/2 (/ 1 (sqrt (/ 1 (+ (* im 2) (* re (+ -2 (/ re im))))))))>
#<alt (/ 1 (sqrt (/ 1 (+ (* im 2) (* re (+ -2 (/ re im)))))))>
#<alt (sqrt (/ 1 (+ (* im 2) (* re (+ -2 (/ re im))))))>
#<alt (/ 1 (+ (* im 2) (* re (+ -2 (/ re im)))))>
#<alt (* 1/2 (pow (pow (* (+ 4 (/ (* im im) (* re re))) (- 0 re)) 1/4) 2))>
#<alt (pow (pow (* (+ 4 (/ (* im im) (* re re))) (- 0 re)) 1/4) 2)>
#<alt (pow (* (+ 4 (/ (* im im) (* re re))) (- 0 re)) 1/4)>
#<alt (* (+ 4 (/ (* im im) (* re re))) (- 0 re))>
#<alt (- (sqrt (+ (* re re) (* im im))) re)>
#<alt (sqrt (+ (* re re) (* im im)))>
#<alt (* im 2)>
#<alt (* re (+ -2 (/ re im)))>
#<alt (* im im)>
#<alt (* re re)>

Outputs
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))>
#<alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))>
#<alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))>
#<alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))>
#<alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))>
#<alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))>
#<alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))>
#<alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))>
#<alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))>
#<alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (* im (sqrt (/ 1 re))))>
#<alt (+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re)))))>
#<alt (+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* -1/128 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re))))))>
#<alt (* -2 (* (sqrt re) (sqrt -1)))>
#<alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (+ (sqrt (/ 1 re)) (* -1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))>
#<alt (* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* 7/128 (* (pow im 2) (sqrt (/ 1 (pow re 9)))))))))>
#<alt (* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* (pow im 2) (+ (* -33/1024 (* (pow im 2) (sqrt (/ 1 (pow re 13))))) (* 7/128 (sqrt (/ 1 (pow re 9))))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt 2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (pow (* 2 im) 1/16)>
#<alt (+ (* -1/16 (* (pow (/ 2 (pow im 15)) 1/16) re)) (pow (* 2 im) 1/16))>
#<alt (+ (* re (+ (* -1/16 (pow (/ 2 (pow im 15)) 1/16)) (* 1/512 (* (pow (/ 2 (pow im 31)) 1/16) re)))) (pow (* 2 im) 1/16))>
#<alt (+ (* re (+ (* -1/16 (pow (/ 2 (pow im 15)) 1/16)) (* re (+ (* 1/512 (pow (/ 2 (pow im 31)) 1/16)) (* 85/8192 (* (pow (/ 2 (pow im 47)) 1/16) re)))))) (pow (* 2 im) 1/16))>
#<alt (exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2)))))>
#<alt (+ (exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2))))) (* -1/64 (/ (* (pow im 2) (exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))))>
#<alt (+ (exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/64 (/ (* (pow im 2) (exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/8192 (pow im 4)) (* 1/384 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))>
#<alt (+ (exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/64 (/ (* (pow im 2) (exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/24576 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/1572864 (pow im 6)) (* 1/11520 (+ (* -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/16 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/8192 (pow im 4)) (* 1/384 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))>
#<alt (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re))))))>
#<alt (+ (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re)))))) (* 1/64 (/ (* (pow im 2) (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))))>
#<alt (+ (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/64 (/ (* (pow im 2) (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (/ (* (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/8192 (pow im 4)) (* 1/384 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))>
#<alt (+ (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/64 (/ (* (pow im 2) (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/1572864 (pow im 6)) (+ (* 1/24576 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))))) (* 1/11520 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/8192 (pow im 4)) (* 1/384 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))>
#<alt (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im)))))>
#<alt (+ (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im))))) (* -1/64 (/ (* (pow im 2) (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 2))))>
#<alt (+ (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/64 (/ (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* 49/8192 (/ (* (pow im 2) (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 4))))))>
#<alt (+ (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/64 (/ (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* (pow im 2) (+ (* -1755/524288 (/ (* (pow im 2) (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 6))) (* 49/8192 (/ (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 4))))))))>
#<alt (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im))))))>
#<alt (+ (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im)))))) (* -1/16 (/ (* re (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))>
#<alt (+ (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/16 (/ (* re (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/512 (pow re 2)) (* 1/32 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))>
#<alt (+ (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/16 (/ (* re (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/512 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/24576 (pow re 3)) (* 1/96 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) (pow im 3)) (/ (* (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/512 (pow re 2)) (* 1/32 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))>
#<alt (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im))))))>
#<alt (+ (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im)))))) (* 1/16 (/ (* re (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))>
#<alt (+ (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/512 (pow re 2)) (* 1/32 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* -1/16 (* re (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))>
#<alt (+ (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* -1/512 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/24576 (pow re 3)) (* 1/96 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) im)) (* (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/512 (pow re 2)) (* 1/32 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* -1/16 (* re (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))>
#<alt (* 2 im)>
#<alt (+ (* -2 re) (* 2 im))>
#<alt (+ (* 2 im) (* re (- (/ re im) 2)))>
#<alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))>
#<alt (/ (pow im 2) re)>
#<alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)>
#<alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)>
#<alt (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)>
#<alt (* -4 re)>
#<alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))>
#<alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))>
#<alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))>
#<alt (/ (pow im 2) re)>
#<alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))>
#<alt (* 2 im)>
#<alt (* im (+ 2 (* -2 (/ re im))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))>
#<alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))>
#<alt (* -2 im)>
#<alt (* -1 (* im (+ 2 (* 2 (/ re im)))))>
#<alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))>
#<alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (sqrt (/ 1 re)))>
#<alt (* 1/2 (sqrt (/ 1 re)))>
#<alt (* 1/2 (sqrt (/ 1 re)))>
#<alt (* 1/2 (sqrt (/ 1 re)))>
#<alt (* 1/2 (sqrt (/ 1 re)))>
#<alt (* 1/2 (sqrt (/ 1 re)))>
#<alt (* 1/2 (sqrt (/ 1 re)))>
#<alt (* 1/2 (sqrt (/ 1 re)))>
#<alt (* 1/2 (sqrt (/ 1 re)))>
#<alt (* 1/2 (sqrt (/ 1 re)))>
#<alt (* 1/2 (sqrt (/ 1 re)))>
#<alt (* 1/2 (sqrt (/ 1 re)))>
#<alt (sqrt re)>
#<alt (sqrt re)>
#<alt (sqrt re)>
#<alt (sqrt re)>
#<alt (sqrt re)>
#<alt (sqrt re)>
#<alt (sqrt re)>
#<alt (sqrt re)>
#<alt (* -1 (* (sqrt re) (pow (sqrt -1) 2)))>
#<alt (* -1 (* (sqrt re) (pow (sqrt -1) 2)))>
#<alt (* -1 (* (sqrt re) (pow (sqrt -1) 2)))>
#<alt (* -1 (* (sqrt re) (pow (sqrt -1) 2)))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* -1/2 (* im (sqrt (/ 1 re))))>
#<alt (* -1/2 (* im (sqrt (/ 1 re))))>
#<alt (* -1/2 (* im (sqrt (/ 1 re))))>
#<alt (* -1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* im (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* -1 (* im (sqrt (/ 1 re))))>
#<alt (* -1 (* im (sqrt (/ 1 re))))>
#<alt (* -1 (* im (sqrt (/ 1 re))))>
#<alt (* -1 (* im (sqrt (/ 1 re))))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* im (sqrt (/ 1 re)))>
#<alt (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))>
#<alt (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))>
#<alt (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))>
#<alt (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ (pow im 2) re)>
#<alt (/ re im)>
#<alt (/ re im)>
#<alt (/ re im)>
#<alt (/ re im)>
#<alt (/ re im)>
#<alt (/ re im)>
#<alt (/ re im)>
#<alt (/ re im)>
#<alt (/ re im)>
#<alt (/ re im)>
#<alt (/ re im)>
#<alt (/ re im)>
#<alt (/ re im)>
#<alt (/ re im)>
#<alt (/ re im)>
#<alt (/ re im)>
#<alt (/ re im)>
#<alt (/ re im)>
#<alt (/ re im)>
#<alt (/ re im)>
#<alt (/ re im)>
#<alt (/ re im)>
#<alt (/ re im)>
#<alt (/ 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 (pow im 3))) (/ re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))>
#<alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))>
#<alt (* -1 (* im (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (+ (* -1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))))>
#<alt (* 1/2 (* (sqrt (/ 1 im)) re))>
#<alt (* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im)))))>
#<alt (* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* 1/2 (sqrt (/ 1 im))))))>
#<alt (* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (+ (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3)))) (* 1/2 (sqrt (/ 1 im)))))))>
#<alt (* -1/2 (* (sqrt (/ 1 im)) re))>
#<alt (* -1 (* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (- (* 2 im) im) re))) (* 1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (sqrt im) (- (* 2 im) im))) (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re)))) re)) (* 1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))>
#<alt (* (sqrt (/ 1 im)) re)>
#<alt (/ (+ (* -1 (sqrt (pow im 3))) (* (sqrt im) re)) im)>
#<alt (/ (+ (* (sqrt im) re) (* (pow im 2) (+ (* -1 (sqrt (/ 1 im))) (* (sqrt im) (/ 1 re))))) im)>
#<alt (/ (+ (* (sqrt im) re) (* (pow im 2) (+ (* -1 (sqrt (/ 1 im))) (* im (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 re))) (* (sqrt (/ 1 im)) (/ 1 re))))))) im)>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))>
#<alt (* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))>
#<alt (* (sqrt (/ 1 im)) re)>
#<alt (* re (+ (sqrt (/ 1 im)) (* -1 (* (sqrt im) (/ 1 re)))))>
#<alt (* re (+ (sqrt (/ 1 im)) (+ (* -1 (* (sqrt im) (/ 1 re))) (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))))))>
#<alt (* re (+ (sqrt (/ 1 im)) (+ (* -1 (* (sqrt im) (/ 1 re))) (+ (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3))))))))>
#<alt (* -1 (* (sqrt (/ 1 im)) re))>
#<alt (* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (* (sqrt im) (/ 1 re))))))>
#<alt (* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (sqrt im) (* -1/2 (* (sqrt im) (/ (- (* 2 im) im) re)))) re)))))>
#<alt (* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (sqrt im) (* -1 (/ (+ (* 1/2 (* (sqrt im) (- (* 2 im) im))) (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re)))) re))) re)))))>
#<alt (* (sqrt im) (/ 1 re))>
#<alt (+ (* (sqrt im) (/ 1 re)) (* (sqrt (pow im 3)) (/ 1 (pow re 2))))>
#<alt (+ (* (sqrt im) (/ 1 re)) (* (pow im 2) (+ (* (sqrt im) (/ 1 (pow re 3))) (* (sqrt (/ 1 im)) (/ 1 (pow re 2))))))>
#<alt (+ (* (sqrt im) (/ 1 re)) (* (pow im 2) (+ (* im (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (pow re 3)))) (* (sqrt (/ 1 im)) (/ 1 (pow re 3))))) (* (sqrt (/ 1 im)) (/ 1 (pow re 2))))))>
#<alt (* (sqrt (/ 1 im)) (sqrt 1/2))>
#<alt (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 1/2)))) (* (sqrt (/ 1 im)) (sqrt 1/2)))>
#<alt (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (+ (* -1/2 (pow re 2)) (* 1/4 (pow re 2))) (sqrt 1/2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 1/2)))) (* (sqrt (/ 1 im)) (sqrt 1/2))))>
#<alt (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (+ (* -1/2 (pow re 2)) (* 1/4 (pow re 2))) (sqrt 1/2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 7))) (/ (+ (* 1/16 (/ (* im (pow re 2)) (pow (sqrt 1/2) 2))) (+ (* 1/4 (pow re 3)) (* re (+ (* -1/2 (pow re 2)) (* 1/4 (pow re 2)))))) (sqrt 1/2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 1/2)))) (* (sqrt (/ 1 im)) (sqrt 1/2)))))>
#<alt (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt -1/2)))>
#<alt (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -1/2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt -1/2))))>
#<alt (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -1/2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (sqrt -1) (+ (* -1/4 (pow re 2)) (* 1/2 (pow re 2)))) (sqrt -1/2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt -1/2)))))>
#<alt (+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (/ (* (sqrt -1) (+ (* -1/4 (pow re 2)) (* 1/2 (pow re 2)))) (sqrt -1/2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* (sqrt -1) (+ (* -1 (* re (+ (* -1/4 (pow re 2)) (* 1/2 (pow re 2))))) (+ (* -1/16 (/ (* im (pow re 2)) (pow (sqrt -1/2) 2))) (* 1/4 (pow re 3))))) (sqrt -1/2))))) (pow im 3))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -1/2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt -1/2)))))>
#<alt (* (sqrt (/ 1 im)) (sqrt 1/2))>
#<alt (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 1/2)))) (* (sqrt (/ 1 im)) (sqrt 1/2)))>
#<alt (+ (* re (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ 1 (sqrt 1/2)))) (* 1/2 (* (sqrt im) (/ (* re (- (* 1/4 (/ 1 (pow im 3))) (* 1/16 (/ 1 (* (pow im 3) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))) (* (sqrt (/ 1 im)) (sqrt 1/2)))>
#<alt (+ (* re (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ 1 (sqrt 1/2)))) (* re (+ (* -1/8 (* (sqrt (/ 1 im)) (/ (* re (- (* 1/4 (/ 1 (pow im 3))) (* 1/16 (/ 1 (* (pow im 3) (pow (sqrt 1/2) 2)))))) (pow (sqrt 1/2) 3)))) (* 1/2 (* (sqrt im) (/ (- (* 1/4 (/ 1 (pow im 3))) (* 1/16 (/ 1 (* (pow im 3) (pow (sqrt 1/2) 2))))) (sqrt 1/2)))))))) (* (sqrt (/ 1 im)) (sqrt 1/2)))>
#<alt (* (sqrt im) (/ 1 re))>
#<alt (/ (+ (sqrt im) (* (sqrt (pow im 3)) (/ 1 re))) re)>
#<alt (/ (+ (sqrt im) (+ (* -1/2 (* (sqrt (/ 1 im)) (/ (+ (* -4 (pow im 3)) (+ (* 2 (pow im 3)) (pow im 3))) (pow re 2)))) (* (sqrt (pow im 3)) (/ 1 re)))) re)>
#<alt (/ (+ (sqrt im) (+ (* -1/2 (* (sqrt (/ 1 im)) (/ (+ (* -4 (pow im 3)) (+ (* 2 (pow im 3)) (pow im 3))) (pow re 2)))) (+ (* -1/2 (* (sqrt (/ 1 im)) (/ (+ (* -1 (* im (+ (* -4 (pow im 3)) (+ (* 2 (pow im 3)) (pow im 3))))) (+ (* 2 (* im (+ (* -4 (pow im 3)) (* 2 (pow im 3))))) (* 4 (pow im 4)))) (pow re 3)))) (* (sqrt (pow im 3)) (/ 1 re))))) re)>
#<alt (* -1 (* (sqrt im) (/ 1 re)))>
#<alt (* -1 (/ (+ (sqrt im) (* (sqrt (pow im 3)) (/ 1 re))) re))>
#<alt (* -1 (/ (+ (sqrt im) (* -1 (/ (+ (* -1 (sqrt (pow im 3))) (* 1/2 (* (sqrt (/ 1 im)) (/ (+ (* -4 (pow im 3)) (+ (* 2 (pow im 3)) (pow im 3))) re)))) re))) re))>
#<alt (* -1 (/ (+ (sqrt im) (* -1 (/ (+ (* -1 (sqrt (pow im 3))) (* -1 (/ (+ (* -1/2 (* (sqrt (/ 1 im)) (+ (* -4 (pow im 3)) (+ (* 2 (pow im 3)) (pow im 3))))) (* 1/2 (* (sqrt (/ 1 im)) (/ (+ (* -4 (pow im 4)) (+ (* -2 (* im (+ (* -4 (pow im 3)) (* 2 (pow im 3))))) (* im (+ (* -4 (pow im 3)) (+ (* 2 (pow im 3)) (pow im 3)))))) re)))) re))) re))) re))>
#<alt (/ im (pow re 2))>
#<alt (* im (+ (* 2 (/ im (pow re 3))) (/ 1 (pow re 2))))>
#<alt (* im (+ (* im (+ (* 2 (/ im (pow re 4))) (* 2 (/ 1 (pow re 3))))) (/ 1 (pow re 2))))>
#<alt (* im (+ (* im (+ (* im (+ (* -4 (/ (pow im 2) (pow re 6))) (* 2 (/ 1 (pow re 4))))) (* 2 (/ 1 (pow re 3))))) (/ 1 (pow re 2))))>
#<alt (/ 1/2 im)>
#<alt (/ (+ 1/2 (* 1/2 (/ re im))) im)>
#<alt (/ (- (+ 1/2 (* -1 (/ (+ (* -1/2 (pow re 2)) (* 1/4 (pow re 2))) (pow im 2)))) (* -1/2 (/ re im))) im)>
#<alt (/ (- (+ 1/2 (* -1 (/ (+ (* 1/4 (pow re 3)) (* re (+ (* -1/2 (pow re 2)) (* 1/4 (pow re 2))))) (pow im 3)))) (+ (* -1/2 (/ re im)) (+ (* -1/2 (/ (pow re 2) (pow im 2))) (* 1/4 (/ (pow re 2) (pow im 2)))))) im)>
#<alt (/ 1/2 im)>
#<alt (* -1 (/ (- (* -1/2 (/ re im)) 1/2) im))>
#<alt (* -1 (/ (- (* -1 (/ (- (+ (* -1/4 (/ (pow re 2) im)) (* 1/2 (/ (pow re 2) im))) (* -1/2 re)) im)) 1/2) im))>
#<alt (* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* re (+ (* -1/4 (pow re 2)) (* 1/2 (pow re 2)))) im)) (* 1/4 (/ (pow re 3) im))) (+ (* -1/4 (pow re 2)) (* 1/2 (pow re 2)))) im)) (* -1/2 re)) im)) 1/2) im))>
#<alt (/ 1/2 im)>
#<alt (+ (* 1/2 (/ re (pow im 2))) (* 1/2 (/ 1 im)))>
#<alt (+ (* re (+ (* 1/4 (/ re (pow im 3))) (* 1/2 (/ 1 (pow im 2))))) (* 1/2 (/ 1 im)))>
#<alt (+ (* re (+ (* re (+ (* -1/8 (/ (pow re 2) (pow im 5))) (* 1/4 (/ 1 (pow im 3))))) (* 1/2 (/ 1 (pow im 2))))) (* 1/2 (/ 1 im)))>
#<alt (/ im (pow re 2))>
#<alt (/ (+ im (* 2 (/ (pow im 2) re))) (pow re 2))>
#<alt (/ (- (+ im (* -1 (/ (+ (* -4 (pow im 3)) (* 2 (pow im 3))) (pow re 2)))) (* -2 (/ (pow im 2) re))) (pow re 2))>
#<alt (/ (- (+ im (* -1 (/ (+ (* 2 (* im (+ (* -4 (pow im 3)) (* 2 (pow im 3))))) (* 4 (pow im 4))) (pow re 3)))) (+ (* -4 (/ (pow im 3) (pow re 2))) (+ (* -2 (/ (pow im 2) re)) (* 2 (/ (pow im 3) (pow re 2)))))) (pow re 2))>
#<alt (/ im (pow re 2))>
#<alt (/ (+ im (* 2 (/ (pow im 2) re))) (pow re 2))>
#<alt (/ (+ im (* -1 (/ (- (+ (* -4 (/ (pow im 3) re)) (* 2 (/ (pow im 3) re))) (* 2 (pow im 2))) re))) (pow re 2))>
#<alt (/ (+ im (* -1 (/ (- (* -1 (/ (- (+ (* -4 (/ (pow im 4) re)) (* -2 (/ (* im (+ (* -4 (pow im 3)) (* 2 (pow im 3)))) re))) (+ (* -4 (pow im 3)) (* 2 (pow im 3)))) re)) (* 2 (pow im 2))) re))) (pow re 2))>
#<alt (* (sqrt re) (sqrt -1))>
#<alt (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt -1)))>
#<alt (+ (* (sqrt re) (sqrt -1)) (* (pow im 2) (+ (* -1/128 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 7))))) (* 1/8 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))))))>
#<alt (+ (* (sqrt re) (sqrt -1)) (* (pow im 2) (+ (* 1/8 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))) (* (pow im 2) (+ (* -1/128 (* (sqrt (/ 1 (pow re 7))) (sqrt -1))) (* 1/1024 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 11))))))))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))>
#<alt (* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))>
#<alt (* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (+ (* 2 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))))>
#<alt (* -1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))>
#<alt (* -1 (* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))))>
#<alt (* -1 (* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (+ (* 2 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (/ (sqrt -1) im) (sqrt (pow re 5)))) re)>
#<alt (/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (pow re 3) (+ (* -1 (* (/ (sqrt -1) (pow im 3)) (sqrt (pow re 3)))) (* (/ (sqrt -1) im) (sqrt (/ 1 re)))))) re)>
#<alt (/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (pow re 3) (+ (* (/ (sqrt -1) im) (sqrt (/ 1 re))) (* (pow re 3) (+ (* -1 (* (/ (sqrt -1) (pow im 3)) (sqrt (/ 1 (pow re 3))))) (* 2 (* (/ (sqrt -1) (pow im 5)) (sqrt re)))))))) re)>
#<alt (* (sqrt re) (sqrt -1))>
#<alt (* re (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1))))>
#<alt (* re (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* re (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/1024 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 (pow re 13))))) (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* (sqrt re) (sqrt -1)))>
#<alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* 1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (pow re 3)))) (* -1/1024 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 re))))) (pow re 3))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (+ (* -1/2 (* (/ (pow im 2) (sqrt -4)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt -4)))>
#<alt (+ (* (sqrt re) (sqrt -4)) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt -4)))) (* -1/8 (* (/ (pow im 2) (pow (sqrt -4) 3)) (sqrt (/ 1 (pow re 7))))))))>
#<alt (+ (* (sqrt re) (sqrt -4)) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt -4)))) (* (pow im 2) (+ (* -1/8 (* (sqrt (/ 1 (pow re 7))) (/ 1 (pow (sqrt -4) 3)))) (* -1/16 (* (/ (pow im 2) (pow (sqrt -4) 5)) (sqrt (/ 1 (pow re 11))))))))))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* im (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1))))>
#<alt (* im (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -2 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* im (+ (* -4 (* (/ 1 (* (pow im 6) (pow (sqrt -1) 5))) (sqrt (pow re 11)))) (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -2 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* -1 (* im (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1)))))>
#<alt (* -1 (* im (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -2 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* im (+ (* -4 (* (/ 1 (* (pow im 6) (pow (sqrt -1) 5))) (sqrt (pow re 11)))) (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -2 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* (sqrt (/ 1 re)) (sqrt -1)))))))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (/ (+ (* -2 (* (/ 1 (* im (sqrt -1))) (sqrt (pow re 5)))) (* (* im (sqrt -1)) (sqrt re))) re)>
#<alt (/ (+ (* (* im (sqrt -1)) (sqrt re)) (* (pow re 3) (+ (* -2 (* (/ 1 (* im (sqrt -1))) (sqrt (/ 1 re)))) (* -2 (* (/ 1 (* (pow im 3) (pow (sqrt -1) 3))) (sqrt (pow re 3))))))) re)>
#<alt (/ (+ (* (* im (sqrt -1)) (sqrt re)) (* (pow re 3) (+ (* -2 (* (/ 1 (* im (sqrt -1))) (sqrt (/ 1 re)))) (* (pow re 3) (+ (* -4 (* (/ 1 (* (pow im 5) (pow (sqrt -1) 5))) (sqrt re))) (* -2 (* (/ 1 (* (pow im 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (pow re 3)))))))))) re)>
#<alt (* (sqrt re) (sqrt -4))>
#<alt (* re (+ (* -1/2 (* (/ (pow im 2) (sqrt -4)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -4))))>
#<alt (* re (+ (* -1/2 (* (/ (pow im 2) (sqrt -4)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/8 (* (/ (pow im 4) (pow (sqrt -4) 3)) (sqrt (/ 1 (pow re 9))))) (* (sqrt (/ 1 re)) (sqrt -4)))))>
#<alt (* re (+ (* -1/2 (* (/ (pow im 2) (sqrt -4)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/8 (* (/ (pow im 4) (pow (sqrt -4) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* -1/16 (* (/ (pow im 6) (pow (sqrt -4) 5)) (sqrt (/ 1 (pow re 13))))) (* (sqrt (/ 1 re)) (sqrt -4))))))>
#<alt (* -2 (* (sqrt re) (sqrt -1)))>
#<alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (pow re 3)))) (* -1/512 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 re))))) (pow re 3))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))>
#<alt (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) (+ (* -3/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) (+ (* -3/512 (pow (/ -4 (pow re 15)) 1/4)) (* 7/8192 (* (pow (/ -4 (pow re 23)) 1/4) (pow im 2))))))) (pow (* -4 re) 1/4))>
#<alt (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im))))))>
#<alt (+ (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))) (/ (* (pow re 2) (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im))))))) (pow im 2)))>
#<alt (+ (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))) (+ (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))) (+ (* -2 (pow re 4)) (* 1/2 (pow re 4)))) (pow im 4)) (/ (* (pow re 2) (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im))))))) (pow im 2))))>
#<alt (+ (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))) (+ (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))) (+ (* -2 (pow re 4)) (* 1/2 (pow re 4)))) (pow im 4)) (+ (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))) (+ (* -2 (pow re 6)) (+ (* 1/6 (pow re 6)) (* 16/3 (pow re 6))))) (pow im 6)) (/ (* (pow re 2) (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im))))))) (pow im 2)))))>
#<alt (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im))))))>
#<alt (+ (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))) (/ (* (pow re 2) (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im))))))) (pow im 2)))>
#<alt (+ (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))) (+ (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))) (+ (* -2 (pow re 4)) (* 1/2 (pow re 4)))) (pow im 4)) (/ (* (pow re 2) (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im))))))) (pow im 2))))>
#<alt (+ (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))) (+ (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))) (+ (* -2 (pow re 4)) (* 1/2 (pow re 4)))) (pow im 4)) (+ (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))) (+ (* -2 (pow re 6)) (+ (* 1/6 (pow re 6)) (* 16/3 (pow re 6))))) (pow im 6)) (/ (* (pow re 2) (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im))))))) (pow im 2)))))>
#<alt (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re)))))>
#<alt (+ (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re))))) (/ (* (pow re 2) (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re)))))) (pow im 2)))>
#<alt (+ (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re))))) (* (pow re 2) (+ (* -3/2 (/ (* (pow re 2) (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re)))))) (pow im 4))) (/ (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re))))) (pow im 2)))))>
#<alt (+ (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re))))) (* (pow re 2) (+ (* (pow re 2) (+ (* -3/2 (/ (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re))))) (pow im 4))) (* 7/2 (/ (* (pow re 2) (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re)))))) (pow im 6))))) (/ (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re))))) (pow im 2)))))>
#<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/128 (pow im 4)) (* 1/512 (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/128 (pow im 4)) (* 1/512 (pow im 4)))) (pow re 4)) (/ (* (exp (* 1/4 (+ (log -4) (* -1 (log (/ 1 re)))))) (+ (* -1/2048 (pow im 6)) (+ (* 1/24576 (pow im 6)) (* 1/768 (pow im 6))))) (pow re 6)))))>
#<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/128 (pow im 4)) (* 1/512 (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/128 (pow im 4)) (* 1/512 (pow im 4)))) (pow re 4)) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* -1/2048 (pow im 6)) (+ (* 1/24576 (pow im 6)) (* 1/768 (pow im 6))))) (pow re 6)))))>
#<alt (* -4 re)>
#<alt (+ (* -4 re) (* -1 (/ (pow im 2) re)))>
#<alt (+ (* -4 re) (* -1 (/ (pow im 2) re)))>
#<alt (+ (* -4 re) (* -1 (/ (pow im 2) re)))>
#<alt (* -1 (/ (pow im 2) re))>
#<alt (* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))>
#<alt (* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))>
#<alt (* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))>
#<alt (* -1 (/ (pow im 2) re))>
#<alt (* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))>
#<alt (* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))>
#<alt (* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))>
#<alt (* -1 (/ (pow im 2) re))>
#<alt (/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)>
#<alt (/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)>
#<alt (/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)>
#<alt (* -4 re)>
#<alt (* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))>
#<alt (* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))>
#<alt (* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))>
#<alt (* -4 re)>
#<alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))>
#<alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))>
#<alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))>
#<alt im>
#<alt (+ im (* -1 re))>
#<alt (+ im (* re (- (* 1/2 (/ re im)) 1)))>
#<alt (+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))>
#<alt (* 1/2 (/ (pow im 2) re))>
#<alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)>
#<alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)>
#<alt (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)>
#<alt (* -2 re)>
#<alt (* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))>
#<alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))>
#<alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))>
#<alt (* 1/2 (/ (pow im 2) re))>
#<alt (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))>
#<alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))>
#<alt im>
#<alt (* im (+ 1 (* -1 (/ re im))))>
#<alt (* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))>
#<alt (* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))>
#<alt (* -1 im)>
#<alt (* -1 (* im (+ 1 (/ re im))))>
#<alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))>
#<alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))>
#<alt im>
#<alt (+ im (* 1/2 (/ (pow re 2) im)))>
#<alt (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))>
#<alt (+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))>
#<alt re>
#<alt (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))>
#<alt (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))>
#<alt (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))>
#<alt (* -1 re)>
#<alt (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))>
#<alt (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))>
#<alt (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))>
#<alt re>
#<alt (+ re (* 1/2 (/ (pow im 2) re)))>
#<alt (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))>
#<alt (+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))>
#<alt im>
#<alt (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))>
#<alt (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))>
#<alt (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))>
#<alt (* -1 im)>
#<alt (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))>
#<alt (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))>
#<alt (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* 2 im)>
#<alt (* -2 re)>
#<alt (* re (- (/ re im) 2))>
#<alt (* re (- (/ re im) 2))>
#<alt (* re (- (/ re im) 2))>
#<alt (/ (pow re 2) im)>
#<alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))>
#<alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))>
#<alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))>
#<alt (/ (pow re 2) im)>
#<alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))>
#<alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))>
#<alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))>
#<alt (/ (pow re 2) im)>
#<alt (/ (+ (* -2 (* im re)) (pow re 2)) im)>
#<alt (/ (+ (* -2 (* im re)) (pow re 2)) im)>
#<alt (/ (+ (* -2 (* im re)) (pow re 2)) im)>
#<alt (* -2 re)>
#<alt (+ (* -2 re) (/ (pow re 2) im))>
#<alt (+ (* -2 re) (/ (pow re 2) im))>
#<alt (+ (* -2 re) (/ (pow re 2) im))>
#<alt (* -2 re)>
#<alt (+ (* -2 re) (/ (pow re 2) im))>
#<alt (+ (* -2 re) (/ (pow re 2) im))>
#<alt (+ (* -2 re) (/ (pow re 2) im))>
#<alt (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 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)>

Calls

135 calls:

Time	Variable		Point	Expression
10.0ms	re	@	-inf	(/ 1/2 (sqrt re))
5.0ms	re	@	-inf	(pow (* (- (sqrt (+ (* re re) (* im im))) re) 2) 1/16)
4.0ms	re	@	0	(pow (* (- (sqrt (+ (* re re) (* im im))) re) 2) 1/16)
3.0ms	im	@	0	(pow (pow (* (+ 4 (/ (* im im) (* re re))) (- 0 re)) 1/4) 2)
1.0ms	im	@	inf	(pow (* (+ 4 (/ (* im im) (* re re))) (- 0 re)) 1/4)

rewrite312.0ms (3.3%)

Algorithm

1×	batch-egg-rewrite

Rules

3288×	`-lowering-.f32`
3288×	`-lowering-.f64`
2758×	`/-lowering-/.f32`
2758×	`/-lowering-/.f64`
1526×	`+-lowering-+.f64`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	42	199
1	246	184
2	1889	184
0	8421	184

Stop Event

1×	iter limit
1×	node limit

Counts

25 → 591

Calls

Call 1

Inputs
(* 1/2 (pow (pow (* (- (sqrt (+ (* re re) (* im im))) re) 2) 1/16) 8))
(pow (pow (* (- (sqrt (+ (* re re) (* im im))) re) 2) 1/16) 8)
(pow (* (- (sqrt (+ (* re re) (* im im))) re) 2) 1/16)
(* (- (sqrt (+ (* re re) (* im im))) re) 2)
(* im (/ 1/2 (sqrt re)))
(/ 1/2 (sqrt re))
(sqrt re)
(* 1/2 (sqrt (/ im (/ re im))))
(sqrt (/ im (/ re im)))
(/ im (/ re im))
(/ re im)
(* 1/2 (/ 1 (sqrt (/ 1 (+ (* im 2) (* re (+ -2 (/ re im))))))))
(/ 1 (sqrt (/ 1 (+ (* im 2) (* re (+ -2 (/ re im)))))))
(sqrt (/ 1 (+ (* im 2) (* re (+ -2 (/ re im))))))
(/ 1 (+ (* im 2) (* re (+ -2 (/ re im)))))
(* 1/2 (pow (pow (* (+ 4 (/ (* im im) (* re re))) (- 0 re)) 1/4) 2))
(pow (pow (* (+ 4 (/ (* im im) (* re re))) (- 0 re)) 1/4) 2)
(pow (* (+ 4 (/ (* im im) (* re re))) (- 0 re)) 1/4)
(* (+ 4 (/ (* im im) (* re re))) (- 0 re))
(- (sqrt (+ (* re re) (* im im))) re)
(sqrt (+ (* re re) (* im im)))
(* im 2)
(* re (+ -2 (/ re im)))
(* im im)
(* re re)

Outputs
(.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/2 binary64)) #s(literal 1/2 binary64))
(.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64))) (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)))
(exp.f64 (.f64 #s(literal 8 binary64) (.f64 #s(literal 1/16 binary64) (log.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))))))
(exp.f64 (.f64 (log.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(exp.f64 (.f64 (log.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64))) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64))) #s(literal 4 binary64)))
(exp.f64 (.f64 (.f64 (.f64 #s(literal 1/16 binary64) (log.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)))) #s(literal 4 binary64)) #s(literal 2 binary64)))
(exp.f64 (+.f64 (.f64 (.f64 #s(literal 1/16 binary64) (log.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)))) #s(literal 4 binary64)) (.f64 (.f64 #s(literal 1/16 binary64) (log.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)))) #s(literal 4 binary64))))
(sqrt.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)))
(/.f64 (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re))))) (sqrt.f64 (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 re re)))) (sqrt.f64 (+.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)) (.f64 re (.f64 re re))) #s(literal 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 (+.f64 (.f64 re re) (.f64 im im)) (.f64 re re)) #s(literal 2 binary64))) (sqrt.f64 (+.f64 re (hypot.f64 re im))))
(pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/16 binary64)) #s(literal 8 binary64))
(pow.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/32 binary64)) #s(literal 16 binary64))
(pow.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/8 binary64)) #s(literal 4 binary64))
(pow.f64 (exp.f64 #s(literal 8 binary64)) (.f64 #s(literal 1/16 binary64) (log.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)))))
(.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)))
(*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/4 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) #s(literal 2 binary64)))
(exp.f64 (.f64 #s(literal 1/16 binary64) (log.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)))))
(exp.f64 (.f64 (.f64 (log.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))) #s(literal 1/32 binary64)) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 2 binary64))) #s(literal 1/32 binary64)))
(pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/16 binary64))
(pow.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/32 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1/32 binary64))
(pow.f64 (exp.f64 #s(literal 1/16 binary64)) (log.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))))
(*.f64 (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/16 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/16 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/16 binary64)) (pow.f64 (-.f64 (hypot.f64 re im) re) #s(literal 1/16 binary64)))
(.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/32 binary64)) (pow.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/32 binary64)))
(+.f64 (.f64 #s(literal 2 binary64) (hypot.f64 re im)) (.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) re)))
(+.f64 (.f64 (hypot.f64 re im) #s(literal 2 binary64)) (.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)))
(exp.f64 (log.f64 (*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))))
(fma.f64 (hypot.f64 re im) #s(literal 2 binary64) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 2 binary64)))
(fma.f64 #s(literal 2 binary64) (hypot.f64 re im) (*.f64 #s(literal 2 binary64) (-.f64 #s(literal 0 binary64) re)))
(/.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re)))) (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 re (+.f64 re (hypot.f64 re im)))))
(/.f64 (.f64 #s(literal 2 binary64) (-.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 re re))) (+.f64 re (hypot.f64 re im)))
(/.f64 (.f64 (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re))) #s(literal 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 im im)) (.f64 re re)) #s(literal 2 binary64)) (+.f64 re (hypot.f64 re im)))
(/.f64 (neg.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re))))) (neg.f64 (+.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 (.f64 re re) (.f64 im im)) (.f64 re re)))) (neg.f64 (+.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)) (.f64 re (.f64 re re))) #s(literal 2 binary64))) (neg.f64 (+.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 re re)) #s(literal 2 binary64))) (neg.f64 (+.f64 re (hypot.f64 re im))))
(*.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
(*.f64 (exp.f64 (log.f64 (-.f64 (hypot.f64 re im) re))) (exp.f64 (log.f64 #s(literal 2 binary64))))
(*.f64 (exp.f64 (log.f64 #s(literal 2 binary64))) (exp.f64 (log.f64 (-.f64 (hypot.f64 re im) re))))
(/.f64 im (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im))))
(/.f64 (-.f64 #s(literal 0 binary64) im) (neg.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64))))
(/.f64 (*.f64 #s(literal 1/2 binary64) im) (sqrt.f64 re))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) im)) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (*.f64 im #s(literal 1 binary64)) (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))
(/.f64 (*.f64 im #s(literal -1/2 binary64)) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (*.f64 #s(literal 1 binary64) im) (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))
(/.f64 (*.f64 #s(literal -1/2 binary64) im) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 (neg.f64 (*.f64 im #s(literal 1 binary64))) (neg.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) im))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(/.f64 (neg.f64 (*.f64 im #s(literal -1/2 binary64))) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(/.f64 (neg.f64 (*.f64 #s(literal 1 binary64) im)) (neg.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (*.f64 #s(literal -1/2 binary64) im)) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(pow.f64 (/.f64 (sqrt.f64 re) (*.f64 #s(literal 1/2 binary64) im)) #s(literal -1 binary64))
(.f64 #s(literal 1/2 binary64) (.f64 (pow.f64 re #s(literal -1/2 binary64)) im))
(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
(.f64 (.f64 #s(literal 1/2 binary64) im) (pow.f64 re #s(literal -1/2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64))) #s(literal -1 binary64)))
(neg.f64 (/.f64 #s(literal -1/2 binary64) (sqrt.f64 re)))
(/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))
(/.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)) #s(literal 1 binary64))))
(/.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))
(/.f64 #s(literal -1/2 binary64) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re)))))
(pow.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 (sqrt.f64 re) #s(literal 1/2 binary64)) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1/2 binary64)))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(*.f64 #s(literal -1/2 binary64) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) (sqrt.f64 re))))
(*.f64 (pow.f64 re #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 re) #s(literal 1/2 binary64)))
(exp.f64 (.f64 (.f64 #s(literal 1/4 binary64) (log.f64 (-.f64 #s(literal 0 binary64) re))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (-.f64 #s(literal 0 binary64) re)) #s(literal 1/2 binary64)))
(exp.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (log.f64 (-.f64 #s(literal 0 binary64) re))) (.f64 #s(literal 1/4 binary64) (log.f64 (-.f64 #s(literal 0 binary64) re)))))
(sqrt.f64 re)
(sqrt.f64 (-.f64 #s(literal 0 binary64) re))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (.f64 re re) (-.f64 #s(literal 0 binary64) (.f64 re (*.f64 re re))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 re (-.f64 #s(literal 0 binary64) (*.f64 re re)))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re))) (sqrt.f64 re))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re)))) (sqrt.f64 (*.f64 re re)))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re)))) (sqrt.f64 (+.f64 #s(literal 0 binary64) (-.f64 (.f64 re re) (.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re))))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)))) (sqrt.f64 re))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re))))
(/.f64 (sqrt.f64 (+.f64 #s(literal 0 binary64) (.f64 re (.f64 re re)))) (sqrt.f64 (*.f64 re re)))
(pow.f64 re #s(literal 1/2 binary64))
(pow.f64 (*.f64 re re) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 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 (-.f64 #s(literal 0 binary64) re) #s(literal 1/4 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 re))
(*.f64 (pow.f64 re #s(literal 1/4 binary64)) (pow.f64 re #s(literal 1/4 binary64)))
(.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 re re)) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) re) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (.f64 re re)) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (.f64 re re))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re re))))
(/.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (pow.f64 (/.f64 re im) #s(literal 1/2 binary64)))
(/.f64 (*.f64 (sqrt.f64 im) #s(literal 1/2 binary64)) (pow.f64 (/.f64 re im) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (*.f64 #s(literal 1/2 binary64) (sqrt.f64 im))) (neg.f64 (pow.f64 (/.f64 re im) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (*.f64 (sqrt.f64 im) #s(literal 1/2 binary64))) (neg.f64 (pow.f64 (/.f64 re im) #s(literal 1/2 binary64))))
(.f64 #s(literal 1/2 binary64) (pow.f64 (/.f64 re (.f64 im im)) #s(literal -1/2 binary64)))
(.f64 (pow.f64 (/.f64 re (.f64 im im)) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (/.f64 im (/.f64 re im))) #s(literal 1/2 binary64)))
(sqrt.f64 (/.f64 im (/.f64 re im)))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 re (*.f64 im im)) #s(literal 1/2 binary64)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (/.f64 re (*.f64 im im)) #s(literal 1 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (pow.f64 (/.f64 re (*.f64 im im)) #s(literal 1/2 binary64))))
(/.f64 (sqrt.f64 im) (pow.f64 (/.f64 re im) #s(literal 1/2 binary64)))
(/.f64 (pow.f64 (/.f64 re im) #s(literal -1/2 binary64)) (pow.f64 im #s(literal -1/2 binary64)))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (neg.f64 (/.f64 re (*.f64 im im)))))
(/.f64 (neg.f64 (sqrt.f64 im)) (neg.f64 (pow.f64 (/.f64 re im) #s(literal 1/2 binary64))))
(/.f64 (pow.f64 (-.f64 #s(literal 0 binary64) im) #s(literal 1/2 binary64)) (pow.f64 (/.f64 re im) #s(literal 1/2 binary64)))
(/.f64 (sqrt.f64 (*.f64 im im)) (sqrt.f64 re))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im))) (sqrt.f64 re))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im))) (pow.f64 (/.f64 re im) #s(literal 1/2 binary64)))
(/.f64 (sqrt.f64 (*.f64 im #s(literal 1 binary64))) (pow.f64 (/.f64 re im) #s(literal 1/2 binary64)))
(/.f64 (neg.f64 (pow.f64 (-.f64 #s(literal 0 binary64) im) #s(literal 1/2 binary64))) (neg.f64 (pow.f64 (/.f64 re im) #s(literal 1/2 binary64))))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 im))) (neg.f64 (neg.f64 (pow.f64 (/.f64 re im) #s(literal 1/2 binary64)))))
(pow.f64 (/.f64 re (*.f64 im im)) #s(literal -1/2 binary64))
(pow.f64 (/.f64 im (/.f64 re im)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (/.f64 re (*.f64 im im)) #s(literal 1/2 binary64)) #s(literal -1 binary64))
(pow.f64 (pow.f64 (/.f64 re (*.f64 im im)) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (.f64 (.f64 im im) (/.f64 (.f64 im im) (.f64 re re))) #s(literal 1/4 binary64))
(pow.f64 (exp.f64 (log.f64 (/.f64 im (/.f64 re im)))) #s(literal 1/2 binary64))
(.f64 #s(literal 1 binary64) (pow.f64 (/.f64 re (.f64 im im)) #s(literal -1/2 binary64)))
(*.f64 (sqrt.f64 im) (pow.f64 (/.f64 re im) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (/.f64 re im) #s(literal -1/2 binary64)) (sqrt.f64 im))
(.f64 (pow.f64 (/.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 (-.f64 #s(literal 0 binary64) im) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (/.f64 re im)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (-.f64 #s(literal 0 binary64) im) #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal -1 binary64) (/.f64 re im))))
(.f64 (pow.f64 (.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 im #s(literal 1 binary64)) #s(literal 1/2 binary64)) (pow.f64 (/.f64 re im) #s(literal -1/2 binary64)))
(*.f64 (pow.f64 (/.f64 im (-.f64 #s(literal 0 binary64) re)) #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) im) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(*.f64 (sqrt.f64 (/.f64 im #s(literal 1 binary64))) (pow.f64 (/.f64 re im) #s(literal -1/2 binary64)))
(*.f64 (sqrt.f64 (/.f64 im (-.f64 #s(literal 0 binary64) re))) (pow.f64 (-.f64 #s(literal 0 binary64) im) #s(literal 1/2 binary64)))
(exp.f64 (.f64 (log.f64 (/.f64 re (.f64 im im))) #s(literal -1 binary64)))
(neg.f64 (/.f64 im (-.f64 #s(literal 0 binary64) (/.f64 re im))))
(/.f64 im (/.f64 re im))
(/.f64 (*.f64 im im) re)
(/.f64 #s(literal 1 binary64) (/.f64 re (*.f64 im im)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 re (*.f64 im im)) #s(literal 1 binary64)))
(/.f64 #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 #s(literal 0 binary64) im) (-.f64 #s(literal 0 binary64) (/.f64 re im)))
(/.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im)) (-.f64 #s(literal 0 binary64) re))
(/.f64 (/.f64 im re) (/.f64 #s(literal 1 binary64) im))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im)) (/.f64 re im))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im))) (neg.f64 (-.f64 #s(literal 0 binary64) re)))
(/.f64 (neg.f64 (/.f64 im re)) (neg.f64 (/.f64 #s(literal 1 binary64) im)))
(/.f64 (*.f64 im #s(literal 1 binary64)) (/.f64 re im))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im))) (-.f64 #s(literal 0 binary64) (/.f64 re im)))
(/.f64 (neg.f64 (*.f64 im #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (/.f64 re 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 im (/.f64 re im)))
(*.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 #s(literal -1 binary64) (/.f64 re im)))
(*.f64 (/.f64 im re) im)
(*.f64 (/.f64 im re) (pow.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -1 binary64)))
(*.f64 (/.f64 im #s(literal 1 binary64)) (/.f64 im re))
(*.f64 (/.f64 #s(literal 1 binary64) re) (pow.f64 (/.f64 (/.f64 #s(literal 1 binary64) im) im) #s(literal -1 binary64)))
(*.f64 (/.f64 im (-.f64 #s(literal 0 binary64) re)) (-.f64 #s(literal 0 binary64) im))
(exp.f64 (*.f64 (log.f64 (/.f64 im re)) #s(literal -1 binary64)))
(-.f64 (/.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) im)) (-.f64 #s(literal 0 binary64) (/.f64 re im)))
(neg.f64 (-.f64 #s(literal 0 binary64) (/.f64 re im)))
(/.f64 re im)
(/.f64 #s(literal 1 binary64) (/.f64 im re))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 im re) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (/.f64 im re))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 im re)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (/.f64 im re) #s(literal 1 binary64))))
(/.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 0 binary64) im))
(/.f64 (-.f64 #s(literal 0 binary64) (.f64 re re)) (.f64 (-.f64 #s(literal 0 binary64) im) re))
(/.f64 (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))) (.f64 (-.f64 #s(literal 0 binary64) im) (.f64 re re)))
(/.f64 (*.f64 re #s(literal 1 binary64)) im)
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 re re))) (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) im) re)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re)))) (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) im) (.f64 re re))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) re)) (neg.f64 (-.f64 #s(literal 0 binary64) im)))
(/.f64 (-.f64 #s(literal 0 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) re))) (-.f64 #s(literal 0 binary64) im))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) im)) (.f64 (-.f64 #s(literal 0 binary64) im) re)) (*.f64 im im))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (/.f64 im re))) (.f64 (-.f64 #s(literal 0 binary64) im) #s(literal 1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) im) (neg.f64 (/.f64 im re))))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (/.f64 im re)) (.f64 (-.f64 #s(literal 0 binary64) im) #s(literal -1 binary64))) (*.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 im re)))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) im) (.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 0 binary64) re))) (-.f64 #s(literal 0 binary64) (*.f64 im im)))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) im))) (.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 0 binary64) re))) (*.f64 (-.f64 #s(literal 0 binary64) im) (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) im)) (.f64 (-.f64 #s(literal 0 binary64) im) (neg.f64 (-.f64 #s(literal 0 binary64) re)))) (*.f64 im im))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) re))) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) im))))
(/.f64 (neg.f64 (*.f64 re #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) im))
(pow.f64 (/.f64 re im) #s(literal 1 binary64))
(pow.f64 (/.f64 im re) #s(literal -1 binary64))
(pow.f64 (/.f64 (/.f64 im re) #s(literal 1 binary64)) #s(literal -1 binary64))
(*.f64 re (/.f64 #s(literal 1 binary64) im))
(*.f64 #s(literal 1 binary64) (/.f64 re im))
(*.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) im)))
(*.f64 (/.f64 #s(literal 1 binary64) im) re)
(*.f64 (/.f64 #s(literal 1 binary64) im) (pow.f64 (/.f64 #s(literal 1 binary64) re) #s(literal -1 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) re) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) im))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) re)) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (-.f64 #s(literal 0 binary64) im)))
(/.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))
(/.f64 #s(literal 1/2 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64)))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64))))
(/.f64 #s(literal -1/2 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64))))
(pow.f64 (/.f64 (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) #s(literal -1 binary64))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))))
(.f64 #s(literal 1 binary64) (/.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64))))
(.f64 (sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))) #s(literal 1/2 binary64))
(exp.f64 (.f64 (.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))))) #s(literal -1 binary64)))
(exp.f64 (.f64 (log.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))) #s(literal 1/2 binary64)))
(exp.f64 (.f64 (log.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))))) #s(literal -1/2 binary64)))
(exp.f64 (neg.f64 (.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))))))
(sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))))
(neg.f64 (/.f64 #s(literal -1 binary64) (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64))))
(/.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))
(/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (-.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 im #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 8 binary64) (.f64 im (.f64 im im))) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64)))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) (-.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 re re) (*.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64))))))))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64))))
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64))))))
(/.f64 (sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))) #s(literal 1 binary64))
(/.f64 (sqrt.f64 (+.f64 (.f64 #s(literal 8 binary64) (.f64 im (.f64 im im))) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64))))))) (sqrt.f64 (+.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (-.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 im #s(literal 2 binary64)))))))
(/.f64 (sqrt.f64 (+.f64 (.f64 #s(literal 8 binary64) (.f64 im (.f64 im im))) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64))))))) (sqrt.f64 (+.f64 (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64)))) (-.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 (.f64 im #s(literal 2 binary64)) re) (+.f64 (/.f64 re im) #s(literal -2 binary64)))))))
(/.f64 (sqrt.f64 (+.f64 (.f64 #s(literal 8 binary64) (.f64 im (.f64 im im))) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64))))))) (sqrt.f64 (.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (-.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (*.f64 im #s(literal 2 binary64))))))))
(/.f64 (sqrt.f64 (-.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64)))))) (sqrt.f64 (-.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))))
(/.f64 (sqrt.f64 (-.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64)))))) (sqrt.f64 (.f64 #s(literal 1 binary64) (-.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))))))
(/.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))))) (sqrt.f64 #s(literal -1 binary64)))
(/.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))))) #s(literal -1 binary64))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (.f64 #s(literal 8 binary64) (.f64 im (.f64 im im))) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64)))))))) (sqrt.f64 (neg.f64 (+.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (-.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 im #s(literal 2 binary64))))))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64))))))) (sqrt.f64 (neg.f64 (-.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))))))
(/.f64 (sqrt.f64 (-.f64 (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64)))) (.f64 (.f64 im im) #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (*.f64 im #s(literal 2 binary64)))))
(/.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 #s(literal 8 binary64) (.f64 im (.f64 im im))) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64)))))))) (neg.f64 (sqrt.f64 (+.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (-.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 im #s(literal 2 binary64))))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64))))))) (neg.f64 (sqrt.f64 (-.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))))))
(pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal 1/2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))) #s(literal -1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64)) #s(literal -1 binary64))
(pow.f64 (sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))) #s(literal 1 binary64))
(pow.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))))
(.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64))))
(.f64 (sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))) #s(literal 1 binary64))
(.f64 (sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))) (pow.f64 #s(literal 1 binary64) #s(literal -1/2 binary64)))
(.f64 (sqrt.f64 (+.f64 (.f64 #s(literal 8 binary64) (.f64 im (.f64 im im))) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64))))))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (-.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (*.f64 im #s(literal 2 binary64)))))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (+.f64 (.f64 #s(literal 8 binary64) (.f64 im (.f64 im im))) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64))))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (-.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (*.f64 im #s(literal 2 binary64))))))))
(.f64 (sqrt.f64 (-.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64)))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (-.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64)))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))))))
(.f64 (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal 1/4 binary64)))
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal -1/2 binary64)) (sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))))
(.f64 (pow.f64 #s(literal -1 binary64) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))) #s(literal -1/2 binary64)))
(.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 8 binary64) (.f64 im (.f64 im im))) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64))))))) #s(literal -1/2 binary64)) (pow.f64 (+.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (-.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (*.f64 im #s(literal 2 binary64))))) #s(literal -1/2 binary64)))
(.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64)))))) #s(literal -1/2 binary64)) (pow.f64 (-.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))
(.f64 (pow.f64 (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/4 binary64)) #s(literal -1 binary64)))
(exp.f64 (.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))))))
(exp.f64 (.f64 (log.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))) #s(literal -1/2 binary64)))
(exp.f64 (.f64 (log.f64 (sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))))) #s(literal -1 binary64)))
(exp.f64 (.f64 (.f64 (.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))))) #s(literal -1 binary64)) #s(literal -1 binary64)))
(exp.f64 (neg.f64 (.f64 (.f64 #s(literal -1/2 binary64) (log.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))))) #s(literal -1 binary64))))
(fabs.f64 (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))
(sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))))))
(/.f64 #s(literal 1 binary64) (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))))))
(/.f64 (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(/.f64 #s(literal -1 binary64) (neg.f64 (sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))))))
(/.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64))) #s(literal -1 binary64))
(/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))))))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))) #s(literal 1 binary64))
(/.f64 (neg.f64 (sqrt.f64 #s(literal -1 binary64))) (neg.f64 (sqrt.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))))))
(pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(pow.f64 (sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))) #s(literal -1 binary64))
(pow.f64 (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))))) #s(literal 1/4 binary64))
(.f64 #s(literal 1 binary64) (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))
(.f64 (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64)) #s(literal 1 binary64))
(.f64 (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal -1/2 binary64)))
(.f64 #s(literal -1 binary64) (pow.f64 (/.f64 #s(literal -1 binary64) (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64))) #s(literal -1 binary64)))
(.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal -1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))))))
(.f64 (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/4 binary64)) (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/4 binary64)))
(.f64 (pow.f64 (+.f64 (.f64 #s(literal 8 binary64) (.f64 im (.f64 im im))) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64)))))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (-.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (*.f64 im #s(literal 2 binary64)))))) #s(literal -1/2 binary64)))
(.f64 (pow.f64 (-.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64))))) #s(literal -1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))) #s(literal -1/2 binary64)))
(.f64 (pow.f64 (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64)) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 8 binary64) (.f64 im (.f64 im im))) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64))))))) #s(literal 1/2 binary64)) (sqrt.f64 (+.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (-.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (*.f64 im #s(literal 2 binary64)))))))
(.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64)))))) #s(literal 1/2 binary64)) (sqrt.f64 (-.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))))
(.f64 (pow.f64 (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal 1/4 binary64)) #s(literal -1 binary64)) (pow.f64 (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal 1/4 binary64)) #s(literal -1 binary64)))
(.f64 (sqrt.f64 (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 8 binary64) (.f64 im (.f64 im im))) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64)))))))) (sqrt.f64 (+.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (-.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (*.f64 im #s(literal 2 binary64)))))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64))))))) (sqrt.f64 (-.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))))
(exp.f64 (log.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))))))
(sqrt.f64 (.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))))))
(neg.f64 (/.f64 #s(literal -1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))))
(/.f64 #s(literal 1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))))
(/.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))))))
(/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))))))
(pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1 binary64))
(pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))) #s(literal 1 binary64))
(pow.f64 (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64)) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))) #s(literal -2 binary64))
(pow.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))))) #s(literal -1 binary64))
(pow.f64 (.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))) #s(literal -1/2 binary64))
(pow.f64 (.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))))) #s(literal 1/2 binary64))
(pow.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))) (sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))))) #s(literal -1 binary64))
(.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))))
(.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))) #s(literal 1 binary64))
(.f64 (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64)) (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))
(.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))))
(.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 8 binary64) (.f64 im (.f64 im im))) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64))))))) (+.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (-.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (*.f64 im #s(literal 2 binary64))))))
(.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 #s(literal 8 binary64) (.f64 im (.f64 im im))) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64))))))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (-.f64 (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))) (*.f64 im #s(literal 2 binary64)))))) #s(literal -1 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64)))))) (-.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))))
(.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 im im) #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) (+.f64 (/.f64 re im) #s(literal -2 binary64)))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))) #s(literal -1 binary64)))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) re))))
(.f64 (pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/4 binary64)) (.f64 (pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/4 binary64)) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) re))) #s(literal 1/2 binary64))
(.f64 (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/4 binary64))) (pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/4 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) re))) #s(literal 1/2 binary64)))
(exp.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/4 binary64) (log.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))))))
(exp.f64 (log.f64 (sqrt.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)))))
(exp.f64 (.f64 (log.f64 (sqrt.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) re)))) #s(literal 1 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 (.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re)))) (.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re)))))) #s(literal 1/4 binary64)))
(exp.f64 (.f64 (.f64 (log.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))) #s(literal 1/2 binary64)) #s(literal 1 binary64)))
(exp.f64 (.f64 (.f64 #s(literal 2 binary64) (.f64 #s(literal 1/4 binary64) (log.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) re))))) #s(literal 1 binary64)))
(sqrt.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)))
(/.f64 (sqrt.f64 (.f64 (+.f64 #s(literal 64 binary64) (/.f64 (.f64 (/.f64 im (/.f64 re im)) (.f64 (.f64 im im) (/.f64 (.f64 im im) (.f64 re re)))) (.f64 re (.f64 re re)))) (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))))) (sqrt.f64 (.f64 (+.f64 #s(literal 16 binary64) (/.f64 (-.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal 4 binary64)) (/.f64 (.f64 re re) (.f64 im im)))) (.f64 re re))))
(/.f64 (sqrt.f64 (.f64 (+.f64 #s(literal 64 binary64) (/.f64 (.f64 (/.f64 im (/.f64 re im)) (.f64 (.f64 im im) (/.f64 (.f64 im im) (.f64 re re)))) (.f64 re (.f64 re re)))) (-.f64 #s(literal 0 binary64) (.f64 re re)))) (sqrt.f64 (.f64 (+.f64 #s(literal 16 binary64) (/.f64 (-.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal 4 binary64)) (/.f64 (.f64 re re) (.f64 im im)))) re)))
(/.f64 (sqrt.f64 (.f64 (-.f64 #s(literal 16 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (.f64 re re) (.f64 im im)))) (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))))) (sqrt.f64 (.f64 (-.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (*.f64 re re))))
(/.f64 (sqrt.f64 (.f64 (-.f64 #s(literal 16 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (.f64 re re) (.f64 im im)))) (-.f64 #s(literal 0 binary64) (.f64 re re)))) (sqrt.f64 (.f64 (-.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) re)))
(/.f64 (sqrt.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))) (+.f64 #s(literal 64 binary64) (/.f64 (.f64 (/.f64 im (/.f64 re im)) (.f64 (.f64 im im) (/.f64 (.f64 im im) (.f64 re re)))) (.f64 re (.f64 re re)))))) (sqrt.f64 (.f64 (.f64 re re) (+.f64 #s(literal 16 binary64) (/.f64 (-.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal 4 binary64)) (/.f64 (.f64 re re) (.f64 im im)))))))
(/.f64 (sqrt.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))) (-.f64 #s(literal 16 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (.f64 re re) (.f64 im im)))))) (sqrt.f64 (.f64 (.f64 re re) (-.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))))))
(/.f64 (sqrt.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 re re)) (+.f64 #s(literal 64 binary64) (/.f64 (.f64 (/.f64 im (/.f64 re im)) (.f64 (.f64 im im) (/.f64 (.f64 im im) (.f64 re re)))) (.f64 re (.f64 re re)))))) (sqrt.f64 (.f64 re (+.f64 #s(literal 16 binary64) (/.f64 (-.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal 4 binary64)) (/.f64 (.f64 re re) (.f64 im im)))))))
(/.f64 (sqrt.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 re re)) (-.f64 #s(literal 16 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (.f64 re re) (.f64 im im)))))) (sqrt.f64 (.f64 re (-.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))))))
(/.f64 (sqrt.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))))) (sqrt.f64 (.f64 re re)))
(/.f64 (sqrt.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) (.f64 re re)))) (sqrt.f64 re))
(/.f64 (sqrt.f64 (.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 64 binary64) (/.f64 (.f64 (/.f64 im (/.f64 re im)) (.f64 (.f64 im im) (/.f64 (.f64 im im) (.f64 re re)))) (.f64 re (.f64 re re)))))) (sqrt.f64 (+.f64 #s(literal 16 binary64) (/.f64 (-.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal 4 binary64)) (/.f64 (.f64 re re) (.f64 im im))))))
(/.f64 (sqrt.f64 (.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 16 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (.f64 re re) (.f64 im im)))))) (sqrt.f64 (-.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re)))))
(/.f64 (sqrt.f64 (.f64 (+.f64 #s(literal 64 binary64) (/.f64 (.f64 (/.f64 im (/.f64 re im)) (.f64 (.f64 im im) (/.f64 (.f64 im im) (.f64 re re)))) (.f64 re (.f64 re re)))) (-.f64 #s(literal 0 binary64) re))) (sqrt.f64 (+.f64 #s(literal 16 binary64) (/.f64 (-.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal 4 binary64)) (/.f64 (.f64 re re) (.f64 im im))))))
(/.f64 (sqrt.f64 (.f64 (-.f64 #s(literal 16 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (.f64 re re) (.f64 im im)))) (-.f64 #s(literal 0 binary64) re))) (sqrt.f64 (-.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re)))))
(/.f64 (sqrt.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))) (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))))) (sqrt.f64 (.f64 re re)))
(/.f64 (sqrt.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 re re)) (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))))) (sqrt.f64 re))
(pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (sqrt.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))) #s(literal 1 binary64))
(pow.f64 (pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/8 binary64)) #s(literal 4 binary64))
(pow.f64 (.f64 (.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re)))) (.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))))) #s(literal 1/4 binary64))
(pow.f64 (.f64 (.f64 (.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re)))) (.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))))) (.f64 (.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re)))) (.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re)))))) #s(literal 1/8 binary64))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (log.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) re)))))
(.f64 (sqrt.f64 re) (sqrt.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re)))))
(.f64 (pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/4 binary64)) (pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) #s(literal 1/4 binary64)) (pow.f64 (.f64 (-.f64 #s(literal 0 binary64) re) (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) #s(literal 1/4 binary64)) (pow.f64 (pow.f64 (.f64 (-.f64 #s(literal 0 binary64) re) (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))) #s(literal 1/4 binary64)) #s(literal 1 binary64)))
(.f64 (pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/8 binary64)) (pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #s(literal 3/8 binary64)))
(.f64 (pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/8 binary64)) (pow.f64 (pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #s(literal 3/8 binary64)) #s(literal 1 binary64)))
(.f64 (sqrt.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re)))) (sqrt.f64 re))
(.f64 (pow.f64 (.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) re)) (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re)))) #s(literal 1/4 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #s(literal 3/8 binary64)) (pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/8 binary64)))
(.f64 (pow.f64 (pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #s(literal 3/8 binary64)) #s(literal 1 binary64)) (pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/8 binary64)))
(.f64 (pow.f64 (sqrt.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re)))) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 re) #s(literal 1 binary64)))
(.f64 (pow.f64 (sqrt.f64 re) #s(literal 1 binary64)) (pow.f64 (sqrt.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re)))) #s(literal 1 binary64)))
(.f64 (pow.f64 (pow.f64 (.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) re)) (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re)))) #s(literal 1/4 binary64)) #s(literal 1 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/4 binary64)))
(exp.f64 (.f64 #s(literal 1/4 binary64) (log.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) re)))))
(exp.f64 (.f64 (.f64 (log.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))) #s(literal 1/8 binary64)) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 (.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re)))) (.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re)))))) #s(literal 1/8 binary64)))
(pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/4 binary64)) #s(literal 1 binary64))
(pow.f64 (sqrt.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/8 binary64)) #s(literal 2 binary64))
(pow.f64 (.f64 (.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re)))) (.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))))) #s(literal 1/8 binary64))
(pow.f64 (exp.f64 #s(literal 1/4 binary64)) (log.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))))
(.f64 (pow.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) #s(literal 1/4 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/4 binary64)) (pow.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) #s(literal 1/4 binary64)))
(.f64 (pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/8 binary64)) (pow.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)) #s(literal 1/8 binary64)))
(+.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) #s(literal 0 binary64)) (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) re)))
(+.f64 (.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 4 binary64)) (.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (.f64 im im) (.f64 re re))))
(+.f64 (.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (.f64 im im) (.f64 re re))) (.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 4 binary64)))
(+.f64 (.f64 #s(literal 0 binary64) (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re)))) (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) re)))
(+.f64 (.f64 #s(literal 4 binary64) (-.f64 #s(literal 0 binary64) re)) (.f64 (/.f64 (.f64 im im) (.f64 re re)) (-.f64 #s(literal 0 binary64) re)))
(+.f64 (.f64 (/.f64 (.f64 im im) (.f64 re re)) (-.f64 #s(literal 0 binary64) re)) (.f64 #s(literal 4 binary64) (-.f64 #s(literal 0 binary64) re)))
(exp.f64 (log.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))))
(fma.f64 #s(literal 4 binary64) (-.f64 #s(literal 0 binary64) re) (.f64 (/.f64 (.f64 im im) (*.f64 re re)) (-.f64 #s(literal 0 binary64) re)))
(fma.f64 (/.f64 (.f64 im im) (.f64 re re)) (-.f64 #s(literal 0 binary64) re) (*.f64 #s(literal 4 binary64) (-.f64 #s(literal 0 binary64) re)))
(fma.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) #s(literal 0 binary64) (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)))
(fma.f64 #s(literal 0 binary64) (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re)))
(fma.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 4 binary64) (.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (.f64 im im) (*.f64 re re))))
(fma.f64 (-.f64 #s(literal 0 binary64) re) (/.f64 (.f64 im im) (.f64 re re)) (*.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 4 binary64)))
(neg.f64 (.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re)))))
(neg.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) re))
(/.f64 (.f64 (+.f64 #s(literal 64 binary64) (/.f64 (.f64 (/.f64 im (/.f64 re im)) (.f64 (.f64 im im) (/.f64 (.f64 im im) (.f64 re re)))) (.f64 re (.f64 re re)))) (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re)))) (.f64 (+.f64 #s(literal 16 binary64) (/.f64 (-.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal 4 binary64)) (/.f64 (.f64 re re) (.f64 im im)))) (.f64 re re)))
(/.f64 (.f64 (+.f64 #s(literal 64 binary64) (/.f64 (.f64 (/.f64 im (/.f64 re im)) (.f64 (.f64 im im) (/.f64 (.f64 im im) (.f64 re re)))) (.f64 re (.f64 re re)))) (-.f64 #s(literal 0 binary64) (.f64 re re))) (.f64 (+.f64 #s(literal 16 binary64) (/.f64 (-.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal 4 binary64)) (/.f64 (.f64 re re) (.f64 im im)))) re))
(/.f64 (.f64 (-.f64 #s(literal 16 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (.f64 re re) (.f64 im im)))) (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re)))) (.f64 (-.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (*.f64 re re)))
(/.f64 (.f64 (-.f64 #s(literal 16 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (.f64 re re) (.f64 im im)))) (-.f64 #s(literal 0 binary64) (.f64 re re))) (.f64 (-.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) re))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))) (+.f64 #s(literal 64 binary64) (/.f64 (.f64 (/.f64 im (/.f64 re im)) (.f64 (.f64 im im) (/.f64 (.f64 im im) (.f64 re re)))) (.f64 re (.f64 re re))))) (.f64 (.f64 re re) (+.f64 #s(literal 16 binary64) (/.f64 (-.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal 4 binary64)) (/.f64 (.f64 re re) (.f64 im im))))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))) (-.f64 #s(literal 16 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (.f64 re re) (.f64 im im))))) (.f64 (.f64 re re) (-.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re)))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 re re)) (+.f64 #s(literal 64 binary64) (/.f64 (.f64 (/.f64 im (/.f64 re im)) (.f64 (.f64 im im) (/.f64 (.f64 im im) (.f64 re re)))) (.f64 re (.f64 re re))))) (.f64 re (+.f64 #s(literal 16 binary64) (/.f64 (-.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal 4 binary64)) (/.f64 (.f64 re re) (.f64 im im))))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 re re)) (-.f64 #s(literal 16 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (.f64 re re) (.f64 im im))))) (.f64 re (-.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re)))))
(/.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re)))) (.f64 re re))
(/.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) (.f64 re re))) re)
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 64 binary64) (/.f64 (.f64 (/.f64 im (/.f64 re im)) (.f64 (.f64 im im) (/.f64 (.f64 im im) (.f64 re re)))) (.f64 re (.f64 re re))))) (+.f64 #s(literal 16 binary64) (/.f64 (-.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal 4 binary64)) (/.f64 (.f64 re re) (.f64 im im)))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 16 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (.f64 re re) (.f64 im im))))) (-.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))))
(/.f64 (.f64 (+.f64 #s(literal 64 binary64) (/.f64 (.f64 (/.f64 im (/.f64 re im)) (.f64 (.f64 im im) (/.f64 (.f64 im im) (.f64 re re)))) (.f64 re (.f64 re re)))) (-.f64 #s(literal 0 binary64) re)) (+.f64 #s(literal 16 binary64) (/.f64 (-.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal 4 binary64)) (/.f64 (.f64 re re) (.f64 im im)))))
(/.f64 (.f64 (-.f64 #s(literal 16 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (.f64 re re) (.f64 im im)))) (-.f64 #s(literal 0 binary64) re)) (-.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))) (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re)))) (.f64 re re))
(/.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 re re)) (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re)))) re)
(/.f64 (neg.f64 (.f64 (+.f64 #s(literal 64 binary64) (/.f64 (.f64 (/.f64 im (/.f64 re im)) (.f64 (.f64 im im) (/.f64 (.f64 im im) (.f64 re re)))) (.f64 re (.f64 re re)))) (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))))) (neg.f64 (.f64 (+.f64 #s(literal 16 binary64) (/.f64 (-.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal 4 binary64)) (/.f64 (.f64 re re) (.f64 im im)))) (.f64 re re))))
(/.f64 (neg.f64 (.f64 (+.f64 #s(literal 64 binary64) (/.f64 (.f64 (/.f64 im (/.f64 re im)) (.f64 (.f64 im im) (/.f64 (.f64 im im) (.f64 re re)))) (.f64 re (.f64 re re)))) (-.f64 #s(literal 0 binary64) (.f64 re re)))) (neg.f64 (.f64 (+.f64 #s(literal 16 binary64) (/.f64 (-.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal 4 binary64)) (/.f64 (.f64 re re) (.f64 im im)))) re)))
(/.f64 (neg.f64 (.f64 (-.f64 #s(literal 16 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (.f64 re re) (.f64 im im)))) (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))))) (neg.f64 (.f64 (-.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (*.f64 re re))))
(/.f64 (neg.f64 (.f64 (-.f64 #s(literal 16 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (.f64 re re) (.f64 im im)))) (-.f64 #s(literal 0 binary64) (.f64 re re)))) (neg.f64 (.f64 (-.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) re)))
(/.f64 (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))) (+.f64 #s(literal 64 binary64) (/.f64 (.f64 (/.f64 im (/.f64 re im)) (.f64 (.f64 im im) (/.f64 (.f64 im im) (.f64 re re)))) (.f64 re (.f64 re re)))))) (neg.f64 (.f64 (.f64 re re) (+.f64 #s(literal 16 binary64) (/.f64 (-.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal 4 binary64)) (/.f64 (.f64 re re) (.f64 im im)))))))
(/.f64 (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))) (-.f64 #s(literal 16 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (.f64 re re) (.f64 im im)))))) (neg.f64 (.f64 (.f64 re re) (-.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))))))
(/.f64 (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 re re)) (+.f64 #s(literal 64 binary64) (/.f64 (.f64 (/.f64 im (/.f64 re im)) (.f64 (.f64 im im) (/.f64 (.f64 im im) (.f64 re re)))) (.f64 re (.f64 re re)))))) (neg.f64 (.f64 re (+.f64 #s(literal 16 binary64) (/.f64 (-.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal 4 binary64)) (/.f64 (.f64 re re) (.f64 im im)))))))
(/.f64 (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 re re)) (-.f64 #s(literal 16 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (.f64 re re) (.f64 im im)))))) (neg.f64 (.f64 re (-.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))))))
(/.f64 (neg.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))))) (-.f64 #s(literal 0 binary64) (.f64 re re)))
(/.f64 (neg.f64 (.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))) (-.f64 #s(literal 0 binary64) (.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(/.f64 (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 64 binary64) (/.f64 (.f64 (/.f64 im (/.f64 re im)) (.f64 (.f64 im im) (/.f64 (.f64 im im) (.f64 re re)))) (.f64 re (.f64 re re)))))) (neg.f64 (+.f64 #s(literal 16 binary64) (/.f64 (-.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal 4 binary64)) (/.f64 (.f64 re re) (.f64 im im))))))
(/.f64 (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 #s(literal 16 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (.f64 re re) (.f64 im im)))))) (neg.f64 (-.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re)))))
(/.f64 (neg.f64 (.f64 (+.f64 #s(literal 64 binary64) (/.f64 (.f64 (/.f64 im (/.f64 re im)) (.f64 (.f64 im im) (/.f64 (.f64 im im) (.f64 re re)))) (.f64 re (.f64 re re)))) (-.f64 #s(literal 0 binary64) re))) (neg.f64 (+.f64 #s(literal 16 binary64) (/.f64 (-.f64 (/.f64 (.f64 im im) (.f64 re re)) #s(literal 4 binary64)) (/.f64 (.f64 re re) (.f64 im im))))))
(/.f64 (neg.f64 (.f64 (-.f64 #s(literal 16 binary64) (/.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (.f64 re re) (.f64 im im)))) (-.f64 #s(literal 0 binary64) re))) (neg.f64 (-.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re)))))
(/.f64 (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))) (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))))) (-.f64 #s(literal 0 binary64) (.f64 re re)))
(/.f64 (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 re re)) (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (.f64 re re))))) (-.f64 #s(literal 0 binary64) re))
(.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))))
(.f64 (exp.f64 (log.f64 (-.f64 #s(literal 0 binary64) re))) (exp.f64 (log.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))))))
(.f64 (exp.f64 (log.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))))) (exp.f64 (log.f64 (-.f64 #s(literal 0 binary64) re))))
(+.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re))
(+.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 re im))
(+.f64 (+.f64 (hypot.f64 re im) #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) re))
(-.f64 (hypot.f64 re im) re)
(-.f64 (/.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 re (+.f64 re (hypot.f64 re im))))) (/.f64 (.f64 re (.f64 re re)) (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 re (+.f64 re (hypot.f64 re im))))))
(-.f64 (/.f64 (+.f64 (.f64 re re) (.f64 im im)) (+.f64 re (hypot.f64 re im))) (/.f64 (*.f64 re re) (+.f64 re (hypot.f64 re im))))
(-.f64 (+.f64 (hypot.f64 re im) #s(literal 0 binary64)) re)
(fma.f64 #s(literal -1 binary64) re (hypot.f64 re im))
(fma.f64 (-.f64 #s(literal 0 binary64) (*.f64 re re)) (/.f64 #s(literal 1 binary64) re) (hypot.f64 re im))
(fma.f64 (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))) (/.f64 #s(literal 1 binary64) (*.f64 re re)) (hypot.f64 re im))
(fma.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 1/4 binary64)) (-.f64 #s(literal 0 binary64) re))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 re (+.f64 re (hypot.f64 re im)))) (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (*.f64 re re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re (hypot.f64 re im)) (-.f64 (+.f64 (.f64 re re) (.f64 im im)) (*.f64 re re))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 re (+.f64 re (hypot.f64 re im)))) (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (*.f64 re re))))))
(/.f64 #s(literal -1 binary64) (neg.f64 (/.f64 (+.f64 re (hypot.f64 re im)) (-.f64 (+.f64 (.f64 re re) (.f64 im im)) (*.f64 re re)))))
(/.f64 (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re))) (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))
(/.f64 (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re))) (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (-.f64 (.f64 re re) (.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re)))))
(/.f64 (-.f64 (+.f64 (.f64 re re) (.f64 im im)) (*.f64 re re)) (+.f64 re (hypot.f64 re im)))
(/.f64 (-.f64 (+.f64 (.f64 re re) (.f64 im im)) (*.f64 re re)) (-.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re)))) (neg.f64 (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re)))) (neg.f64 (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (-.f64 (.f64 re re) (.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re))))))
(/.f64 (neg.f64 (-.f64 (+.f64 (.f64 re re) (.f64 im im)) (*.f64 re re))) (neg.f64 (+.f64 re (hypot.f64 re im))))
(/.f64 (neg.f64 (-.f64 (+.f64 (.f64 re re) (.f64 im im)) (*.f64 re re))) (neg.f64 (-.f64 (hypot.f64 re im) (-.f64 #s(literal 0 binary64) re))))
(/.f64 (+.f64 (.f64 (hypot.f64 (.f64 re (.f64 re re)) (.f64 im (.f64 im im))) (/.f64 (.f64 re re) (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))))) (.f64 (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re))))) #s(literal 1 binary64))) (.f64 (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re))))) (/.f64 (.f64 re re) (-.f64 #s(literal 0 binary64) (.f64 re (*.f64 re re))))))
(/.f64 (+.f64 (.f64 (hypot.f64 (.f64 re (.f64 re re)) (.f64 im (.f64 im im))) (/.f64 re (-.f64 #s(literal 0 binary64) (.f64 re re)))) (.f64 (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re))))) #s(literal 1 binary64))) (.f64 (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re))))) (/.f64 re (-.f64 #s(literal 0 binary64) (*.f64 re re)))))
(/.f64 (+.f64 (.f64 (hypot.f64 (.f64 re (.f64 re re)) (.f64 im (.f64 im im))) re) (.f64 (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re))))) (-.f64 #s(literal 0 binary64) (.f64 re re)))) (.f64 (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re))))) re))
(/.f64 (+.f64 (.f64 (hypot.f64 (.f64 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 (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))))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 re re))))) (.f64 (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re))))) (-.f64 #s(literal 0 binary64) re)))
(/.f64 (+.f64 (.f64 (hypot.f64 (.f64 re (.f64 re re)) (.f64 im (.f64 im im))) (-.f64 #s(literal 0 binary64) (.f64 re re))) (.f64 (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re))))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re)))))) (.f64 (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re))))) (-.f64 #s(literal 0 binary64) (*.f64 re re))))
(/.f64 (+.f64 (.f64 (hypot.f64 (.f64 re (.f64 re re)) (.f64 im (.f64 im im))) (+.f64 #s(literal 0 binary64) (-.f64 (.f64 re re) (.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re))))) (.f64 (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re))))) (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))))) (.f64 (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re))))) (+.f64 #s(literal 0 binary64) (-.f64 (.f64 re re) (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re))))))
(/.f64 (+.f64 (.f64 (hypot.f64 (.f64 re (.f64 re re)) (.f64 im (.f64 im im))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re))) (.f64 (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re))))) (-.f64 #s(literal 0 binary64) (.f64 re re)))) (.f64 (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re))))
(/.f64 (+.f64 (.f64 (sqrt.f64 (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im))))) (/.f64 (.f64 re re) (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))))) (.f64 (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64))) (.f64 (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im))) (/.f64 (.f64 re re) (-.f64 #s(literal 0 binary64) (.f64 re (*.f64 re re))))))
(/.f64 (+.f64 (.f64 (sqrt.f64 (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im))))) (/.f64 re (-.f64 #s(literal 0 binary64) (.f64 re re)))) (.f64 (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64))) (.f64 (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im))) (/.f64 re (-.f64 #s(literal 0 binary64) (*.f64 re re)))))
(/.f64 (+.f64 (.f64 (sqrt.f64 (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im))))) re) (.f64 (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im))) (-.f64 #s(literal 0 binary64) (.f64 re re)))) (.f64 (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im))) re))
(/.f64 (+.f64 (.f64 (sqrt.f64 (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im))))) (.f64 re re)) (.f64 (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im))) (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))))) (.f64 (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im))) (*.f64 re re)))
(/.f64 (+.f64 (.f64 (sqrt.f64 (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im))))) (-.f64 #s(literal 0 binary64) re)) (.f64 (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 re re))))) (.f64 (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im))) (-.f64 #s(literal 0 binary64) re)))
(/.f64 (+.f64 (.f64 (sqrt.f64 (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im))))) (-.f64 #s(literal 0 binary64) (.f64 re re))) (.f64 (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re)))))) (.f64 (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im))) (-.f64 #s(literal 0 binary64) (*.f64 re re))))
(/.f64 (+.f64 (.f64 (sqrt.f64 (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im))))) (+.f64 #s(literal 0 binary64) (-.f64 (.f64 re re) (.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re))))) (.f64 (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im))) (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))))) (.f64 (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im))) (+.f64 #s(literal 0 binary64) (-.f64 (.f64 re re) (*.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re))))))
(/.f64 (+.f64 (.f64 (sqrt.f64 (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im))))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re))) (.f64 (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im))) (-.f64 #s(literal 0 binary64) (.f64 re re)))) (.f64 (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im))) (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re)))))) (.f64 (/.f64 (.f64 re re) (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re)))) (hypot.f64 (.f64 re (.f64 re re)) (.f64 im (.f64 im im))))) (.f64 (/.f64 (.f64 re re) (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re)))) (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (*.f64 re re)))))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im)))) (.f64 (/.f64 (.f64 re re) (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re)))) (sqrt.f64 (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im))))))) (.f64 (/.f64 (.f64 re re) (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re)))) (sqrt.f64 (-.f64 (.f64 re re) (*.f64 im im)))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re)))))) (.f64 (/.f64 re (-.f64 #s(literal 0 binary64) (.f64 re re))) (hypot.f64 (.f64 re (.f64 re re)) (.f64 im (.f64 im im))))) (.f64 (/.f64 re (-.f64 #s(literal 0 binary64) (.f64 re re))) (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (*.f64 re re)))))))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im)))) (.f64 (/.f64 re (-.f64 #s(literal 0 binary64) (.f64 re re))) (sqrt.f64 (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im))))))) (.f64 (/.f64 re (-.f64 #s(literal 0 binary64) (.f64 re re))) (sqrt.f64 (-.f64 (.f64 re re) (*.f64 im im)))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 re re)) (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re)))))) (.f64 re (hypot.f64 (.f64 re (.f64 re re)) (.f64 im (.f64 im im))))) (.f64 re (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re)))))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 re re)) (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im)))) (.f64 re (sqrt.f64 (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im))))))) (.f64 re (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im)))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))) (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re)))))) (.f64 (.f64 re re) (hypot.f64 (.f64 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 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 re re))) (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re)))))) (.f64 (-.f64 #s(literal 0 binary64) re) (hypot.f64 (.f64 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 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 re re))) (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im)))) (.f64 (-.f64 #s(literal 0 binary64) re) (sqrt.f64 (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im))))))) (.f64 (-.f64 #s(literal 0 binary64) re) (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im)))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re)))) (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re)))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 re re)) (hypot.f64 (.f64 re (.f64 re re)) (.f64 im (.f64 im im))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 re re)) (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (*.f64 re re)))))))
(/.f64 (+.f64 (.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re)))) (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im)))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 re re)) (sqrt.f64 (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im))))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 re re)) (sqrt.f64 (-.f64 (.f64 re re) (*.f64 im im)))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))) (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re)))))) (.f64 (+.f64 #s(literal 0 binary64) (-.f64 (.f64 re re) (.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re)))) (hypot.f64 (.f64 re (.f64 re re)) (.f64 im (.f64 im im))))) (.f64 (+.f64 #s(literal 0 binary64) (-.f64 (.f64 re re) (.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re)))) (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (*.f64 re re)))))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re re))) (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im)))) (.f64 (+.f64 #s(literal 0 binary64) (-.f64 (.f64 re re) (.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re)))) (sqrt.f64 (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im))))))) (.f64 (+.f64 #s(literal 0 binary64) (-.f64 (.f64 re re) (.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re)))) (sqrt.f64 (-.f64 (.f64 re re) (*.f64 im im)))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 re re)) (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re)))))) (.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re)) (hypot.f64 (.f64 re (.f64 re re)) (.f64 im (.f64 im im))))) (.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re)) (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re)))))))
(/.f64 (+.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 re re)) (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im)))) (.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re)) (sqrt.f64 (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im))))))) (.f64 (-.f64 #s(literal 0 binary64) (-.f64 #s(literal 0 binary64) re)) (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im)))))
(/.f64 (-.f64 (.f64 (hypot.f64 (.f64 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)))
(/.f64 (-.f64 (.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 re (+.f64 re (hypot.f64 re im))))) (.f64 (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 re (+.f64 re (hypot.f64 re im)))) (.f64 re (.f64 re re)))) (.f64 (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 re (+.f64 re (hypot.f64 re im)))) (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im))))))
(/.f64 (-.f64 (.f64 (+.f64 (.f64 re re) (.f64 im im)) (+.f64 re (hypot.f64 re im))) (.f64 (+.f64 re (hypot.f64 re im)) (.f64 re re))) (.f64 (+.f64 re (hypot.f64 re im)) (+.f64 re (hypot.f64 re im))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re))))) (neg.f64 (neg.f64 (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (*.f64 re (+.f64 re (hypot.f64 re im)))))))
(/.f64 (neg.f64 (neg.f64 (-.f64 (+.f64 (.f64 re re) (.f64 im im)) (*.f64 re re)))) (neg.f64 (neg.f64 (+.f64 re (hypot.f64 re im)))))
(pow.f64 (/.f64 (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 re (+.f64 re (hypot.f64 re im)))) (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (*.f64 re re)))) #s(literal -1 binary64))
(pow.f64 (/.f64 (+.f64 re (hypot.f64 re im)) (-.f64 (+.f64 (.f64 re re) (.f64 im im)) (*.f64 re re))) #s(literal -1 binary64))
(.f64 (-.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 3/2 binary64)) (.f64 re (.f64 re re))) (/.f64 #s(literal 1 binary64) (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 re (+.f64 re (hypot.f64 re im))))))
(.f64 (-.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 re re)) (/.f64 #s(literal 1 binary64) (+.f64 re (hypot.f64 re im))))
(exp.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 (.f64 re re) (*.f64 im im)))))
(hypot.f64 re im)
(hypot.f64 im re)
(fabs.f64 (hypot.f64 re im))
(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re)))) (+.f64 (.f64 (.f64 re (.f64 re re)) (.f64 re (.f64 re re))) (.f64 (.f64 im im) (.f64 im (.f64 im (*.f64 im im))))))))
(/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 (-.f64 (.f64 re re) (.f64 im im)) (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im)))))))
(/.f64 (hypot.f64 (.f64 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 (hypot.f64 (.f64 re (.f64 re re)) (.f64 im (.f64 im im))) (sqrt.f64 (+.f64 (.f64 im (.f64 im (.f64 im im))) (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 re (.f64 re (*.f64 im im)))))))
(/.f64 (sqrt.f64 (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im))))) (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im))))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (.f64 (.f64 re (.f64 re re)) (.f64 re (.f64 re re))) (.f64 (.f64 im im) (.f64 im (.f64 im (.f64 im im))))))) (sqrt.f64 (neg.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (*.f64 re re)))))))
(/.f64 (sqrt.f64 (neg.f64 (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im)))))) (sqrt.f64 (neg.f64 (-.f64 (.f64 re re) (.f64 im im)))))
(/.f64 (sqrt.f64 (-.f64 (.f64 im (.f64 im (.f64 im im))) (.f64 re (.f64 re (.f64 re re))))) (sqrt.f64 (-.f64 (.f64 im im) (.f64 re re))))
(/.f64 (neg.f64 (hypot.f64 (.f64 re (.f64 re re)) (.f64 im (.f64 im im)))) (neg.f64 (sqrt.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (*.f64 re re)))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im)))))) (neg.f64 (sqrt.f64 (-.f64 (.f64 re re) (.f64 im im)))))
(pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 1/2 binary64))
(pow.f64 (hypot.f64 re im) #s(literal 1 binary64))
(pow.f64 (.f64 (+.f64 (.f64 re re) (.f64 im im)) (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(.f64 (hypot.f64 (.f64 re (.f64 re re)) (.f64 im (.f64 im im))) (pow.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re))))) #s(literal 1/2 binary64)))
(.f64 (hypot.f64 (.f64 re (.f64 re re)) (.f64 im (.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re)))))))
(.f64 (sqrt.f64 (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im))))) (pow.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.f64 re re) (*.f64 im im))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 im (.f64 im (.f64 im im))))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (-.f64 (.f64 re re) (*.f64 im im)))))
(.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (.f64 re re) (*.f64 im im)) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (hypot.f64 re im)) (sqrt.f64 (hypot.f64 re im)))
(*.f64 im #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) im)
(+.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 re (/.f64 im re)))
(+.f64 (/.f64 re (/.f64 im re)) (*.f64 re #s(literal -2 binary64)))
(fma.f64 re (/.f64 re im) (*.f64 re #s(literal -2 binary64)))
(fma.f64 re #s(literal -2 binary64) (/.f64 re (/.f64 im re)))
(fma.f64 (.f64 re re) (/.f64 #s(literal 1 binary64) im) (.f64 re #s(literal -2 binary64)))
(fma.f64 (/.f64 re im) re (*.f64 re #s(literal -2 binary64)))
(fma.f64 #s(literal -2 binary64) re (/.f64 re (/.f64 im 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 re #s(literal -2 binary64)) (.f64 re #s(literal -2 binary64))) (-.f64 (.f64 (.f64 re re) (/.f64 (.f64 re re) (.f64 im im))) (.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 re (/.f64 im re))))))
(/.f64 (-.f64 (.f64 (.f64 re #s(literal -2 binary64)) (.f64 re #s(literal -2 binary64))) (.f64 (.f64 re re) (/.f64 (.f64 re re) (.f64 im im)))) (-.f64 (.f64 re #s(literal -2 binary64)) (/.f64 re (/.f64 im re))))
(/.f64 (.f64 re (+.f64 #s(literal -8 binary64) (/.f64 (.f64 re (.f64 re re)) (.f64 im (*.f64 im im))))) (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 re im) #s(literal -2 binary64)) (/.f64 im re))))
(/.f64 (.f64 re (-.f64 #s(literal 4 binary64) (/.f64 (.f64 re re) (*.f64 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 re re) (*.f64 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 re #s(literal -2 binary64)) (.f64 re #s(literal -2 binary64))) (-.f64 (.f64 (.f64 re re) (/.f64 (.f64 re re) (.f64 im im))) (.f64 (*.f64 re #s(literal -2 binary64)) (/.f64 re (/.f64 im re)))))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 re #s(literal -2 binary64)) (.f64 re #s(literal -2 binary64))) (.f64 (.f64 re re) (/.f64 (.f64 re re) (.f64 im im))))) (neg.f64 (-.f64 (.f64 re #s(literal -2 binary64)) (/.f64 re (/.f64 im re)))))
(/.f64 (neg.f64 (.f64 re (+.f64 #s(literal -8 binary64) (/.f64 (.f64 re (.f64 re re)) (.f64 im (*.f64 im im)))))) (neg.f64 (+.f64 #s(literal 4 binary64) (/.f64 (-.f64 (/.f64 re im) #s(literal -2 binary64)) (/.f64 im re)))))
(/.f64 (neg.f64 (.f64 re (-.f64 #s(literal 4 binary64) (/.f64 (.f64 re re) (*.f64 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 re re) (*.f64 im im))) re)) (neg.f64 (-.f64 #s(literal -2 binary64) (/.f64 re im))))
(*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))
(*.f64 (+.f64 (/.f64 re im) #s(literal -2 binary64)) re)
(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 (-.f64 #s(literal 0 binary64) im) #s(literal 2 binary64))
(pow.f64 (exp.f64 (log.f64 im)) #s(literal 2 binary64))
(*.f64 im im)
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 0 binary64) im))
(*.f64 (exp.f64 (log.f64 im)) (exp.f64 (log.f64 im)))
(+.f64 (*.f64 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 (.f64 (.f64 re (.f64 re 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 #s(literal 0 binary64) (.f64 (.f64 re (.f64 re 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 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)))
(/.f64 (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 re (.f64 re (.f64 re re))))) (neg.f64 (-.f64 #s(literal 0 binary64) (.f64 re re))))
(/.f64 (neg.f64 (+.f64 (.f64 (.f64 re (.f64 re re)) (.f64 re (.f64 re re))) #s(literal 0 binary64))) (neg.f64 (+.f64 (.f64 re (.f64 re (.f64 re re))) (-.f64 #s(literal 0 binary64) (.f64 (.f64 re re) #s(literal 0 binary64))))))
(/.f64 (neg.f64 (+.f64 #s(literal 0 binary64) (.f64 (.f64 re (.f64 re re)) (.f64 re (.f64 re re))))) (neg.f64 (+.f64 #s(literal 0 binary64) (-.f64 (.f64 re (.f64 re (.f64 re re))) (.f64 #s(literal 0 binary64) (.f64 re re))))))
(/.f64 (neg.f64 (-.f64 (.f64 re (.f64 re (.f64 re re))) #s(literal 0 binary64))) (-.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))
(*.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)))

simplify367.0ms (3.9%)

Algorithm

1×	egg-herbie

Rules

6820×	`-lowering-.f32`
6820×	`-lowering-.f64`
3064×	`+-lowering-+.f64`
3064×	`+-lowering-+.f32`
1642×	`*-commutative`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	1666	9871
1	5745	9482
0	8131	9482

Stop Event

1×	iter limit
1×	node limit

Counts

540 → 540

Calls

Call 1

Inputs
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* (sqrt im) (sqrt 2))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(* im (sqrt (/ 1 re)))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (* im (sqrt (/ 1 re))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re)))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* -1/128 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re))))))
(* -2 (* (sqrt re) (sqrt -1)))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* im (sqrt (/ 1 re)))
(* im (+ (sqrt (/ 1 re)) (* -1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* 7/128 (* (pow im 2) (sqrt (/ 1 (pow re 9)))))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* (pow im 2) (+ (* -33/1024 (* (pow im 2) (sqrt (/ 1 (pow re 13))))) (* 7/128 (sqrt (/ 1 (pow re 9))))))))))
(* (sqrt im) (sqrt 2))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt 2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(pow (* 2 im) 1/16)
(+ (* -1/16 (* (pow (/ 2 (pow im 15)) 1/16) re)) (pow (* 2 im) 1/16))
(+ (* re (+ (* -1/16 (pow (/ 2 (pow im 15)) 1/16)) (* 1/512 (* (pow (/ 2 (pow im 31)) 1/16) re)))) (pow (* 2 im) 1/16))
(+ (* re (+ (* -1/16 (pow (/ 2 (pow im 15)) 1/16)) (* re (+ (* 1/512 (pow (/ 2 (pow im 31)) 1/16)) (* 85/8192 (* (pow (/ 2 (pow im 47)) 1/16) re)))))) (pow (* 2 im) 1/16))
(exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2)))))
(+ (exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2))))) (* -1/64 (/ (* (pow im 2) (exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))))
(+ (exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/64 (/ (* (pow im 2) (exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/8192 (pow im 4)) (* 1/384 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))
(+ (exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/64 (/ (* (pow im 2) (exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/24576 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/1572864 (pow im 6)) (* 1/11520 (+ (* -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/16 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/8192 (pow im 4)) (* 1/384 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))
(exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re))))))
(+ (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re)))))) (* 1/64 (/ (* (pow im 2) (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))))
(+ (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/64 (/ (* (pow im 2) (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (/ (* (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/8192 (pow im 4)) (* 1/384 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))
(+ (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/64 (/ (* (pow im 2) (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/1572864 (pow im 6)) (+ (* 1/24576 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))))) (* 1/11520 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/8192 (pow im 4)) (* 1/384 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))
(exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im)))))
(+ (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im))))) (* -1/64 (/ (* (pow im 2) (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 2))))
(+ (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/64 (/ (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* 49/8192 (/ (* (pow im 2) (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 4))))))
(+ (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/64 (/ (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* (pow im 2) (+ (* -1755/524288 (/ (* (pow im 2) (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 6))) (* 49/8192 (/ (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 4))))))))
(exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im))))))
(+ (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im)))))) (* -1/16 (/ (* re (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))
(+ (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/16 (/ (* re (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/512 (pow re 2)) (* 1/32 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))
(+ (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/16 (/ (* re (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/512 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/24576 (pow re 3)) (* 1/96 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) (pow im 3)) (/ (* (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/512 (pow re 2)) (* 1/32 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))
(exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im))))))
(+ (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im)))))) (* 1/16 (/ (* re (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))
(+ (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/512 (pow re 2)) (* 1/32 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* -1/16 (* re (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(+ (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* -1/512 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/24576 (pow re 3)) (* 1/96 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) im)) (* (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/512 (pow re 2)) (* 1/32 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* -1/16 (* re (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(* 2 im)
(+ (* -2 re) (* 2 im))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(/ (pow im 2) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(* -4 re)
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(/ (pow im 2) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(* 2 im)
(* im (+ 2 (* -2 (/ re im))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(* -2 im)
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* -1/2 (* im (sqrt (/ 1 re))))
(* -1/2 (* im (sqrt (/ 1 re))))
(* -1/2 (* im (sqrt (/ 1 re))))
(* -1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* -1 (* im (sqrt (/ 1 re))))
(* -1 (* im (sqrt (/ 1 re))))
(* -1 (* im (sqrt (/ 1 re))))
(* -1 (* im (sqrt (/ 1 re))))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* im (sqrt (/ 1 re)))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ re im)
(/ re im)
(/ re im)
(/ re im)
(/ re im)
(/ re im)
(/ re im)
(/ re im)
(/ re im)
(/ re im)
(/ re im)
(/ re im)
(/ re im)
(/ re im)
(/ re im)
(/ re im)
(/ re im)
(/ re im)
(/ re im)
(/ re im)
(/ re im)
(/ re im)
(/ re im)
(/ re im)
(* 1/2 (* (sqrt (/ 1 im)) re))
(/ (+ (* -1/2 (sqrt (pow im 3))) (* 1/2 (* (sqrt im) re))) im)
(/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* -1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re)))))) im)
(/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* -1/2 (sqrt (/ 1 im))) (* im (+ (* -1/4 (* (sqrt (/ 1 im)) (/ 1 re))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 re)))))))) im)
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(* -1 (* im (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))))
(* 1/2 (* (sqrt (/ 1 im)) re))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im)))))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* 1/2 (sqrt (/ 1 im))))))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (+ (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3)))) (* 1/2 (sqrt (/ 1 im)))))))
(* -1/2 (* (sqrt (/ 1 im)) re))
(* -1 (* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (- (* 2 im) im) re))) (* 1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (sqrt im) (- (* 2 im) im))) (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re)))) re)) (* 1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))
(* (sqrt (/ 1 im)) re)
(/ (+ (* -1 (sqrt (pow im 3))) (* (sqrt im) re)) im)
(/ (+ (* (sqrt im) re) (* (pow im 2) (+ (* -1 (sqrt (/ 1 im))) (* (sqrt im) (/ 1 re))))) im)
(/ (+ (* (sqrt im) re) (* (pow im 2) (+ (* -1 (sqrt (/ 1 im))) (* im (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 re))) (* (sqrt (/ 1 im)) (/ 1 re))))))) im)
(* (sqrt im) (sqrt 2))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(* (sqrt im) (sqrt 2))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(* (sqrt (/ 1 im)) re)
(* re (+ (sqrt (/ 1 im)) (* -1 (* (sqrt im) (/ 1 re)))))
(* re (+ (sqrt (/ 1 im)) (+ (* -1 (* (sqrt im) (/ 1 re))) (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))))))
(* re (+ (sqrt (/ 1 im)) (+ (* -1 (* (sqrt im) (/ 1 re))) (+ (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3))))))))
(* -1 (* (sqrt (/ 1 im)) re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (* (sqrt im) (/ 1 re))))))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (sqrt im) (* -1/2 (* (sqrt im) (/ (- (* 2 im) im) re)))) re)))))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (sqrt im) (* -1 (/ (+ (* 1/2 (* (sqrt im) (- (* 2 im) im))) (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re)))) re))) re)))))
(* (sqrt im) (/ 1 re))
(+ (* (sqrt im) (/ 1 re)) (* (sqrt (pow im 3)) (/ 1 (pow re 2))))
(+ (* (sqrt im) (/ 1 re)) (* (pow im 2) (+ (* (sqrt im) (/ 1 (pow re 3))) (* (sqrt (/ 1 im)) (/ 1 (pow re 2))))))
(+ (* (sqrt im) (/ 1 re)) (* (pow im 2) (+ (* im (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (pow re 3)))) (* (sqrt (/ 1 im)) (/ 1 (pow re 3))))) (* (sqrt (/ 1 im)) (/ 1 (pow re 2))))))
(* (sqrt (/ 1 im)) (sqrt 1/2))
(+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 1/2)))) (* (sqrt (/ 1 im)) (sqrt 1/2)))
(+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (+ (* -1/2 (pow re 2)) (* 1/4 (pow re 2))) (sqrt 1/2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 1/2)))) (* (sqrt (/ 1 im)) (sqrt 1/2))))
(+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (+ (* -1/2 (pow re 2)) (* 1/4 (pow re 2))) (sqrt 1/2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 7))) (/ (+ (* 1/16 (/ (* im (pow re 2)) (pow (sqrt 1/2) 2))) (+ (* 1/4 (pow re 3)) (* re (+ (* -1/2 (pow re 2)) (* 1/4 (pow re 2)))))) (sqrt 1/2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 1/2)))) (* (sqrt (/ 1 im)) (sqrt 1/2)))))
(* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt -1/2)))
(+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -1/2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt -1/2))))
(+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -1/2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (sqrt -1) (+ (* -1/4 (pow re 2)) (* 1/2 (pow re 2)))) (sqrt -1/2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt -1/2)))))
(+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (/ (* (sqrt -1) (+ (* -1/4 (pow re 2)) (* 1/2 (pow re 2)))) (sqrt -1/2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* (sqrt -1) (+ (* -1 (* re (+ (* -1/4 (pow re 2)) (* 1/2 (pow re 2))))) (+ (* -1/16 (/ (* im (pow re 2)) (pow (sqrt -1/2) 2))) (* 1/4 (pow re 3))))) (sqrt -1/2))))) (pow im 3))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -1/2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt -1/2)))))
(* (sqrt (/ 1 im)) (sqrt 1/2))
(+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 1/2)))) (* (sqrt (/ 1 im)) (sqrt 1/2)))
(+ (* re (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ 1 (sqrt 1/2)))) (* 1/2 (* (sqrt im) (/ (* re (- (* 1/4 (/ 1 (pow im 3))) (* 1/16 (/ 1 (* (pow im 3) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))) (* (sqrt (/ 1 im)) (sqrt 1/2)))
(+ (* re (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ 1 (sqrt 1/2)))) (* re (+ (* -1/8 (* (sqrt (/ 1 im)) (/ (* re (- (* 1/4 (/ 1 (pow im 3))) (* 1/16 (/ 1 (* (pow im 3) (pow (sqrt 1/2) 2)))))) (pow (sqrt 1/2) 3)))) (* 1/2 (* (sqrt im) (/ (- (* 1/4 (/ 1 (pow im 3))) (* 1/16 (/ 1 (* (pow im 3) (pow (sqrt 1/2) 2))))) (sqrt 1/2)))))))) (* (sqrt (/ 1 im)) (sqrt 1/2)))
(* (sqrt im) (/ 1 re))
(/ (+ (sqrt im) (* (sqrt (pow im 3)) (/ 1 re))) re)
(/ (+ (sqrt im) (+ (* -1/2 (* (sqrt (/ 1 im)) (/ (+ (* -4 (pow im 3)) (+ (* 2 (pow im 3)) (pow im 3))) (pow re 2)))) (* (sqrt (pow im 3)) (/ 1 re)))) re)
(/ (+ (sqrt im) (+ (* -1/2 (* (sqrt (/ 1 im)) (/ (+ (* -4 (pow im 3)) (+ (* 2 (pow im 3)) (pow im 3))) (pow re 2)))) (+ (* -1/2 (* (sqrt (/ 1 im)) (/ (+ (* -1 (* im (+ (* -4 (pow im 3)) (+ (* 2 (pow im 3)) (pow im 3))))) (+ (* 2 (* im (+ (* -4 (pow im 3)) (* 2 (pow im 3))))) (* 4 (pow im 4)))) (pow re 3)))) (* (sqrt (pow im 3)) (/ 1 re))))) re)
(* -1 (* (sqrt im) (/ 1 re)))
(* -1 (/ (+ (sqrt im) (* (sqrt (pow im 3)) (/ 1 re))) re))
(* -1 (/ (+ (sqrt im) (* -1 (/ (+ (* -1 (sqrt (pow im 3))) (* 1/2 (* (sqrt (/ 1 im)) (/ (+ (* -4 (pow im 3)) (+ (* 2 (pow im 3)) (pow im 3))) re)))) re))) re))
(* -1 (/ (+ (sqrt im) (* -1 (/ (+ (* -1 (sqrt (pow im 3))) (* -1 (/ (+ (* -1/2 (* (sqrt (/ 1 im)) (+ (* -4 (pow im 3)) (+ (* 2 (pow im 3)) (pow im 3))))) (* 1/2 (* (sqrt (/ 1 im)) (/ (+ (* -4 (pow im 4)) (+ (* -2 (* im (+ (* -4 (pow im 3)) (* 2 (pow im 3))))) (* im (+ (* -4 (pow im 3)) (+ (* 2 (pow im 3)) (pow im 3)))))) re)))) re))) re))) re))
(/ im (pow re 2))
(* im (+ (* 2 (/ im (pow re 3))) (/ 1 (pow re 2))))
(* im (+ (* im (+ (* 2 (/ im (pow re 4))) (* 2 (/ 1 (pow re 3))))) (/ 1 (pow re 2))))
(* im (+ (* im (+ (* im (+ (* -4 (/ (pow im 2) (pow re 6))) (* 2 (/ 1 (pow re 4))))) (* 2 (/ 1 (pow re 3))))) (/ 1 (pow re 2))))
(/ 1/2 im)
(/ (+ 1/2 (* 1/2 (/ re im))) im)
(/ (- (+ 1/2 (* -1 (/ (+ (* -1/2 (pow re 2)) (* 1/4 (pow re 2))) (pow im 2)))) (* -1/2 (/ re im))) im)
(/ (- (+ 1/2 (* -1 (/ (+ (* 1/4 (pow re 3)) (* re (+ (* -1/2 (pow re 2)) (* 1/4 (pow re 2))))) (pow im 3)))) (+ (* -1/2 (/ re im)) (+ (* -1/2 (/ (pow re 2) (pow im 2))) (* 1/4 (/ (pow re 2) (pow im 2)))))) im)
(/ 1/2 im)
(* -1 (/ (- (* -1/2 (/ re im)) 1/2) im))
(* -1 (/ (- (* -1 (/ (- (+ (* -1/4 (/ (pow re 2) im)) (* 1/2 (/ (pow re 2) im))) (* -1/2 re)) im)) 1/2) im))
(* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* re (+ (* -1/4 (pow re 2)) (* 1/2 (pow re 2)))) im)) (* 1/4 (/ (pow re 3) im))) (+ (* -1/4 (pow re 2)) (* 1/2 (pow re 2)))) im)) (* -1/2 re)) im)) 1/2) im))
(/ 1/2 im)
(+ (* 1/2 (/ re (pow im 2))) (* 1/2 (/ 1 im)))
(+ (* re (+ (* 1/4 (/ re (pow im 3))) (* 1/2 (/ 1 (pow im 2))))) (* 1/2 (/ 1 im)))
(+ (* re (+ (* re (+ (* -1/8 (/ (pow re 2) (pow im 5))) (* 1/4 (/ 1 (pow im 3))))) (* 1/2 (/ 1 (pow im 2))))) (* 1/2 (/ 1 im)))
(/ im (pow re 2))
(/ (+ im (* 2 (/ (pow im 2) re))) (pow re 2))
(/ (- (+ im (* -1 (/ (+ (* -4 (pow im 3)) (* 2 (pow im 3))) (pow re 2)))) (* -2 (/ (pow im 2) re))) (pow re 2))
(/ (- (+ im (* -1 (/ (+ (* 2 (* im (+ (* -4 (pow im 3)) (* 2 (pow im 3))))) (* 4 (pow im 4))) (pow re 3)))) (+ (* -4 (/ (pow im 3) (pow re 2))) (+ (* -2 (/ (pow im 2) re)) (* 2 (/ (pow im 3) (pow re 2)))))) (pow re 2))
(/ im (pow re 2))
(/ (+ im (* 2 (/ (pow im 2) re))) (pow re 2))
(/ (+ im (* -1 (/ (- (+ (* -4 (/ (pow im 3) re)) (* 2 (/ (pow im 3) re))) (* 2 (pow im 2))) re))) (pow re 2))
(/ (+ im (* -1 (/ (- (* -1 (/ (- (+ (* -4 (/ (pow im 4) re)) (* -2 (/ (* im (+ (* -4 (pow im 3)) (* 2 (pow im 3)))) re))) (+ (* -4 (pow im 3)) (* 2 (pow im 3)))) re)) (* 2 (pow im 2))) re))) (pow re 2))
(* (sqrt re) (sqrt -1))
(+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt -1)))
(+ (* (sqrt re) (sqrt -1)) (* (pow im 2) (+ (* -1/128 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 7))))) (* 1/8 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))))))
(+ (* (sqrt re) (sqrt -1)) (* (pow im 2) (+ (* 1/8 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))) (* (pow im 2) (+ (* -1/128 (* (sqrt (/ 1 (pow re 7))) (sqrt -1))) (* 1/1024 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 11))))))))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))
(* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))
(* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (+ (* 2 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))))
(* -1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))
(* -1 (* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))))
(* -1 (* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (+ (* 2 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (/ (sqrt -1) im) (sqrt (pow re 5)))) re)
(/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (pow re 3) (+ (* -1 (* (/ (sqrt -1) (pow im 3)) (sqrt (pow re 3)))) (* (/ (sqrt -1) im) (sqrt (/ 1 re)))))) re)
(/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (pow re 3) (+ (* (/ (sqrt -1) im) (sqrt (/ 1 re))) (* (pow re 3) (+ (* -1 (* (/ (sqrt -1) (pow im 3)) (sqrt (/ 1 (pow re 3))))) (* 2 (* (/ (sqrt -1) (pow im 5)) (sqrt re)))))))) re)
(* (sqrt re) (sqrt -1))
(* re (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1))))
(* re (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(* re (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/1024 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 (pow re 13))))) (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* (sqrt re) (sqrt -1)))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(* -1 (* re (+ (* -1 (/ (+ (* 1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (pow re 3)))) (* -1/1024 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 re))))) (pow re 3))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(* (sqrt re) (sqrt -4))
(+ (* -1/2 (* (/ (pow im 2) (sqrt -4)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt -4)))
(+ (* (sqrt re) (sqrt -4)) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt -4)))) (* -1/8 (* (/ (pow im 2) (pow (sqrt -4) 3)) (sqrt (/ 1 (pow re 7))))))))
(+ (* (sqrt re) (sqrt -4)) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt -4)))) (* (pow im 2) (+ (* -1/8 (* (sqrt (/ 1 (pow re 7))) (/ 1 (pow (sqrt -4) 3)))) (* -1/16 (* (/ (pow im 2) (pow (sqrt -4) 5)) (sqrt (/ 1 (pow re 11))))))))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* im (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1))))
(* im (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -2 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(* im (+ (* -4 (* (/ 1 (* (pow im 6) (pow (sqrt -1) 5))) (sqrt (pow re 11)))) (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -2 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* -1 (* im (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(* -1 (* im (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -2 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* im (+ (* -4 (* (/ 1 (* (pow im 6) (pow (sqrt -1) 5))) (sqrt (pow re 11)))) (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -2 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* (sqrt (/ 1 re)) (sqrt -1)))))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(/ (+ (* -2 (* (/ 1 (* im (sqrt -1))) (sqrt (pow re 5)))) (* (* im (sqrt -1)) (sqrt re))) re)
(/ (+ (* (* im (sqrt -1)) (sqrt re)) (* (pow re 3) (+ (* -2 (* (/ 1 (* im (sqrt -1))) (sqrt (/ 1 re)))) (* -2 (* (/ 1 (* (pow im 3) (pow (sqrt -1) 3))) (sqrt (pow re 3))))))) re)
(/ (+ (* (* im (sqrt -1)) (sqrt re)) (* (pow re 3) (+ (* -2 (* (/ 1 (* im (sqrt -1))) (sqrt (/ 1 re)))) (* (pow re 3) (+ (* -4 (* (/ 1 (* (pow im 5) (pow (sqrt -1) 5))) (sqrt re))) (* -2 (* (/ 1 (* (pow im 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (pow re 3)))))))))) re)
(* (sqrt re) (sqrt -4))
(* re (+ (* -1/2 (* (/ (pow im 2) (sqrt -4)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -4))))
(* re (+ (* -1/2 (* (/ (pow im 2) (sqrt -4)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/8 (* (/ (pow im 4) (pow (sqrt -4) 3)) (sqrt (/ 1 (pow re 9))))) (* (sqrt (/ 1 re)) (sqrt -4)))))
(* re (+ (* -1/2 (* (/ (pow im 2) (sqrt -4)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/8 (* (/ (pow im 4) (pow (sqrt -4) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* -1/16 (* (/ (pow im 6) (pow (sqrt -4) 5)) (sqrt (/ 1 (pow re 13))))) (* (sqrt (/ 1 re)) (sqrt -4))))))
(* -2 (* (sqrt re) (sqrt -1)))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* re (+ (* -1 (/ (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (pow re 3)))) (* -1/512 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 re))))) (pow re 3))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(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) (+ (* -3/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) (+ (* -3/512 (pow (/ -4 (pow re 15)) 1/4)) (* 7/8192 (* (pow (/ -4 (pow re 23)) 1/4) (pow im 2))))))) (pow (* -4 re) 1/4))
(exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im))))))
(+ (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))) (/ (* (pow re 2) (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im))))))) (pow im 2)))
(+ (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))) (+ (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))) (+ (* -2 (pow re 4)) (* 1/2 (pow re 4)))) (pow im 4)) (/ (* (pow re 2) (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im))))))) (pow im 2))))
(+ (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))) (+ (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))) (+ (* -2 (pow re 4)) (* 1/2 (pow re 4)))) (pow im 4)) (+ (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))) (+ (* -2 (pow re 6)) (+ (* 1/6 (pow re 6)) (* 16/3 (pow re 6))))) (pow im 6)) (/ (* (pow re 2) (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im))))))) (pow im 2)))))
(exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im))))))
(+ (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))) (/ (* (pow re 2) (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im))))))) (pow im 2)))
(+ (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))) (+ (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))) (+ (* -2 (pow re 4)) (* 1/2 (pow re 4)))) (pow im 4)) (/ (* (pow re 2) (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im))))))) (pow im 2))))
(+ (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))) (+ (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))) (+ (* -2 (pow re 4)) (* 1/2 (pow re 4)))) (pow im 4)) (+ (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))) (+ (* -2 (pow re 6)) (+ (* 1/6 (pow re 6)) (* 16/3 (pow re 6))))) (pow im 6)) (/ (* (pow re 2) (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im))))))) (pow im 2)))))
(exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re)))))
(+ (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re))))) (/ (* (pow re 2) (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re)))))) (pow im 2)))
(+ (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re))))) (* (pow re 2) (+ (* -3/2 (/ (* (pow re 2) (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re)))))) (pow im 4))) (/ (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re))))) (pow im 2)))))
(+ (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re))))) (* (pow re 2) (+ (* (pow re 2) (+ (* -3/2 (/ (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re))))) (pow im 4))) (* 7/2 (/ (* (pow re 2) (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re)))))) (pow im 6))))) (/ (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re))))) (pow im 2)))))
(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/128 (pow im 4)) (* 1/512 (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/128 (pow im 4)) (* 1/512 (pow im 4)))) (pow re 4)) (/ (* (exp (* 1/4 (+ (log -4) (* -1 (log (/ 1 re)))))) (+ (* -1/2048 (pow im 6)) (+ (* 1/24576 (pow im 6)) (* 1/768 (pow im 6))))) (pow re 6)))))
(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/128 (pow im 4)) (* 1/512 (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/128 (pow im 4)) (* 1/512 (pow im 4)))) (pow re 4)) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* -1/2048 (pow im 6)) (+ (* 1/24576 (pow im 6)) (* 1/768 (pow im 6))))) (pow re 6)))))
(* -4 re)
(+ (* -4 re) (* -1 (/ (pow im 2) re)))
(+ (* -4 re) (* -1 (/ (pow im 2) re)))
(+ (* -4 re) (* -1 (/ (pow im 2) re)))
(* -1 (/ (pow im 2) re))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(* -1 (/ (pow im 2) re))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(* -1 (/ (pow im 2) re))
(/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)
(/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)
(/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)
(* -4 re)
(* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))
(* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))
(* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))
(* -4 re)
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
im
(+ im (* -1 re))
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(* 1/2 (/ (pow im 2) re))
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)
(* -2 re)
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(* 1/2 (/ (pow im 2) re))
(* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
im
(* im (+ 1 (* -1 (/ re im))))
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))
(* -1 im)
(* -1 (* im (+ 1 (/ re im))))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
im
(+ im (* 1/2 (/ (pow re 2) im)))
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
im
(* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* -2 re)
(* re (- (/ re im) 2))
(* re (- (/ re im) 2))
(* re (- (/ re im) 2))
(/ (pow re 2) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(/ (pow re 2) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(/ (pow re 2) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(* -2 re)
(+ (* -2 re) (/ (pow re 2) im))
(+ (* -2 re) (/ (pow re 2) im))
(+ (* -2 re) (/ (pow re 2) im))
(* -2 re)
(+ (* -2 re) (/ (pow re 2) im))
(+ (* -2 re) (/ (pow re 2) im))
(+ (* -2 re) (/ (pow re 2) im))
(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 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)

Outputs
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) re))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (.f64 #s(literal 1/16 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (.f64 re (+.f64 (.f64 #s(literal 1/32 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))))) (.f64 #s(literal 1/16 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (*.f64 im im)))))))))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))
(+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))
(+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im (.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (.f64 #s(literal 1/64 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))))))
(+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))))
(+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im (.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (.f64 #s(literal 1/64 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))))) (.f64 #s(literal -1/1024 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (.f64 (pow.f64 im #s(literal 5 binary64)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 re)) (*.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im)))) (.f64 #s(literal 1/2 binary64) (.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/32 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))))) (.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))))
(.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/32 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))) (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im)))) (.f64 #s(literal 1/64 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (.f64 (pow.f64 im #s(literal 4 binary64)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 2 binary64))))))) (.f64 re (.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))))
(.f64 im (+.f64 (.f64 #s(literal -1/32 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im im)) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re)))))))
(.f64 im (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im im)) (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/256 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64))))))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2))))))))))
(.f64 im (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 im im)) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/256 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 5 binary64))))) (.f64 re re))) (/.f64 #s(literal 5/128 binary64) (pow.f64 re #s(literal 7 binary64))))) (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 re)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (/.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/256 binary64) (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 5 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(.f64 im (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(.f64 im (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (+.f64 (.f64 #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 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(.f64 im (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (+.f64 (+.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 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 #s(literal -1/16 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(.f64 (.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 #s(literal 0 binary64) (.f64 im (+.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))))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(-.f64 #s(literal 0 binary64) (.f64 im (+.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 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(.f64 (-.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 (sqrt.f64 #s(literal -1 binary64)) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))) #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 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(-.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.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 (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(+.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (-.f64 (.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (.f64 im #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 re (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (.f64 im #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (* im (sqrt (/ 1 re))))
(+.f64 (.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (.f64 #s(literal -1/8 binary64) (.f64 im (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re)))))
(+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 im (.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (+.f64 (.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(+ (* -1/8 (* (pow im 3) (sqrt (/ 1 (pow re 5))))) (+ (* -1/128 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (+ (* 1/16 (* (pow im 5) (sqrt (/ 1 (pow re 9))))) (* im (sqrt (/ 1 re))))))
(+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (.f64 im (.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (+.f64 (+.f64 (.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))) (.f64 (*.f64 #s(literal -1/128 binary64) (pow.f64 im #s(literal 5 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))
(* -2 (* (sqrt re) (sqrt -1)))
(.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -1 binary64)))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im)))) (.f64 #s(literal 2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))) (.f64 (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) #s(literal 1/4 binary64))) (.f64 re (.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))) (+.f64 (.f64 (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) #s(literal 1/4 binary64)) (.f64 (.f64 #s(literal 1/64 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))))) (.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (+ (sqrt (/ 1 re)) (* -1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))
(.f64 im (+.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)))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* 7/128 (* (pow im 2) (sqrt (/ 1 (pow re 9)))))))))
(.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 im im) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/8 binary64)) (.f64 (.f64 #s(literal 7/128 binary64) (*.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))))
(* im (+ (sqrt (/ 1 re)) (* (pow im 2) (+ (* -1/8 (sqrt (/ 1 (pow re 5)))) (* (pow im 2) (+ (* -33/1024 (* (pow im 2) (sqrt (/ 1 (pow re 13))))) (* 7/128 (sqrt (/ 1 (pow re 9))))))))))
(.f64 im (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 im im) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/8 binary64)) (.f64 (.f64 im im) (+.f64 (.f64 (.f64 #s(literal -33/1024 binary64) (.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 13 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) #s(literal 7/128 binary64))))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(.f64 im (-.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(.f64 im (-.f64 (+.f64 (.f64 (sqrt.f64 #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 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(.f64 im (-.f64 (+.f64 (+.f64 (.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 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* -1 (* (sqrt im) (* (sqrt -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 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (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 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (* (sqrt -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 #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 -1 binary64)) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (+ (* -1 (/ (+ (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt 2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(-.f64 #s(literal 0 binary64) (.f64 im (-.f64 (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 re re))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 re re))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (.f64 im (.f64 im im)))) (/.f64 (.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))))))
(pow (* 2 im) 1/16)
(pow.f64 (*.f64 im #s(literal 2 binary64)) #s(literal 1/16 binary64))
(+ (* -1/16 (* (pow (/ 2 (pow im 15)) 1/16) re)) (pow (* 2 im) 1/16))
(+.f64 (pow.f64 (.f64 im #s(literal 2 binary64)) #s(literal 1/16 binary64)) (.f64 #s(literal -1/16 binary64) (*.f64 re (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 15 binary64))) #s(literal 1/16 binary64)))))
(+ (* re (+ (* -1/16 (pow (/ 2 (pow im 15)) 1/16)) (* 1/512 (* (pow (/ 2 (pow im 31)) 1/16) re)))) (pow (* 2 im) 1/16))
(+.f64 (pow.f64 (.f64 im #s(literal 2 binary64)) #s(literal 1/16 binary64)) (.f64 re (+.f64 (.f64 #s(literal -1/16 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 15 binary64))) #s(literal 1/16 binary64))) (.f64 #s(literal 1/512 binary64) (*.f64 re (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 31 binary64))) #s(literal 1/16 binary64)))))))
(+ (* re (+ (* -1/16 (pow (/ 2 (pow im 15)) 1/16)) (* re (+ (* 1/512 (pow (/ 2 (pow im 31)) 1/16)) (* 85/8192 (* (pow (/ 2 (pow im 47)) 1/16) re)))))) (pow (* 2 im) 1/16))
(+.f64 (pow.f64 (.f64 im #s(literal 2 binary64)) #s(literal 1/16 binary64)) (.f64 re (+.f64 (.f64 #s(literal -1/16 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 15 binary64))) #s(literal 1/16 binary64))) (.f64 re (+.f64 (.f64 #s(literal 1/512 binary64) (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 31 binary64))) #s(literal 1/16 binary64))) (.f64 #s(literal 85/8192 binary64) (*.f64 re (pow.f64 (/.f64 #s(literal 2 binary64) (pow.f64 im #s(literal 47 binary64))) #s(literal 1/16 binary64)))))))))
(exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2)))))
(exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (log.f64 (.f64 im im)) (log.f64 re))))
(+ (exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2))))) (* -1/64 (/ (* (pow im 2) (exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))))
(+.f64 (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (log.f64 (.f64 im im)) (log.f64 re)))) (/.f64 (.f64 #s(literal -1/64 binary64) (.f64 (.f64 im im) (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (log.f64 (.f64 im im)) (log.f64 re)))))) (.f64 re re)))
(+ (exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/64 (/ (* (pow im 2) (exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (/ (* (exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/8192 (pow im 4)) (* 1/384 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4))))
(+.f64 (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (log.f64 (.f64 im im)) (log.f64 re)))) (+.f64 (/.f64 (.f64 #s(literal -1/64 binary64) (.f64 (.f64 im im) (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (log.f64 (.f64 im im)) (log.f64 re)))))) (.f64 re re)) (/.f64 (.f64 (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (log.f64 (.f64 im im)) (log.f64 re)))) (+.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/8192 binary64)) (.f64 #s(literal 1/384 binary64) (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64))))) (pow.f64 re #s(literal 4 binary64)))))
(+ (exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/64 (/ (* (pow im 2) (exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2)))))) (pow re 2))) (+ (/ (* (exp (* 1/16 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* -1/24576 (* (pow im 2) (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))))) (+ (* -1/1572864 (pow im 6)) (* 1/11520 (+ (* -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/16 (+ (log (/ 1 re)) (log (pow im 2))))) (+ (* 1/8192 (pow im 4)) (* 1/384 (+ (* -3/4 (pow im 4)) (* 3 (pow im 4)))))) (pow re 4)))))
(+.f64 (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (log.f64 (.f64 im im)) (log.f64 re)))) (+.f64 (/.f64 (.f64 #s(literal -1/64 binary64) (.f64 (.f64 im im) (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (log.f64 (.f64 im im)) (log.f64 re)))))) (.f64 re re)) (+.f64 (/.f64 (.f64 (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (log.f64 (.f64 im im)) (log.f64 re)))) (+.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/8192 binary64)) (.f64 #s(literal 1/384 binary64) (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (.f64 (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (log.f64 (.f64 im im)) (log.f64 re)))) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/24576 binary64) (.f64 im im)) (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 9/4 binary64))) (+.f64 (.f64 #s(literal -1/1572864 binary64) (pow.f64 im #s(literal 6 binary64))) (.f64 #s(literal 1/11520 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)))))))
(exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re))))))
(exp.f64 (*.f64 #s(literal 1/16 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re)))))
(+ (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re)))))) (* 1/64 (/ (* (pow im 2) (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))))
(+.f64 (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (/.f64 (.f64 #s(literal 1/64 binary64) (.f64 (.f64 im im) (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))))) (.f64 re re)))
(+ (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/64 (/ (* (pow im 2) (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (/ (* (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/8192 (pow im 4)) (* 1/384 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4))))
(+.f64 (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (/.f64 (.f64 #s(literal 1/64 binary64) (.f64 (.f64 im im) (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))))) (.f64 re re)) (.f64 (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (/.f64 (+.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/8192 binary64)) (.f64 #s(literal 1/384 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64)))) (pow.f64 re #s(literal 4 binary64))))))
(+ (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/64 (/ (* (pow im 2) (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re))))))) (pow re 2))) (+ (/ (* (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/1572864 (pow im 6)) (+ (* 1/24576 (* (pow im 2) (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))))) (* 1/11520 (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6)))))))) (pow re 6)) (/ (* (exp (* 1/16 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* 1/8192 (pow im 4)) (* 1/384 (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4)))))) (pow re 4)))))
(+.f64 (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (/.f64 (.f64 #s(literal 1/64 binary64) (.f64 (.f64 im im) (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))))) (.f64 re re)) (+.f64 (.f64 (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (/.f64 (+.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 1/8192 binary64)) (.f64 #s(literal 1/384 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/16 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (+.f64 (+.f64 (.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 1/1572864 binary64)) (.f64 (.f64 #s(literal 1/24576 binary64) (.f64 im im)) (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64)))) (.f64 #s(literal 1/11520 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))))))
(exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im)))))
(exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))
(+ (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im))))) (* -1/64 (/ (* (pow im 2) (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 2))))
(+.f64 (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))) (/.f64 (.f64 #s(literal -1/64 binary64) (.f64 (.f64 im im) (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))))) (.f64 re re)))
(+ (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/64 (/ (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* 49/8192 (/ (* (pow im 2) (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 4))))))
(+.f64 (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal -1/64 binary64) (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))) (.f64 re re)) (/.f64 (.f64 #s(literal 49/8192 binary64) (.f64 (.f64 im im) (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (*.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))))) (pow.f64 re #s(literal 4 binary64))))))
(+ (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im))))) (* (pow im 2) (+ (* -1/64 (/ (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 2))) (* (pow im 2) (+ (* -1755/524288 (/ (* (pow im 2) (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im)))))) (pow re 6))) (* 49/8192 (/ (exp (* 1/16 (+ (log (/ 1 re)) (* 2 (log im))))) (pow re 4))))))))
(+.f64 (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal -1/64 binary64) (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))) (.f64 re re)) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal -1755/524288 binary64) (.f64 (.f64 im im) (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re)))))) (pow.f64 re #s(literal 6 binary64))) (/.f64 (.f64 #s(literal 49/8192 binary64) (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) (log.f64 re))))) (pow.f64 re #s(literal 4 binary64))))))))
(exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im))))))
(exp.f64 (*.f64 #s(literal 1/16 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64)))))
(+ (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im)))))) (* -1/16 (/ (* re (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im))))))) im)))
(+.f64 (exp.f64 (.f64 #s(literal 1/16 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))) (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 re (exp.f64 (.f64 #s(literal 1/16 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))))) im))
(+ (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/16 (/ (* re (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (/ (* (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/512 (pow re 2)) (* 1/32 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2))))
(+.f64 (exp.f64 (.f64 #s(literal 1/16 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 re (exp.f64 (.f64 #s(literal 1/16 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))))) im) (.f64 (exp.f64 (.f64 #s(literal 1/16 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))) (/.f64 (+.f64 (.f64 (.f64 re re) #s(literal 1/512 binary64)) #s(literal 0 binary64)) (*.f64 im im)))))
(+ (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/16 (/ (* re (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im))))))) im)) (+ (/ (* (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* -1/512 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/24576 (pow re 3)) (* 1/96 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) (pow im 3)) (/ (* (exp (* 1/16 (+ (log 2) (* -1 (log (/ 1 im)))))) (+ (* 1/512 (pow re 2)) (* 1/32 (+ (* -1 (pow re 2)) (pow re 2))))) (pow im 2)))))
(+.f64 (exp.f64 (.f64 #s(literal 1/16 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))) (+.f64 (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 re (exp.f64 (.f64 #s(literal 1/16 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))))) im) (+.f64 (.f64 (exp.f64 (.f64 #s(literal 1/16 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))) (/.f64 (+.f64 (.f64 (.f64 re re) #s(literal 1/512 binary64)) #s(literal 0 binary64)) (.f64 im im))) (.f64 (exp.f64 (.f64 #s(literal 1/16 binary64) (+.f64 (log.f64 im) (log.f64 #s(literal 2 binary64))))) (/.f64 (+.f64 (.f64 #s(literal -1/512 binary64) (.f64 re #s(literal 0 binary64))) (+.f64 (.f64 (.f64 re (.f64 re re)) #s(literal -1/24576 binary64)) (.f64 (.f64 re (.f64 re re)) #s(literal 1/96 binary64)))) (.f64 im (*.f64 im im)))))))
(exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im))))))
(exp.f64 (*.f64 #s(literal 1/16 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))
(+ (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im)))))) (* 1/16 (/ (* re (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im))))))) im)))
(+.f64 (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 re (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))))) im))
(+ (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (* (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/512 (pow re 2)) (* 1/32 (+ (* -1 (pow re 2)) (pow re 2))))) im)) (* -1/16 (* re (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(-.f64 (exp.f64 (.f64 #s(literal 1/16 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) re) (exp.f64 (.f64 #s(literal 1/16 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/512 binary64)) #s(literal 0 binary64)) (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) im)) im))
(+ (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im)))))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (* (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* -1/512 (* re (+ (* -1 (pow re 2)) (pow re 2)))) (+ (* -1/24576 (pow re 3)) (* 1/96 (+ (* -2 (pow re 3)) (* 3 (pow re 3))))))) im)) (* (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im)))))) (+ (* 1/512 (pow re 2)) (* 1/32 (+ (* -1 (pow re 2)) (pow re 2)))))) im)) (* -1/16 (* re (exp (* 1/16 (+ (log 2) (* -1 (log (/ -1 im))))))))) im)))
(-.f64 (exp.f64 (.f64 #s(literal 1/16 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) re) (exp.f64 (.f64 #s(literal 1/16 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/512 binary64)) #s(literal 0 binary64)) (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (.f64 (exp.f64 (.f64 #s(literal 1/16 binary64) (-.f64 (log.f64 #s(literal 2 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) im))))) (/.f64 (+.f64 (.f64 #s(literal -1/512 binary64) (.f64 re #s(literal 0 binary64))) (+.f64 (.f64 (.f64 re (.f64 re re)) #s(literal -1/24576 binary64)) (.f64 (.f64 re (.f64 re re)) #s(literal 1/96 binary64)))) im))) im)) im))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64))))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 re re)) (.f64 im (*.f64 im im))))) #s(literal -2 binary64))))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re)
(/.f64 (+.f64 (.f64 im im) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (*.f64 re re))) re)
(/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re)
(/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (.f64 re re)) (+.f64 (.f64 im im) (/.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) re)
(/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re)
(/.f64 (-.f64 (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 im #s(literal 4 binary64))) (.f64 re re)) (+.f64 (.f64 im im) (/.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (pow.f64 re #s(literal 6 binary64)))) re)
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
(.f64 (+.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))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2)))))))
(.f64 (+.f64 (+.f64 #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))))) (-.f64 #s(literal 0 binary64) re))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 im im)) (.f64 re (.f64 re re)))))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (.f64 (.f64 im im) (-.f64 (/.f64 (.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)))))))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (.f64 (.f64 im im) (-.f64 (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal -5/64 binary64) (.f64 im im)) (pow.f64 re #s(literal 7 binary64))) (/.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal 5 binary64))))) (/.f64 #s(literal 1/4 binary64) (.f64 re (.f64 re re)))))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(.f64 im (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (/.f64 re im))))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(.f64 im (+.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (/.f64 re im))) (/.f64 (.f64 re re) (.f64 im im))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(.f64 im (+.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 re im)) (+.f64 (/.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 #s(literal 2 binary64) (/.f64 re im))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im)))))
(.f64 (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (.f64 re #s(literal -2 binary64)) (/.f64 (*.f64 re re) im)) im)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im)))))
(.f64 (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (.f64 re #s(literal -2 binary64)) (/.f64 (+.f64 (.f64 re re) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im))) im)) im)) (-.f64 #s(literal 0 binary64) im))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (sqrt (/ 1 re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (sqrt (/ 1 re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (sqrt (/ 1 re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (sqrt (/ 1 re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (sqrt (/ 1 re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (sqrt (/ 1 re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (sqrt (/ 1 re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (sqrt (/ 1 re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (sqrt (/ 1 re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (sqrt (/ 1 re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (sqrt (/ 1 re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (sqrt (/ 1 re)))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(sqrt re)
(sqrt.f64 re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(sqrt.f64 re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(sqrt.f64 re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(sqrt.f64 re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(sqrt.f64 re)
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* -1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal -1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* -1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal -1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* -1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal -1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* -1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal -1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* im (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) (-.f64 #s(literal 0 binary64) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* -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))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 #s(literal 0 binary64) im))
(* -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))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 #s(literal 0 binary64) im))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (sqrt (/ 1 re)))
(*.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 #s(literal 0 binary64) im))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 #s(literal 0 binary64) im))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 #s(literal 0 binary64) im))
(* (* im (pow (sqrt -1) 2)) (sqrt (/ 1 re)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (-.f64 #s(literal 0 binary64) 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)
(/ re im)
(/.f64 re im)
(/ re im)
(/.f64 re im)
(/ re im)
(/.f64 re im)
(/ re im)
(/.f64 re im)
(/ re im)
(/.f64 re im)
(/ re im)
(/.f64 re im)
(/ re im)
(/.f64 re im)
(/ re im)
(/.f64 re im)
(/ re im)
(/.f64 re im)
(/ re im)
(/.f64 re im)
(/ re im)
(/.f64 re im)
(/ re im)
(/.f64 re im)
(/ re im)
(/.f64 re im)
(/ re im)
(/.f64 re im)
(/ re im)
(/.f64 re im)
(/ re im)
(/.f64 re im)
(/ re im)
(/.f64 re im)
(/ re im)
(/.f64 re im)
(/ re im)
(/.f64 re im)
(/ re im)
(/.f64 re im)
(/ re im)
(/.f64 re im)
(/ re im)
(/.f64 re im)
(/ re im)
(/.f64 re im)
(/ re im)
(/.f64 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 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (.f64 im (.f64 im im)))) (.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 im) re))) im)
(/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* -1/2 (sqrt (/ 1 im))) (* 1/2 (* (sqrt im) (/ 1 re)))))) im)
(/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 im) re)) (.f64 (.f64 im im) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal -1/2 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 im) re))))) im)
(/ (+ (* 1/2 (* (sqrt im) re)) (* (pow im 2) (+ (* -1/2 (sqrt (/ 1 im))) (* im (+ (* -1/4 (* (sqrt (/ 1 im)) (/ 1 re))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 re)))))))) im)
(/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 im) re)) (.f64 (.f64 im im) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal -1/2 binary64)) (.f64 im (*.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re) #s(literal 1/4 binary64)))))) im)
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(.f64 im (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #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 re (sqrt.f64 #s(literal 2 binary64)))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(.f64 im (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #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 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64)))))))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(.f64 im (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))) (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #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 5 binary64)))) (.f64 re re)) (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 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (/.f64 (.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(.f64 (+.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 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 (.f64 #s(literal 1/4 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 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))))
(.f64 (-.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (/.f64 (.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))))) (/.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 re re))) (sqrt.f64 #s(literal -2 binary64)))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 re re))) (.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64)))))) (.f64 im (.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (.f64 #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)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))) (.f64 re (.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (.f64 im #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 re (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (.f64 im #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))))))
(* 1/2 (* (sqrt (/ 1 im)) re))
(.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im)))))
(.f64 re (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 im) re)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* 1/2 (sqrt (/ 1 im))))))
(.f64 re (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 im) re)) (+.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (sqrt.f64 im) (-.f64 (.f64 im #s(literal 2 binary64)) im)) (*.f64 re re))))))
(* re (+ (* -1/2 (* (sqrt im) (/ 1 re))) (+ (* 1/4 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (+ (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3)))) (* 1/2 (sqrt (/ 1 im)))))))
(.f64 re (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.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 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.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 im) (/ 1 re))) (* 1/2 (sqrt (/ 1 im))))))
(.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 im) re)) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (/ (- (* 2 im) im) re))) (* 1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))
(.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/4 binary64) (sqrt.f64 im)) (/.f64 (-.f64 (.f64 im #s(literal 2 binary64)) im) re)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 im))) re)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (* (sqrt im) (- (* 2 im) im))) (* 1/4 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re)))) re)) (* 1/2 (sqrt im))) re)) (* 1/2 (sqrt (/ 1 im))))))
(.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (/.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (.f64 (sqrt.f64 im) (-.f64 (.f64 im #s(literal 2 binary64)) im)) (/.f64 (.f64 (sqrt.f64 (.f64 im (.f64 im im))) (-.f64 (.f64 im #s(literal 2 binary64)) im)) re))) re)) re)) (-.f64 #s(literal 0 binary64) re))
(* (sqrt (/ 1 im)) re)
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re)
(/ (+ (* -1 (sqrt (pow im 3))) (* (sqrt im) re)) im)
(/.f64 (-.f64 (.f64 (sqrt.f64 im) re) (sqrt.f64 (.f64 im (*.f64 im im)))) im)
(/ (+ (* (sqrt im) re) (* (pow im 2) (+ (* -1 (sqrt (/ 1 im))) (* (sqrt im) (/ 1 re))))) im)
(/.f64 (+.f64 (.f64 (sqrt.f64 im) re) (.f64 (*.f64 im im) (-.f64 (/.f64 (sqrt.f64 im) re) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))) im)
(/ (+ (* (sqrt im) re) (* (pow im 2) (+ (* -1 (sqrt (/ 1 im))) (* im (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 re))) (* (sqrt (/ 1 im)) (/ 1 re))))))) im)
(/.f64 (+.f64 (.f64 (sqrt.f64 im) re) (.f64 (.f64 im im) (-.f64 (.f64 im (*.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re))) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))))) im)
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(.f64 im (-.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(.f64 im (-.f64 (+.f64 (.f64 (sqrt.f64 #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 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (pow (sqrt 2) 3)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(.f64 im (-.f64 (+.f64 (+.f64 (.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 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
(* -1 (* (sqrt im) (* (sqrt -2) (sqrt -1))))
(.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1))))))
(.f64 (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(.f64 (-.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal -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 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -2)))) (+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt -2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (pow (sqrt -2) 3))))) (pow im 3))) (* (sqrt (/ 1 im)) (* (sqrt -2) (sqrt -1)))))))
(.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -2 binary64)))) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 re re))) (sqrt.f64 #s(literal -2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 re re))) (.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -2 binary64)))))) (.f64 im (.f64 im im)))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal -2 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(-.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))
(+ (* re (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(+.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.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 (+ (* -1 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2)))) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (- (/ 1 im) (/ 1 (* im (pow (sqrt 2) 2))))) (pow (sqrt 2) 3)))))))) (* (sqrt im) (sqrt 2)))
(+.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (-.f64 (.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (.f64 im #s(literal 2 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 re (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (.f64 im #s(literal 2 binary64)))))) (.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64))))))
(* (sqrt (/ 1 im)) re)
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) re)
(* re (+ (sqrt (/ 1 im)) (* -1 (* (sqrt im) (/ 1 re)))))
(*.f64 re (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) re)))
(* re (+ (sqrt (/ 1 im)) (+ (* -1 (* (sqrt im) (/ 1 re))) (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))))))
(.f64 re (+.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) re)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (sqrt.f64 im) (-.f64 (.f64 im #s(literal 2 binary64)) im)) (*.f64 re re)))))
(* re (+ (sqrt (/ 1 im)) (+ (* -1 (* (sqrt im) (/ 1 re))) (+ (* 1/2 (* (sqrt im) (/ (- (* 2 im) im) (pow re 2)))) (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) (pow re 3))))))))
(.f64 re (+.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (-.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (.f64 (sqrt.f64 im) (-.f64 (.f64 im #s(literal 2 binary64)) im)) (.f64 re re)) (/.f64 (.f64 (sqrt.f64 (.f64 im (.f64 im im))) (-.f64 (.f64 im #s(literal 2 binary64)) im)) (.f64 re (*.f64 re re))))) (/.f64 (sqrt.f64 im) re))))
(* -1 (* (sqrt (/ 1 im)) re))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (* (sqrt im) (/ 1 re))))))
(*.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (sqrt.f64 im) re)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (sqrt im) (* -1/2 (* (sqrt im) (/ (- (* 2 im) im) re)))) re)))))
(.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (+.f64 (sqrt.f64 im) (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (/.f64 (-.f64 (.f64 im #s(literal 2 binary64)) im) re))) re)) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (sqrt (/ 1 im)) (* -1 (/ (+ (sqrt im) (* -1 (/ (+ (* 1/2 (* (sqrt im) (- (* 2 im) im))) (* 1/2 (* (sqrt (pow im 3)) (/ (- (* 2 im) im) re)))) re))) re)))))
(.f64 (-.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (-.f64 (sqrt.f64 im) (/.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (.f64 (sqrt.f64 im) (-.f64 (.f64 im #s(literal 2 binary64)) im)) (/.f64 (.f64 (sqrt.f64 (.f64 im (.f64 im im))) (-.f64 (.f64 im #s(literal 2 binary64)) im)) re))) re)) re)) (-.f64 #s(literal 0 binary64) re))
(* (sqrt im) (/ 1 re))
(/.f64 (sqrt.f64 im) re)
(+ (* (sqrt im) (/ 1 re)) (* (sqrt (pow im 3)) (/ 1 (pow re 2))))
(+.f64 (/.f64 (sqrt.f64 im) re) (/.f64 (sqrt.f64 (.f64 im (.f64 im im))) (*.f64 re re)))
(+ (* (sqrt im) (/ 1 re)) (* (pow im 2) (+ (* (sqrt im) (/ 1 (pow re 3))) (* (sqrt (/ 1 im)) (/ 1 (pow re 2))))))
(+.f64 (/.f64 (sqrt.f64 im) re) (.f64 (.f64 im im) (+.f64 (/.f64 (sqrt.f64 im) (.f64 re (.f64 re re))) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 re re)))))
(+ (* (sqrt im) (/ 1 re)) (* (pow im 2) (+ (* im (+ (* -1/2 (* (sqrt (/ 1 im)) (/ 1 (pow re 3)))) (* (sqrt (/ 1 im)) (/ 1 (pow re 3))))) (* (sqrt (/ 1 im)) (/ 1 (pow re 2))))))
(+.f64 (/.f64 (sqrt.f64 im) re) (.f64 (.f64 im im) (+.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 re re)) (.f64 im (.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 re (*.f64 re re))))))))
(* (sqrt (/ 1 im)) (sqrt 1/2))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 1/2)))) (* (sqrt (/ 1 im)) (sqrt 1/2)))
(+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 1/2 binary64))))))
(+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (+ (* -1/2 (pow re 2)) (* 1/4 (pow re 2))) (sqrt 1/2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 1/2)))) (* (sqrt (/ 1 im)) (sqrt 1/2))))
(+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 #s(literal -1/4 binary64) (*.f64 re re))) (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (+ (* -1/2 (pow re 2)) (* 1/4 (pow re 2))) (sqrt 1/2)))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 7))) (/ (+ (* 1/16 (/ (* im (pow re 2)) (pow (sqrt 1/2) 2))) (+ (* 1/4 (pow re 3)) (* re (+ (* -1/2 (pow re 2)) (* 1/4 (pow re 2)))))) (sqrt 1/2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 1/2)))) (* (sqrt (/ 1 im)) (sqrt 1/2)))))
(+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 #s(literal -1/4 binary64) (.f64 re re))) (sqrt.f64 #s(literal 1/2 binary64)))) (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 7 binary64)))) (+.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 im (.f64 re re))) #s(literal 1/2 binary64)) (+.f64 (.f64 (.f64 re (.f64 re re)) #s(literal 1/4 binary64)) (.f64 re (.f64 #s(literal -1/4 binary64) (.f64 re re)))))) (sqrt.f64 #s(literal 1/2 binary64))))))
(* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt -1/2)))
(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))
(+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -1/2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt -1/2))))
(+.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (/.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1/2 binary64)))))
(+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -1/2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (sqrt -1) (+ (* -1/4 (pow re 2)) (* 1/2 (pow re 2)))) (sqrt -1/2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt -1/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 -1/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 -1 binary64)) (.f64 #s(literal 1/4 binary64) (.f64 re re))) (sqrt.f64 #s(literal -1/2 binary64)))))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1/2 binary64))))
(+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (/ (* (sqrt -1) (+ (* -1/4 (pow re 2)) (* 1/2 (pow re 2)))) (sqrt -1/2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ (* (sqrt -1) (+ (* -1 (* re (+ (* -1/4 (pow re 2)) (* 1/2 (pow re 2))))) (+ (* -1/16 (/ (* im (pow re 2)) (pow (sqrt -1/2) 2))) (* 1/4 (pow re 3))))) (sqrt -1/2))))) (pow im 3))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt -1/2)))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt -1/2)))))
(-.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1/2 binary64))) (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (/.f64 (.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal -1/2 binary64))))) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 im)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 #s(literal 1/4 binary64) (.f64 re re))) (sqrt.f64 #s(literal -1/2 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (+.f64 (.f64 re (.f64 #s(literal -1/4 binary64) (.f64 re re))) (+.f64 (.f64 (.f64 re (.f64 re re)) #s(literal 1/4 binary64)) (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 im (.f64 re re))) #s(literal -1/2 binary64)))) (sqrt.f64 #s(literal -1/2 binary64)))))) (.f64 im (.f64 im im))))
(* (sqrt (/ 1 im)) (sqrt 1/2))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 1/2 binary64)))
(+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 1/2)))) (* (sqrt (/ 1 im)) (sqrt 1/2)))
(+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (*.f64 im im)))) (/.f64 re (sqrt.f64 #s(literal 1/2 binary64))))))
(+ (* re (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ 1 (sqrt 1/2)))) (* 1/2 (* (sqrt im) (/ (* re (- (* 1/4 (/ 1 (pow im 3))) (* 1/16 (/ 1 (* (pow im 3) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))) (* (sqrt (/ 1 im)) (sqrt 1/2)))
(+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 re (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (.f64 re (/.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (.f64 im (.f64 im im))) (/.f64 #s(literal 1/16 binary64) (.f64 #s(literal 1/2 binary64) (.f64 im (*.f64 im im))))) (sqrt.f64 #s(literal 1/2 binary64))))))))
(+ (* re (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ 1 (sqrt 1/2)))) (* re (+ (* -1/8 (* (sqrt (/ 1 im)) (/ (* re (- (* 1/4 (/ 1 (pow im 3))) (* 1/16 (/ 1 (* (pow im 3) (pow (sqrt 1/2) 2)))))) (pow (sqrt 1/2) 3)))) (* 1/2 (* (sqrt im) (/ (- (* 1/4 (/ 1 (pow im 3))) (* 1/16 (/ 1 (* (pow im 3) (pow (sqrt 1/2) 2))))) (sqrt 1/2)))))))) (* (sqrt (/ 1 im)) (sqrt 1/2)))
(+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 re (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 re (+.f64 (.f64 (.f64 #s(literal -1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 (/.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (.f64 im (.f64 im im))) (/.f64 #s(literal 1/16 binary64) (.f64 #s(literal 1/2 binary64) (.f64 im (.f64 im im))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 re #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 im)) (/.f64 (-.f64 (/.f64 #s(literal 1/4 binary64) (.f64 im (.f64 im im))) (/.f64 #s(literal 1/16 binary64) (.f64 #s(literal 1/2 binary64) (.f64 im (*.f64 im im))))) (sqrt.f64 #s(literal 1/2 binary64)))))))))
(* (sqrt im) (/ 1 re))
(/.f64 (sqrt.f64 im) re)
(/ (+ (sqrt im) (* (sqrt (pow im 3)) (/ 1 re))) re)
(/.f64 (+.f64 (sqrt.f64 im) (/.f64 (sqrt.f64 (.f64 im (.f64 im im))) re)) re)
(/ (+ (sqrt im) (+ (* -1/2 (* (sqrt (/ 1 im)) (/ (+ (* -4 (pow im 3)) (+ (* 2 (pow im 3)) (pow im 3))) (pow re 2)))) (* (sqrt (pow im 3)) (/ 1 re)))) re)
(/.f64 (+.f64 (sqrt.f64 im) (+.f64 (/.f64 (sqrt.f64 (.f64 im (.f64 im im))) re) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal -1/2 binary64)) (/.f64 (+.f64 (.f64 (.f64 im (.f64 im im)) #s(literal -2 binary64)) (.f64 im (.f64 im im))) (.f64 re re))))) re)
(/ (+ (sqrt im) (+ (* -1/2 (* (sqrt (/ 1 im)) (/ (+ (* -4 (pow im 3)) (+ (* 2 (pow im 3)) (pow im 3))) (pow re 2)))) (+ (* -1/2 (* (sqrt (/ 1 im)) (/ (+ (* -1 (* im (+ (* -4 (pow im 3)) (+ (* 2 (pow im 3)) (pow im 3))))) (+ (* 2 (* im (+ (* -4 (pow im 3)) (* 2 (pow im 3))))) (* 4 (pow im 4)))) (pow re 3)))) (* (sqrt (pow im 3)) (/ 1 re))))) re)
(/.f64 (+.f64 (sqrt.f64 im) (+.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal -1/2 binary64)) (/.f64 (+.f64 (.f64 (.f64 im (.f64 im im)) #s(literal -2 binary64)) (.f64 im (.f64 im im))) (.f64 re re))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (-.f64 (+.f64 (.f64 (.f64 im #s(literal 2 binary64)) (.f64 (.f64 im (.f64 im im)) #s(literal -2 binary64))) (.f64 #s(literal 4 binary64) (pow.f64 im #s(literal 4 binary64)))) (.f64 im (+.f64 (.f64 (.f64 im (.f64 im im)) #s(literal -2 binary64)) (.f64 im (.f64 im im)))))) (.f64 re (.f64 re re))))) (/.f64 (sqrt.f64 (.f64 im (.f64 im im))) re))) re)
(* -1 (* (sqrt im) (/ 1 re)))
(-.f64 #s(literal 0 binary64) (/.f64 (sqrt.f64 im) re))
(* -1 (/ (+ (sqrt im) (* (sqrt (pow im 3)) (/ 1 re))) re))
(-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (sqrt.f64 im) (/.f64 (sqrt.f64 (.f64 im (.f64 im im))) re)) re))
(* -1 (/ (+ (sqrt im) (* -1 (/ (+ (* -1 (sqrt (pow im 3))) (* 1/2 (* (sqrt (/ 1 im)) (/ (+ (* -4 (pow im 3)) (+ (* 2 (pow im 3)) (pow im 3))) re)))) re))) re))
(-.f64 #s(literal 0 binary64) (/.f64 (-.f64 (sqrt.f64 im) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (/.f64 (+.f64 (.f64 (.f64 im (.f64 im im)) #s(literal -2 binary64)) (.f64 im (.f64 im im))) re))) (sqrt.f64 (.f64 im (*.f64 im im)))) re)) re))
(* -1 (/ (+ (sqrt im) (* -1 (/ (+ (* -1 (sqrt (pow im 3))) (* -1 (/ (+ (* -1/2 (* (sqrt (/ 1 im)) (+ (* -4 (pow im 3)) (+ (* 2 (pow im 3)) (pow im 3))))) (* 1/2 (* (sqrt (/ 1 im)) (/ (+ (* -4 (pow im 4)) (+ (* -2 (* im (+ (* -4 (pow im 3)) (* 2 (pow im 3))))) (* im (+ (* -4 (pow im 3)) (+ (* 2 (pow im 3)) (pow im 3)))))) re)))) re))) re))) re))
(-.f64 #s(literal 0 binary64) (/.f64 (-.f64 (sqrt.f64 im) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 (.f64 im (.f64 im im)))) (/.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) #s(literal -1/2 binary64)) (+.f64 (.f64 (.f64 im (.f64 im im)) #s(literal -2 binary64)) (.f64 im (.f64 im im)))) (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (/.f64 (+.f64 (+.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -4 binary64)) (.f64 (.f64 im #s(literal -2 binary64)) (.f64 (.f64 im (.f64 im im)) #s(literal -2 binary64)))) (.f64 im (+.f64 (.f64 (.f64 im (.f64 im im)) #s(literal -2 binary64)) (.f64 im (*.f64 im im))))) re))) re)) re)) re))
(/ im (pow re 2))
(/.f64 im (*.f64 re re))
(* im (+ (* 2 (/ im (pow re 3))) (/ 1 (pow re 2))))
(.f64 im (+.f64 (/.f64 #s(literal 1 binary64) (.f64 re re)) (/.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (*.f64 re re)))))
(* im (+ (* im (+ (* 2 (/ im (pow re 4))) (* 2 (/ 1 (pow re 3))))) (/ 1 (pow re 2))))
(.f64 im (+.f64 (/.f64 #s(literal 1 binary64) (.f64 re re)) (.f64 im (+.f64 (/.f64 (.f64 im #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64))) (/.f64 #s(literal 2 binary64) (.f64 re (.f64 re re)))))))
(* im (+ (* im (+ (* im (+ (* -4 (/ (pow im 2) (pow re 6))) (* 2 (/ 1 (pow re 4))))) (* 2 (/ 1 (pow re 3))))) (/ 1 (pow re 2))))
(.f64 im (+.f64 (/.f64 #s(literal 1 binary64) (.f64 re re)) (.f64 im (+.f64 (/.f64 #s(literal 2 binary64) (.f64 re (.f64 re re))) (.f64 im (+.f64 (/.f64 (.f64 #s(literal -4 binary64) (.f64 im im)) (pow.f64 re #s(literal 6 binary64))) (/.f64 #s(literal 2 binary64) (pow.f64 re #s(literal 4 binary64)))))))))
(/ 1/2 im)
(/.f64 #s(literal 1/2 binary64) im)
(/ (+ 1/2 (* 1/2 (/ re im))) im)
(/.f64 (+.f64 #s(literal 1/2 binary64) (*.f64 #s(literal 1/2 binary64) (/.f64 re im))) im)
(/ (- (+ 1/2 (* -1 (/ (+ (* -1/2 (pow re 2)) (* 1/4 (pow re 2))) (pow im 2)))) (* -1/2 (/ re im))) im)
(/.f64 (+.f64 (-.f64 #s(literal 1/2 binary64) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 re re)) (.f64 im im))) (.f64 #s(literal 1/2 binary64) (/.f64 re im))) im)
(/ (- (+ 1/2 (* -1 (/ (+ (* 1/4 (pow re 3)) (* re (+ (* -1/2 (pow re 2)) (* 1/4 (pow re 2))))) (pow im 3)))) (+ (* -1/2 (/ re im)) (+ (* -1/2 (/ (pow re 2) (pow im 2))) (* 1/4 (/ (pow re 2) (pow im 2)))))) im)
(/.f64 (-.f64 (-.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 (.f64 (.f64 re (.f64 re re)) #s(literal 1/4 binary64)) (.f64 re (.f64 #s(literal -1/4 binary64) (.f64 re re)))) (.f64 im (.f64 im im)))) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 re im)) (.f64 (/.f64 (.f64 re re) (.f64 im im)) #s(literal -1/4 binary64)))) im)
(/ 1/2 im)
(/.f64 #s(literal 1/2 binary64) im)
(* -1 (/ (- (* -1/2 (/ re im)) 1/2) im))
(-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (*.f64 #s(literal -1/2 binary64) (/.f64 re im)) #s(literal -1/2 binary64)) im))
(* -1 (/ (- (* -1 (/ (- (+ (* -1/4 (/ (pow re 2) im)) (* 1/2 (/ (pow re 2) im))) (* -1/2 re)) im)) 1/2) im))
(-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (.f64 (/.f64 (.f64 re re) im) #s(literal 1/4 binary64)) (*.f64 #s(literal 1/2 binary64) re)) im)) #s(literal -1/2 binary64)) im))
(* -1 (/ (- (* -1 (/ (- (* -1 (/ (- (+ (* -1 (/ (* re (+ (* -1/4 (pow re 2)) (* 1/2 (pow re 2)))) im)) (* 1/4 (/ (pow re 3) im))) (+ (* -1/4 (pow re 2)) (* 1/2 (pow re 2)))) im)) (* -1/2 re)) im)) 1/2) im))
(-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (/.f64 (.f64 re (.f64 #s(literal -1/4 binary64) (.f64 re re))) im) (+.f64 (/.f64 (.f64 (.f64 re (.f64 re re)) #s(literal 1/4 binary64)) im) (.f64 #s(literal -1/4 binary64) (.f64 re re)))) im)) (*.f64 #s(literal 1/2 binary64) re)) im)) #s(literal -1/2 binary64)) im))
(/ 1/2 im)
(/.f64 #s(literal 1/2 binary64) im)
(+ (* 1/2 (/ re (pow im 2))) (* 1/2 (/ 1 im)))
(+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 re (.f64 im im))) (/.f64 #s(literal 1/2 binary64) im))
(+ (* re (+ (* 1/4 (/ re (pow im 3))) (* 1/2 (/ 1 (pow im 2))))) (* 1/2 (/ 1 im)))
(+.f64 (/.f64 #s(literal 1/2 binary64) im) (.f64 re (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) re) (.f64 im (.f64 im im))) (/.f64 #s(literal 1/2 binary64) (*.f64 im im)))))
(+ (* re (+ (* re (+ (* -1/8 (/ (pow re 2) (pow im 5))) (* 1/4 (/ 1 (pow im 3))))) (* 1/2 (/ 1 (pow im 2))))) (* 1/2 (/ 1 im)))
(+.f64 (/.f64 #s(literal 1/2 binary64) im) (.f64 re (+.f64 (/.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re (+.f64 (/.f64 #s(literal 1/4 binary64) (.f64 im (.f64 im im))) (/.f64 (.f64 #s(literal -1/8 binary64) (*.f64 re re)) (pow.f64 im #s(literal 5 binary64))))))))
(/ im (pow re 2))
(/.f64 im (*.f64 re re))
(/ (+ im (* 2 (/ (pow im 2) re))) (pow re 2))
(/.f64 (+.f64 im (/.f64 (.f64 #s(literal 2 binary64) (.f64 im im)) re)) (*.f64 re re))
(/ (- (+ im (* -1 (/ (+ (* -4 (pow im 3)) (* 2 (pow im 3))) (pow re 2)))) (* -2 (/ (pow im 2) re))) (pow re 2))
(/.f64 (+.f64 im (+.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 im (.f64 im im))) (.f64 re re)) (/.f64 (.f64 #s(literal 2 binary64) (.f64 im im)) re))) (*.f64 re re))
(/ (- (+ im (* -1 (/ (+ (* 2 (* im (+ (* -4 (pow im 3)) (* 2 (pow im 3))))) (* 4 (pow im 4))) (pow re 3)))) (+ (* -4 (/ (pow im 3) (pow re 2))) (+ (* -2 (/ (pow im 2) re)) (* 2 (/ (pow im 3) (pow re 2)))))) (pow re 2))
(/.f64 (-.f64 (-.f64 im (/.f64 (+.f64 (.f64 (.f64 im #s(literal 2 binary64)) (.f64 (.f64 im (.f64 im im)) #s(literal -2 binary64))) (.f64 #s(literal 4 binary64) (pow.f64 im #s(literal 4 binary64)))) (.f64 re (.f64 re re)))) (+.f64 (/.f64 (.f64 (.f64 im (.f64 im im)) #s(literal -4 binary64)) (.f64 re re)) (+.f64 (/.f64 (.f64 #s(literal 2 binary64) (.f64 im (.f64 im im))) (.f64 re re)) (/.f64 (.f64 (.f64 im im) #s(literal -2 binary64)) re)))) (*.f64 re re))
(/ im (pow re 2))
(/.f64 im (*.f64 re re))
(/ (+ im (* 2 (/ (pow im 2) re))) (pow re 2))
(/.f64 (+.f64 im (/.f64 (.f64 #s(literal 2 binary64) (.f64 im im)) re)) (*.f64 re re))
(/ (+ im (* -1 (/ (- (+ (* -4 (/ (pow im 3) re)) (* 2 (/ (pow im 3) re))) (* 2 (pow im 2))) re))) (pow re 2))
(/.f64 (-.f64 im (/.f64 (+.f64 (.f64 (/.f64 (.f64 im (.f64 im im)) re) #s(literal -2 binary64)) (.f64 (.f64 im im) #s(literal -2 binary64))) re)) (.f64 re re))
(/ (+ im (* -1 (/ (- (* -1 (/ (- (+ (* -4 (/ (pow im 4) re)) (* -2 (/ (* im (+ (* -4 (pow im 3)) (* 2 (pow im 3)))) re))) (+ (* -4 (pow im 3)) (* 2 (pow im 3)))) re)) (* 2 (pow im 2))) re))) (pow re 2))
(/.f64 (-.f64 im (/.f64 (+.f64 (-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -4 binary64)) re) (+.f64 (/.f64 (.f64 (.f64 im #s(literal -2 binary64)) (.f64 (.f64 im (.f64 im im)) #s(literal -2 binary64))) re) (.f64 #s(literal 2 binary64) (.f64 im (.f64 im im))))) re)) (.f64 (.f64 im im) #s(literal -2 binary64))) re)) (.f64 re re))
(* (sqrt re) (sqrt -1))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64)))
(+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt -1)))
(+.f64 (.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (*.f64 re re)))))))
(+ (* (sqrt re) (sqrt -1)) (* (pow im 2) (+ (* -1/128 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 7))))) (* 1/8 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))))))
(+.f64 (.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) (.f64 (.f64 im im) (+.f64 (.f64 (.f64 #s(literal -1/128 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64))))) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (*.f64 re re)))))))))
(+ (* (sqrt re) (sqrt -1)) (* (pow im 2) (+ (* 1/8 (* (sqrt (/ 1 (pow re 3))) (sqrt -1))) (* (pow im 2) (+ (* -1/128 (* (sqrt (/ 1 (pow re 7))) (sqrt -1))) (* 1/1024 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 11))))))))))
(+.f64 (.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/128 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))))) (.f64 (.f64 #s(literal 1/1024 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 11 binary64))))))))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))
(.f64 im (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (.f64 re (.f64 re re)))) (*.f64 im im))))
(* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))
(.f64 im (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (.f64 re (.f64 re re)))) (.f64 im im))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (pow.f64 im #s(literal 4 binary64)))))
(* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (+ (* 2 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))))
(.f64 im (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (+.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (.f64 re (.f64 re re)))) (.f64 im im)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 11 binary64)))) (pow.f64 im #s(literal 6 binary64)))))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (pow.f64 im #s(literal 4 binary64)))))
(* -1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal -1/2 binary64) (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))
(.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (.f64 re (.f64 re re)))) (*.f64 im im))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3)))))))
(.f64 (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (.f64 re (.f64 re re)))) (.f64 im im))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (pow.f64 im #s(literal 4 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (* (/ (sqrt -1) (pow im 4)) (sqrt (pow re 7)))) (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt -1))) (+ (* 2 (* (/ (sqrt -1) (pow im 6)) (sqrt (pow re 11)))) (* (/ (sqrt -1) (pow im 2)) (sqrt (pow re 3))))))))
(.f64 (-.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (+.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (.f64 re (.f64 re re)))) (.f64 im im)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 11 binary64)))) (pow.f64 im #s(literal 6 binary64)))))) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))) (pow.f64 im #s(literal 4 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) (*.f64 im (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (/ (sqrt -1) im) (sqrt (pow re 5)))) re)
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 im (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 re)) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (pow.f64 re #s(literal 5 binary64)))) im)) re)
(/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (pow re 3) (+ (* -1 (* (/ (sqrt -1) (pow im 3)) (sqrt (pow re 3)))) (* (/ (sqrt -1) im) (sqrt (/ 1 re)))))) re)
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 im (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 re)) (.f64 (.f64 re (.f64 re re)) (-.f64 (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) im) (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (.f64 re (.f64 re re)))) (.f64 im (.f64 im im)))))) re)
(/ (+ (* 1/2 (* (* im (sqrt -1)) (sqrt re))) (* (pow re 3) (+ (* (/ (sqrt -1) im) (sqrt (/ 1 re))) (* (pow re 3) (+ (* -1 (* (/ (sqrt -1) (pow im 3)) (sqrt (/ 1 (pow re 3))))) (* 2 (* (/ (sqrt -1) (pow im 5)) (sqrt re)))))))) re)
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 im (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 re)) (.f64 (.f64 re (.f64 re re)) (+.f64 (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) im) (.f64 (.f64 re (.f64 re re)) (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 im #s(literal 5 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im (*.f64 im im))))))))) re)
(* (sqrt re) (sqrt -1))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64)))
(* re (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1))))
(.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) #s(literal 1/8 binary64))))
(* re (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(.f64 re (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) #s(literal 1/8 binary64))) (.f64 #s(literal -1/128 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (*.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64)))))))
(* re (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/1024 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 (pow re 13))))) (+ (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(.f64 re (+.f64 (+.f64 (.f64 #s(literal -1/128 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 (.f64 #s(literal 1/1024 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 6 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 13 binary64)))))) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) #s(literal 1/8 binary64)))))
(* -1 (* (sqrt re) (sqrt -1)))
(*.f64 (sqrt.f64 re) (neg.f64 (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(.f64 (+.f64 (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* 1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(.f64 (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (+.f64 (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im)))) (.f64 (.f64 #s(literal 1/128 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))))) (.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/128 (* (* (pow im 4) (sqrt -1)) (sqrt (pow re 3)))) (* -1/1024 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 re))))) (pow re 3))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(.f64 (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (-.f64 (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im)))) (/.f64 (+.f64 (.f64 (.f64 #s(literal -1/128 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (.f64 re (.f64 re re)))) (.f64 #s(literal -1/1024 binary64) (.f64 (pow.f64 im #s(literal 6 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))))) (.f64 re (.f64 re re)))) (.f64 re (.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(+ (* -1/2 (* (/ (pow im 2) (sqrt -4)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt -4)))
(+.f64 (.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (/.f64 (.f64 im im) (sqrt.f64 #s(literal -4 binary64))))))
(+ (* (sqrt re) (sqrt -4)) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt -4)))) (* -1/8 (* (/ (pow im 2) (pow (sqrt -4) 3)) (sqrt (/ 1 (pow re 7))))))))
(+.f64 (.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (sqrt.f64 #s(literal -4 binary64)))) (.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 im im) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64))))) (.f64 #s(literal -4 binary64) (sqrt.f64 #s(literal -4 binary64))))))))
(+ (* (sqrt re) (sqrt -4)) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt -4)))) (* (pow im 2) (+ (* -1/8 (* (sqrt (/ 1 (pow re 7))) (/ 1 (pow (sqrt -4) 3)))) (* -1/16 (* (/ (pow im 2) (pow (sqrt -4) 5)) (sqrt (/ 1 (pow re 11))))))))))
(+.f64 (.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (sqrt.f64 #s(literal -4 binary64)))) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) (.f64 #s(literal -4 binary64) (sqrt.f64 #s(literal -4 binary64))))) (.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (*.f64 im im) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 5 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 11 binary64))))))))))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(.f64 im (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* im (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1))))
(.f64 im (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal -2 binary64) (/.f64 (sqrt.f64 (.f64 re (.f64 re re))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))))))
(* im (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -2 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(.f64 im (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (sqrt.f64 (.f64 re (.f64 re re))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im)))) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal -2 binary64) (/.f64 (sqrt.f64 (pow.f64 re #s(literal 7 binary64))) (.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))))))))
(* im (+ (* -4 (* (/ 1 (* (pow im 6) (pow (sqrt -1) 5))) (sqrt (pow re 11)))) (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -2 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(.f64 im (+.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (sqrt.f64 (.f64 re (.f64 re re))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im)))) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal -2 binary64) (/.f64 (sqrt.f64 (pow.f64 re #s(literal 7 binary64))) (.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))))))) (.f64 #s(literal -4 binary64) (/.f64 (sqrt.f64 (pow.f64 re #s(literal 11 binary64))) (.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 5 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 (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (* (sqrt (/ 1 re)) (sqrt -1)))))
(.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal -2 binary64) (/.f64 (sqrt.f64 (.f64 re (.f64 re re))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 im im))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -2 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* (sqrt (/ 1 re)) (sqrt -1))))))
(.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (sqrt.f64 (.f64 re (.f64 re re))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im)))) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal -2 binary64) (/.f64 (sqrt.f64 (pow.f64 re #s(literal 7 binary64))) (.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -4 (* (/ 1 (* (pow im 6) (pow (sqrt -1) 5))) (sqrt (pow re 11)))) (+ (* -2 (* (/ 1 (* (pow im 2) (sqrt -1))) (sqrt (pow re 3)))) (+ (* -2 (* (/ 1 (* (pow im 4) (pow (sqrt -1) 3))) (sqrt (pow re 7)))) (* (sqrt (/ 1 re)) (sqrt -1)))))))
(.f64 (+.f64 (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (sqrt.f64 (.f64 re (.f64 re re))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im)))) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal -2 binary64) (/.f64 (sqrt.f64 (pow.f64 re #s(literal 7 binary64))) (.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64)))))))) (.f64 #s(literal -4 binary64) (/.f64 (sqrt.f64 (pow.f64 re #s(literal 11 binary64))) (.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 5 binary64)))))) (-.f64 #s(literal 0 binary64) im))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(.f64 im (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(/ (+ (* -2 (* (/ 1 (* im (sqrt -1))) (sqrt (pow re 5)))) (* (* im (sqrt -1)) (sqrt re))) re)
(/.f64 (+.f64 (.f64 (sqrt.f64 re) (.f64 im (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal -2 binary64) (/.f64 (sqrt.f64 (pow.f64 re #s(literal 5 binary64))) (.f64 im (sqrt.f64 #s(literal -1 binary64)))))) re)
(/ (+ (* (* im (sqrt -1)) (sqrt re)) (* (pow re 3) (+ (* -2 (* (/ 1 (* im (sqrt -1))) (sqrt (/ 1 re)))) (* -2 (* (/ 1 (* (pow im 3) (pow (sqrt -1) 3))) (sqrt (pow re 3))))))) re)
(/.f64 (+.f64 (.f64 (sqrt.f64 re) (.f64 im (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 re (.f64 re re)) (.f64 #s(literal -2 binary64) (+.f64 (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (sqrt.f64 (.f64 re (.f64 re re))) (.f64 (.f64 im (.f64 im im)) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64))))))))) re)
(/ (+ (* (* im (sqrt -1)) (sqrt re)) (* (pow re 3) (+ (* -2 (* (/ 1 (* im (sqrt -1))) (sqrt (/ 1 re)))) (* (pow re 3) (+ (* -4 (* (/ 1 (* (pow im 5) (pow (sqrt -1) 5))) (sqrt re))) (* -2 (* (/ 1 (* (pow im 3) (pow (sqrt -1) 3))) (sqrt (/ 1 (pow re 3)))))))))) re)
(/.f64 (+.f64 (.f64 (sqrt.f64 re) (.f64 im (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 re (.f64 re re)) (+.f64 (.f64 #s(literal -2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal -1 binary64))))) (.f64 (.f64 re (.f64 re re)) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 (sqrt.f64 re) (.f64 (pow.f64 im #s(literal 5 binary64)) (pow.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 5 binary64))))) (.f64 #s(literal -2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (.f64 (.f64 im (.f64 im im)) (*.f64 #s(literal -1 binary64) (sqrt.f64 #s(literal -1 binary64))))))))))) re)
(* (sqrt re) (sqrt -4))
(*.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -4 binary64)))
(* re (+ (* -1/2 (* (/ (pow im 2) (sqrt -4)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt -4))))
(.f64 re (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 im im)) (sqrt.f64 #s(literal -4 binary64)))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -4 binary64)))))
(* re (+ (* -1/2 (* (/ (pow im 2) (sqrt -4)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/8 (* (/ (pow im 4) (pow (sqrt -4) 3)) (sqrt (/ 1 (pow re 9))))) (* (sqrt (/ 1 re)) (sqrt -4)))))
(.f64 re (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 im im)) (sqrt.f64 #s(literal -4 binary64)))) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -4 binary64))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 #s(literal -4 binary64) (sqrt.f64 #s(literal -4 binary64)))))))))
(* re (+ (* -1/2 (* (/ (pow im 2) (sqrt -4)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/8 (* (/ (pow im 4) (pow (sqrt -4) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* -1/16 (* (/ (pow im 6) (pow (sqrt -4) 5)) (sqrt (/ 1 (pow re 13))))) (* (sqrt (/ 1 re)) (sqrt -4))))))
(.f64 re (+.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 im im)) (sqrt.f64 #s(literal -4 binary64)))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 #s(literal -4 binary64) (sqrt.f64 #s(literal -4 binary64))))))) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -4 binary64))) (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 13 binary64)))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 (sqrt.f64 #s(literal -4 binary64)) #s(literal 5 binary64))))))))
(* -2 (* (sqrt re) (sqrt -1)))
(.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 re)) (sqrt.f64 #s(literal -1 binary64)))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im)))) (.f64 #s(literal 2 binary64) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* 1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (+.f64 (.f64 (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) #s(literal 1/4 binary64)) (.f64 (.f64 #s(literal 1/64 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))))) (.f64 re (.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/64 (* (* (pow im 4) (sqrt -1)) (sqrt (pow re 3)))) (* -1/512 (* (* (pow im 6) (sqrt -1)) (sqrt (/ 1 re))))) (pow re 3))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 2 (* (sqrt (/ 1 re)) (sqrt -1))))))
(.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (-.f64 (.f64 (.f64 (sqrt.f64 re) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 im im))) #s(literal 1/4 binary64)) (/.f64 (+.f64 (.f64 #s(literal -1/64 binary64) (.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (.f64 re (.f64 re re)))))) (.f64 #s(literal -1/512 binary64) (.f64 (pow.f64 im #s(literal 6 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))))) (.f64 re (.f64 re re)))) (.f64 re (*.f64 re re)))) (-.f64 #s(literal 0 binary64) re))
(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) (+ (* -3/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 -3/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) (+ (* -3/512 (pow (/ -4 (pow re 15)) 1/4)) (* 7/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 -3/512 binary64) (pow.f64 (/.f64 #s(literal -4 binary64) (pow.f64 re #s(literal 15 binary64))) #s(literal 1/4 binary64))) (.f64 #s(literal 7/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 (/ -1 re)) (* -2 (log (/ 1 im))))))
(exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (neg.f64 (.f64 (log.f64 im) #s(literal -2 binary64))))))
(+ (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))) (/ (* (pow re 2) (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im))))))) (pow im 2)))
(+.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (neg.f64 (.f64 (log.f64 im) #s(literal -2 binary64)))))) (/.f64 (.f64 (.f64 re re) (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (neg.f64 (.f64 (log.f64 im) #s(literal -2 binary64))))))) (*.f64 im im)))
(+ (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))) (+ (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))) (+ (* -2 (pow re 4)) (* 1/2 (pow re 4)))) (pow im 4)) (/ (* (pow re 2) (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im))))))) (pow im 2))))
(+.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (neg.f64 (.f64 (log.f64 im) #s(literal -2 binary64)))))) (+.f64 (/.f64 (.f64 (.f64 re re) (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (neg.f64 (.f64 (log.f64 im) #s(literal -2 binary64))))))) (.f64 im im)) (.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (neg.f64 (.f64 (log.f64 im) #s(literal -2 binary64)))))) (/.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal -3/2 binary64)) (pow.f64 im #s(literal 4 binary64))))))
(+ (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))) (+ (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))) (+ (* -2 (pow re 4)) (* 1/2 (pow re 4)))) (pow im 4)) (+ (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im)))))) (+ (* -2 (pow re 6)) (+ (* 1/6 (pow re 6)) (* 16/3 (pow re 6))))) (pow im 6)) (/ (* (pow re 2) (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ 1 im))))))) (pow im 2)))))
(+.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (neg.f64 (.f64 (log.f64 im) #s(literal -2 binary64)))))) (+.f64 (+.f64 (.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (neg.f64 (.f64 (log.f64 im) #s(literal -2 binary64)))))) (/.f64 (.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal -3/2 binary64)) (pow.f64 im #s(literal 4 binary64)))) (.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (neg.f64 (.f64 (log.f64 im) #s(literal -2 binary64)))))) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (pow.f64 re #s(literal 6 binary64))) (.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 11/2 binary64))) (pow.f64 im #s(literal 6 binary64))))) (/.f64 (.f64 (.f64 re re) (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (neg.f64 (.f64 (log.f64 im) #s(literal -2 binary64))))))) (.f64 im im))))
(exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im))))))
(exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im))))))
(+ (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))) (/ (* (pow re 2) (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im))))))) (pow im 2)))
(+.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (.f64 (.f64 re re) (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im))))))) (*.f64 im im)))
(+ (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))) (+ (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))) (+ (* -2 (pow re 4)) (* 1/2 (pow re 4)))) (pow im 4)) (/ (* (pow re 2) (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im))))))) (pow im 2))))
(+.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (+.f64 (/.f64 (.f64 (.f64 re re) (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im))))))) (.f64 im im)) (.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal -3/2 binary64)) (pow.f64 im #s(literal 4 binary64))))))
(+ (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))) (+ (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))) (+ (* -2 (pow re 4)) (* 1/2 (pow re 4)))) (pow im 4)) (+ (/ (* (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im)))))) (+ (* -2 (pow re 6)) (+ (* 1/6 (pow re 6)) (* 16/3 (pow re 6))))) (pow im 6)) (/ (* (pow re 2) (exp (* 1/4 (+ (log (/ -1 re)) (* -2 (log (/ -1 im))))))) (pow im 2)))))
(+.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (+.f64 (+.f64 (.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal -3/2 binary64)) (pow.f64 im #s(literal 4 binary64)))) (.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)))))) (/.f64 (+.f64 (.f64 #s(literal -2 binary64) (pow.f64 re #s(literal 6 binary64))) (.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 11/2 binary64))) (pow.f64 im #s(literal 6 binary64))))) (/.f64 (.f64 (.f64 re re) (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (.f64 #s(literal -2 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im))))))) (.f64 im im))))
(exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re)))))
(exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (-.f64 #s(literal 0 binary64) (.f64 im im))) (log.f64 re))))
(+ (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re))))) (/ (* (pow re 2) (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re)))))) (pow im 2)))
(+.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (-.f64 #s(literal 0 binary64) (.f64 im im))) (log.f64 re)))) (.f64 (.f64 re re) (/.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (-.f64 #s(literal 0 binary64) (.f64 im im))) (log.f64 re)))) (*.f64 im im))))
(+ (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re))))) (* (pow re 2) (+ (* -3/2 (/ (* (pow re 2) (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re)))))) (pow im 4))) (/ (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re))))) (pow im 2)))))
(+.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (-.f64 #s(literal 0 binary64) (.f64 im im))) (log.f64 re)))) (.f64 (.f64 re re) (+.f64 (.f64 #s(literal -3/2 binary64) (.f64 (.f64 re re) (/.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (-.f64 #s(literal 0 binary64) (.f64 im im))) (log.f64 re)))) (pow.f64 im #s(literal 4 binary64))))) (/.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (-.f64 #s(literal 0 binary64) (.f64 im im))) (log.f64 re)))) (.f64 im im)))))
(+ (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re))))) (* (pow re 2) (+ (* (pow re 2) (+ (* -3/2 (/ (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re))))) (pow im 4))) (* 7/2 (/ (* (pow re 2) (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re)))))) (pow im 6))))) (/ (exp (* 1/4 (+ (log (* -1 (pow im 2))) (* -1 (log re))))) (pow im 2)))))
(+.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (-.f64 #s(literal 0 binary64) (.f64 im im))) (log.f64 re)))) (.f64 (.f64 re re) (+.f64 (/.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (-.f64 #s(literal 0 binary64) (.f64 im im))) (log.f64 re)))) (.f64 im im)) (.f64 (.f64 re re) (+.f64 (/.f64 (.f64 #s(literal -3/2 binary64) (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (-.f64 #s(literal 0 binary64) (.f64 im im))) (log.f64 re))))) (pow.f64 im #s(literal 4 binary64))) (.f64 #s(literal 7/2 binary64) (.f64 (.f64 re re) (/.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 (-.f64 #s(literal 0 binary64) (*.f64 im im))) (log.f64 re)))) (pow.f64 im #s(literal 6 binary64))))))))))
(exp (* 1/4 (+ (log -4) (* -1 (log (/ 1 re))))))
(exp.f64 (*.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 re) (log.f64 #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))))
(+.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 re) (log.f64 #s(literal -4 binary64))))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (.f64 im im) (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 re) (log.f64 #s(literal -4 binary64))))))) (.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/128 (pow im 4)) (* 1/512 (pow im 4)))) (pow re 4))))
(+.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 re) (log.f64 #s(literal -4 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (.f64 im im) (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 re) (log.f64 #s(literal -4 binary64))))))) (.f64 re re)) (.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 re) (log.f64 #s(literal -4 binary64))))) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -3/512 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/128 (pow im 4)) (* 1/512 (pow im 4)))) (pow re 4)) (/ (* (exp (* 1/4 (+ (log -4) (* -1 (log (/ 1 re)))))) (+ (* -1/2048 (pow im 6)) (+ (* 1/24576 (pow im 6)) (* 1/768 (pow im 6))))) (pow re 6)))))
(+.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 re) (log.f64 #s(literal -4 binary64))))) (+.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (.f64 im im) (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 re) (log.f64 #s(literal -4 binary64))))))) (.f64 re re)) (+.f64 (.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 re) (log.f64 #s(literal -4 binary64))))) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -3/512 binary64)) (pow.f64 re #s(literal 4 binary64)))) (.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (log.f64 re) (log.f64 #s(literal -4 binary64))))) (/.f64 (+.f64 (.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal -1/2048 binary64)) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 11/8192 binary64))) (pow.f64 re #s(literal 6 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 (/.f64 #s(literal -1 binary64) 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 (/.f64 #s(literal -1 binary64) 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 (/.f64 #s(literal -1 binary64) 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/128 (pow im 4)) (* 1/512 (pow im 4)))) (pow re 4))))
(+.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) 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 (/.f64 #s(literal -1 binary64) re))))))) (.f64 re re)) (.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -3/512 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/128 (pow im 4)) (* 1/512 (pow im 4)))) (pow re 4)) (/ (* (exp (* 1/4 (+ (log 4) (* -1 (log (/ -1 re)))))) (+ (* -1/2048 (pow im 6)) (+ (* 1/24576 (pow im 6)) (* 1/768 (pow im 6))))) (pow re 6)))))
(+.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) 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 (/.f64 #s(literal -1 binary64) re))))))) (.f64 re re)) (+.f64 (.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -3/512 binary64)) (pow.f64 re #s(literal 4 binary64)))) (.f64 (exp.f64 (.f64 #s(literal 1/4 binary64) (-.f64 (log.f64 #s(literal 4 binary64)) (log.f64 (/.f64 #s(literal -1 binary64) re))))) (/.f64 (+.f64 (.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal -1/2048 binary64)) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 11/8192 binary64))) (pow.f64 re #s(literal 6 binary64)))))))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(+ (* -4 re) (* -1 (/ (pow im 2) re)))
(-.f64 (.f64 re #s(literal -4 binary64)) (/.f64 (.f64 im im) re))
(+ (* -4 re) (* -1 (/ (pow im 2) re)))
(-.f64 (.f64 re #s(literal -4 binary64)) (/.f64 (.f64 im im) re))
(+ (* -4 re) (* -1 (/ (pow im 2) re)))
(-.f64 (.f64 re #s(literal -4 binary64)) (/.f64 (.f64 im im) re))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(.f64 (.f64 im im) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 re (.f64 im im))) (/.f64 #s(literal 1 binary64) re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(.f64 (.f64 im im) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 re (.f64 im im))) (/.f64 #s(literal 1 binary64) re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(.f64 (.f64 im im) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 re (.f64 im im))) (/.f64 #s(literal 1 binary64) re)))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(.f64 (.f64 im im) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 re (.f64 im im))) (/.f64 #s(literal 1 binary64) re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(.f64 (.f64 im im) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 re (.f64 im im))) (/.f64 #s(literal 1 binary64) re)))
(* (pow im 2) (- (* -4 (/ re (pow im 2))) (/ 1 re)))
(.f64 (.f64 im im) (-.f64 (.f64 #s(literal -4 binary64) (/.f64 re (.f64 im im))) (/.f64 #s(literal 1 binary64) re)))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)
(/.f64 (-.f64 (.f64 (.f64 re re) #s(literal -4 binary64)) (*.f64 im im)) re)
(/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)
(/.f64 (-.f64 (.f64 (.f64 re re) #s(literal -4 binary64)) (*.f64 im im)) re)
(/ (+ (* -4 (pow re 2)) (* -1 (pow im 2))) re)
(/.f64 (-.f64 (.f64 (.f64 re re) #s(literal -4 binary64)) (*.f64 im im)) re)
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))
(.f64 re (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) (.f64 im im)) (*.f64 re re)) #s(literal -4 binary64)))
(* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))
(.f64 re (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) (.f64 im im)) (*.f64 re re)) #s(literal -4 binary64)))
(* re (- (* -1 (/ (pow im 2) (pow re 2))) 4))
(.f64 re (+.f64 (/.f64 (-.f64 #s(literal 0 binary64) (.f64 im im)) (*.f64 re re)) #s(literal -4 binary64)))
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(.f64 (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
im
(+ im (* -1 re))
(-.f64 im re)
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(+.f64 im (.f64 re (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 re im)) #s(literal -1 binary64))))
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(+.f64 im (.f64 re (+.f64 (.f64 re (+.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 re re)) (.f64 im (.f64 im im))))) #s(literal -1 binary64))))
(* 1/2 (/ (pow im 2) re))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)
(/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (.f64 re re)) (.f64 #s(literal 1/2 binary64) (.f64 im im))) re)
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)
(/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (.f64 re re)) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) re)
(/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)
(/.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (.f64 re re)) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (pow.f64 re #s(literal 6 binary64))))) re)
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(.f64 (+.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(.f64 (+.f64 #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))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(.f64 (+.f64 (+.f64 #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 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re)) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64))))) (-.f64 #s(literal 0 binary64) re))
(* 1/2 (/ (pow im 2) re))
(/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) re)
(* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))
(.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 im im)) (.f64 re (.f64 re re))) (/.f64 #s(literal 1/2 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (.f64 (.f64 im im) (-.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/8 binary64) (.f64 re (.f64 re re)))))))
(* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (.f64 (.f64 im im) (-.f64 (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 (.f64 #s(literal -5/128 binary64) (.f64 im im)) (pow.f64 re #s(literal 7 binary64))))) (/.f64 #s(literal 1/8 binary64) (.f64 re (.f64 re re)))))))
im
(* im (+ 1 (* -1 (/ re im))))
(*.f64 im (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(.f64 im (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im)) (/.f64 re im))))
(* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))
(.f64 im (-.f64 (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (*.f64 im im))) (/.f64 re im)))
(* -1 im)
(-.f64 #s(literal 0 binary64) im)
(* -1 (* im (+ 1 (/ re im))))
(-.f64 #s(literal 0 binary64) (*.f64 im (+.f64 #s(literal 1 binary64) (/.f64 re im))))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 re re)) im) re) im)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (-.f64 #s(literal 0 binary64) (/.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im))) im)) re) im)) (-.f64 #s(literal 0 binary64) im))
im
(+ im (* 1/2 (/ (pow re 2) im)))
(+.f64 im (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) im))
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+.f64 im (.f64 (.f64 re re) (+.f64 (/.f64 #s(literal 1/2 binary64) im) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 re re)) (.f64 im (.f64 im im))))))
(+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))
(+.f64 im (.f64 (.f64 re re) (+.f64 (/.f64 #s(literal 1/2 binary64) im) (.f64 (.f64 re re) (-.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 re re)) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal 1/8 binary64) (.f64 im (.f64 im im))))))))
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(.f64 re (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(.f64 re (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re)) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64))))))
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(.f64 (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re)) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64))))) (-.f64 #s(literal 0 binary64) re))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(+.f64 re (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) re))
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+.f64 re (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 im im)) (.f64 re (.f64 re re))) (/.f64 #s(literal 1/2 binary64) re))))
(+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
(+.f64 re (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (.f64 (.f64 im im) (-.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal 1/8 binary64) (.f64 re (.f64 re re))))))))
im
(* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))
(.f64 im (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))
(.f64 im (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64)))) (/.f64 (.f64 #s(literal 1/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 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(.f64 (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64)))) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (*.f64 im im))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
(.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im)) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64)))))) (-.f64 #s(literal 0 binary64) im))
(* 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))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* re (- (/ re im) 2))
(*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))
(* re (- (/ re im) 2))
(*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))
(* re (- (/ re im) 2))
(*.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(.f64 (.f64 re re) (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 2 binary64) re)))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(.f64 (.f64 re re) (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 2 binary64) re)))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(.f64 (.f64 re re) (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 2 binary64) re)))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(.f64 (.f64 re re) (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 2 binary64) re)))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(.f64 (.f64 re re) (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 2 binary64) re)))
(* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re))))
(.f64 (.f64 re re) (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 2 binary64) re)))
(/ (pow re 2) im)
(/.f64 (*.f64 re re) im)
(/ (+ (* -2 (* im re)) (pow re 2)) im)
(/.f64 (+.f64 (.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 re #s(literal -2 binary64))
(+ (* -2 re) (/ (pow re 2) im))
(+.f64 (.f64 re #s(literal -2 binary64)) (/.f64 (.f64 re re) im))
(+ (* -2 re) (/ (pow re 2) im))
(+.f64 (.f64 re #s(literal -2 binary64)) (/.f64 (.f64 re re) im))
(+ (* -2 re) (/ (pow re 2) im))
(+.f64 (.f64 re #s(literal -2 binary64)) (/.f64 (.f64 re re) im))
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(+ (* -2 re) (/ (pow re 2) im))
(+.f64 (.f64 re #s(literal -2 binary64)) (/.f64 (.f64 re re) im))
(+ (* -2 re) (/ (pow re 2) im))
(+.f64 (.f64 re #s(literal -2 binary64)) (/.f64 (.f64 re re) im))
(+ (* -2 re) (/ (pow re 2) im))
(+.f64 (.f64 re #s(literal -2 binary64)) (/.f64 (.f64 re re) 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 im 2)
(*.f64 im im)
(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)

eval236.0ms (2.5%)

Compiler: Compiled 30114 to 4962 computations (83.5% saved)

prune303.0ms (3.2%)

Pruning

25 alts after pruning (17 fresh and 8 done)

	Pruned	Kept	Total
New	1184	6	1190
Fresh	1	11	12
Picked	2	3	5
Done	0	5	5
Total	1187	25	1212

Accuracy

99.9%

Counts

1212 → 25

Alt Table

Click to see full alt table

Status	Accuracy	Program
	24.1%	(/.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re))
	52.3%	(/.f64 #s(literal 1/2 binary64) (pow.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal -2 binary64)))) #s(literal -1/2 binary64)))
	23.4%	(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
	24.1%	(.f64 (pow.f64 re #s(literal -1/2 binary64)) (.f64 #s(literal 1/2 binary64) im))
	24.0%	(.f64 (.f64 #s(literal 1/2 binary64) (.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) re))))
	54.8%	(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64)))
	74.6%	(.f64 (.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 (log.f64 (-.f64 (hypot.f64 re im) re)) #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
✓	24.1%	(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
	22.8%	(.f64 im (/.f64 #s(literal 1/2 binary64) (exp.f64 (.f64 (log.f64 re) #s(literal 1/2 binary64)))))
	27.0%	(.f64 #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)))
✓	78.9%	(.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)) #s(literal 1/16 binary64)) #s(literal 8 binary64)))
	67.9%	(.f64 #s(literal 1/2 binary64) (pow.f64 (pow.f64 (exp.f64 #s(literal 1/16 binary64)) (log.f64 (.f64 (-.f64 (hypot.f64 re im) re) #s(literal 2 binary64)))) #s(literal 8 binary64)))
	44.3%	(.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (+.f64 (.f64 im #s(literal 2 binary64)) (/.f64 (-.f64 (.f64 (.f64 re #s(literal -2 binary64)) (.f64 re #s(literal -2 binary64))) (.f64 (.f64 re re) (/.f64 (.f64 re re) (.f64 im im)))) (-.f64 (.f64 re #s(literal -2 binary64)) (/.f64 re (/.f64 im re)))))))))
	52.2%	(.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 re (*.f64 im im))) (/.f64 #s(literal 1/2 binary64) im)))))
✓	16.8%	(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 im (/.f64 re im))))
	26.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (.f64 re #s(literal -4 binary64)) (/.f64 (*.f64 im im) re))))
	47.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (/.f64 (-.f64 (.f64 (/.f64 (.f64 re re) im) (/.f64 (.f64 re re) im)) (.f64 (.f64 re #s(literal -2 binary64)) (.f64 re #s(literal -2 binary64)))) (-.f64 (/.f64 (.f64 re re) im) (.f64 re #s(literal -2 binary64)))))))
✓	52.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (.f64 im #s(literal 2 binary64)) (*.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im))))))
	12.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (.f64 im im) (+.f64 (.f64 #s(literal -4 binary64) (/.f64 re (*.f64 im im))) (/.f64 #s(literal -1 binary64) re)))))
✓	28.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re #s(literal -4 binary64))))
	54.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))))
✓	52.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))))
✓	80.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
✓	55.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 im re))))
	74.1%	(.f64 #s(literal 1/2 binary64) (exp.f64 (+.f64 (.f64 (log.f64 (-.f64 (hypot.f64 re im) re)) #s(literal 1/2 binary64)) (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))

Compiler

Compiled 978 to 485 computations (50.4% saved)

regimes107.0ms (1.1%)

Counts

40 → 2

Calls

Call 1

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

Outputs
(/.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))

Calls

7 calls:

26.0ms	re
19.0ms	(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)
12.0ms	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))
12.0ms	(*.f64 im im)
12.0ms	(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))

Results

Accuracy	Segments	Branch
90.2%	2	`re`
80.6%	1	`im`
93.1%	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))))`
93.1%	2	`(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`
92.8%	2	`(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))`
92.8%	2	`(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`
80.6%	1	`(*.f64 im im)`

Compiler

Compiled 69 to 45 computations (34.8% saved)

regimes29.0ms (0.3%)

Counts

23 → 3

Calls

Call 1

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

Outputs

(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64))))

(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 re #s(literal -2 binary64)) im)))))

(/.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re))

Calls

3 calls:

14.0ms	im
7.0ms	re
6.0ms	(*.f64 im im)

Results

Accuracy	Segments	Branch
65.2%	3	`(*.f64 im im)`
69.1%	5	`im`
78.2%	3	`re`

Compiler

Compiled 11 to 7 computations (36.4% saved)

regimes4.0ms (0%)

Counts

10 → 3

Calls

Call 1

Inputs
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re #s(literal -4 binary64))))
(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
(/.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re))
(.f64 (.f64 im #s(literal 1/2 binary64)) (pow.f64 re #s(literal -1/2 binary64)))
(.f64 (pow.f64 re #s(literal -1/2 binary64)) (.f64 #s(literal 1/2 binary64) im))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 im re))))
(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 im (/.f64 re im))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (.f64 im im) re)))

Outputs

(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64))))

(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 im re))))

(/.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re))

Calls

1 calls:

4.0ms

re

Results

Accuracy	Segments	Branch
78.2%	3	`re`

Compiler

Compiled 3 to 2 computations (33.3% saved)

regimes3.0ms (0%)

Counts

7 → 3

Calls

Call 1

Inputs
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re #s(literal -4 binary64))))
(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))
(/.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re))
(.f64 (.f64 im #s(literal 1/2 binary64)) (pow.f64 re #s(literal -1/2 binary64)))
(.f64 (pow.f64 re #s(literal -1/2 binary64)) (.f64 #s(literal 1/2 binary64) im))

Outputs

(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64))))

(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))

(/.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re))

Calls

1 calls:

3.0ms

re

Results

Accuracy	Segments	Branch
76.8%	3	`re`

Compiler

Compiled 3 to 2 computations (33.3% saved)

regimes16.0ms (0.2%)

Counts

4 → 3

Calls

Call 1

Inputs
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re #s(literal -4 binary64))))
(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))
(/.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) im))

Outputs

(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 re #s(literal -4 binary64))))

(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))

(*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))

Calls

1 calls:

2.0ms

re

Results

Accuracy	Segments	Branch
76.8%	3	`re`

Compiler

Compiled 3 to 2 computations (33.3% saved)

regimes2.0ms (0%)

Counts

2 → 2

Calls

Call 1

Inputs
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re #s(literal -4 binary64))))

Outputs
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re #s(literal -4 binary64))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))))

Calls

1 calls:

2.0ms

re

Results

Accuracy	Segments	Branch
64.9%	2	`re`

Compiler

Compiled 3 to 2 computations (33.3% saved)

regimes3.0ms (0%)

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

Inputs
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))))

Outputs
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))))

Calls

2 calls:

1.0ms	im
1.0ms	re

Results

Accuracy	Segments	Branch
52.5%	1	`im`
52.5%	1	`re`

Compiler

Compiled 6 to 4 computations (33.3% saved)

bsearch0.0ms (0%)

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.0	4.482646821016279e-150

Compiler

Compiled 22 to 16 computations (27.3% saved)

bsearch35.0ms (0.4%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
22.0ms	4.052103822611999e-80	1.9172893285884894e-78
9.0ms	-8.032513675937327e+108	-3.857739526822842e+108

Results

13.0ms	164×	0	valid
4.0ms	17×	2	valid
2.0ms	11×	1	valid

Compiler

Compiled 310 to 249 computations (19.7% saved)

Precisions

Click to see histograms. Total time spent on operations: 13.0ms

ival-mult: 6.0ms (45.8% of total)

ival-sqrt: 3.0ms (22.9% of total)

backward-pass: 1.0ms (7.6% of total)

ival-sub: 1.0ms (7.6% of total)

ival-add: 1.0ms (7.6% of total)

const: 0.0ms (0% of total)

bsearch61.0ms (0.6%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
38.0ms	4.052103822611999e-80	1.9172893285884894e-78
20.0ms	-8.032513675937327e+108	-3.857739526822842e+108

Results

43.0ms	159×	0	valid
6.0ms	24×	2	valid
2.0ms	9×	1	valid

Compiler

Compiled 262 to 213 computations (18.7% saved)

Precisions

Click to see histograms. Total time spent on operations: 24.0ms

ival-mult: 17.0ms (69.7% of total)

ival-sqrt: 4.0ms (16.4% of total)

ival-add: 1.0ms (4.1% of total)

backward-pass: 1.0ms (4.1% of total)

ival-sub: 1.0ms (4.1% of total)

const: 0.0ms (0% of total)

bsearch35.0ms (0.4%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
21.0ms	13016640771217.39	199579684577093.53
11.0ms	-8.032513675937327e+108	-3.857739526822842e+108

Results

13.0ms	126×	0	valid
10.0ms	39×	2	valid
2.0ms	11×	1	valid

Compiler

Compiled 220 to 186 computations (15.5% saved)

Precisions

Click to see histograms. Total time spent on operations: 17.0ms

ival-mult: 7.0ms (41.8% of total)

ival-sqrt: 5.0ms (29.9% of total)

backward-pass: 1.0ms (6% of total)

ival-sub: 1.0ms (6% of total)

ival-add: 1.0ms (6% of total)

const: 0.0ms (0% of total)

bsearch34.0ms (0.4%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
20.0ms	13016640771217.39	199579684577093.53
11.0ms	-8.032513675937327e+108	-3.857739526822842e+108

Results

14.0ms	138×	0	valid
8.0ms	31×	2	valid
1.0ms	7×	1	valid

Compiler

Compiled 220 to 186 computations (15.5% saved)

Precisions

Click to see histograms. Total time spent on operations: 16.0ms

ival-mult: 9.0ms (55.7% of total)

ival-sqrt: 4.0ms (24.8% of total)

backward-pass: 1.0ms (6.2% of total)

ival-sub: 1.0ms (6.2% of total)

ival-add: 1.0ms (6.2% of total)

const: 0.0ms (0% of total)

bsearch11.0ms (0.1%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
9.0ms	-8.032513675937327e+108	-3.857739526822842e+108

Results

7.0ms

80×

valid

Compiler

Compiled 112 to 96 computations (14.3% saved)

Precisions

Click to see histograms. Total time spent on operations: 4.0ms

ival-mult: 2.0ms (46.3% of total)

ival-sqrt: 1.0ms (23.2% of total)

ival-sub: 0.0ms (0% of total)

ival-add: 0.0ms (0% of total)

const: 0.0ms (0% of total)

backward-pass: 0.0ms (0% of total)

simplify12.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

30×	`*-commutative_binary64`
12×	`+-commutative_binary64`
8×	`sub-neg_binary64`
2×	`neg-sub0_binary64`
2×	`neg-mul-1_binary64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	67	166
1	87	166
2	93	166
3	95	166
4	96	166

Stop Event

1×

saturated

Calls

Call 1

Inputs
(if (<=.f64 (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #s(literal 0 binary64)) (/.f64 (.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))))
(if (<=.f64 re #s(literal -4000000000000000135995966852011298379775898878851592190853722859351501086892803333170966465522933783685234688 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 495407149444547/260740604970814219042361048116400404614587954389239840081425977517360806369707098391474864128 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (.f64 re #s(literal -2 binary64)) im))))) (/.f64 (.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re))))
(if (<=.f64 re #s(literal -4050000000000000020362644200795041040460625962457055016674814919935466813837273492023240679973776179817611264 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 6257774519299541/4171849679533027504677776769862406473833407270227837441302815640277772901915313574263597826048 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 im re)))) (/.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re))))
(if (<=.f64 re #s(literal -3899999999999999845781402212815374973684348478839857310035629959703889470151907980744805297207052208470753280 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 14500000000000 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64)))) (/.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re))))
(if (<=.f64 re #s(literal -4500000000000000022625160223105601156067362180507838907416461022150518682041414991136934088859751310908456960 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 190000000000000 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64)))) (*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))))
(if (<=.f64 re #s(literal -3899999999999999845781402212815374973684348478839857310035629959703889470151907980744805297207052208470753280 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re #s(literal -4 binary64)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64)))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))))

Outputs
(if (<=.f64 (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #s(literal 0 binary64)) (/.f64 (.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))))
(if (<=.f64 re #s(literal -4000000000000000135995966852011298379775898878851592190853722859351501086892803333170966465522933783685234688 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 495407149444547/260740604970814219042361048116400404614587954389239840081425977517360806369707098391474864128 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (.f64 re #s(literal -2 binary64)) im))))) (/.f64 (.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re))))
(if (<=.f64 re #s(literal -4050000000000000020362644200795041040460625962457055016674814919935466813837273492023240679973776179817611264 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 6257774519299541/4171849679533027504677776769862406473833407270227837441302815640277772901915313574263597826048 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 im re)))) (/.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re))))
(if (<=.f64 re #s(literal -3899999999999999845781402212815374973684348478839857310035629959703889470151907980744805297207052208470753280 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 14500000000000 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64)))) (/.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re))))
(if (<=.f64 re #s(literal -3899999999999999845781402212815374973684348478839857310035629959703889470151907980744805297207052208470753280 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 14500000000000 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) im))) (/.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re))))
(if (<=.f64 re #s(literal -4500000000000000022625160223105601156067362180507838907416461022150518682041414991136934088859751310908456960 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 190000000000000 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64)))) (*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))))
(if (<=.f64 re #s(literal -4500000000000000022625160223105601156067362180507838907416461022150518682041414991136934088859751310908456960 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re #s(literal -4 binary64)))) (if (<=.f64 re #s(literal 190000000000000 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) im))) (*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)))))
(if (<=.f64 re #s(literal -3899999999999999845781402212815374973684348478839857310035629959703889470151907980744805297207052208470753280 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re #s(literal -4 binary64)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64)))))
(if (<=.f64 re #s(literal -3899999999999999845781402212815374973684348478839857310035629959703889470151907980744805297207052208470753280 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 re #s(literal -4 binary64)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) im))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) im)))

soundness1.2s (12.3%)

Rules

6836×	`-lowering-.f32`
6836×	`-lowering-.f64`
4918×	`-lowering-.f32`
4918×	`-lowering-.f64`
3162×	`+-lowering-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	32	160
1	139	151
2	950	141
0	8548	141
0	40	150
1	185	140
2	1256	140
0	8256	140
0	12	10
1	19	10
2	32	10
3	52	10
4	82	10
5	129	10
6	240	10
7	411	10
8	661	10
9	901	10
10	1200	10
11	1425	10
12	1486	10
13	1566	10
14	1680	10
15	1804	10
16	1928	10
17	1961	10
18	1969	10
0	1969	10
0	551	5460
1	1951	5168
2	7427	5166
0	8260	5166

Stop Event

1×	fuel
1×	iter limit
1×	node limit
1×	iter limit
1×	saturated
1×	iter limit
1×	node limit
1×	iter limit
1×	node limit

Compiler

Compiled 372 to 229 computations (38.4% saved)

preprocess65.0ms (0.7%)

Remove: (abs im)
Compiler: Compiled 506 to 246 computations (51.4% saved)

analyze139.0ms (1.5%)

sample1.7s (18.4%)

preprocess130.0ms (1.4%)

explain177.0ms (1.9%)

eval0.0ms (0%)

prune1.0ms (0%)

simplify58.0ms (0.6%)

localize149.0ms (1.6%)

series27.0ms (0.3%)

rewrite308.0ms (3.3%)

simplify410.0ms (4.4%)

eval71.0ms (0.8%)

prune65.0ms (0.7%)

simplify181.0ms (1.9%)

localize167.0ms (1.8%)

series54.0ms (0.6%)

rewrite334.0ms (3.5%)

simplify376.0ms (4%)

eval233.0ms (2.5%)

prune127.0ms (1.4%)

simplify192.0ms (2%)

localize190.0ms (2%)

series45.0ms (0.5%)

rewrite336.0ms (3.6%)

simplify449.0ms (4.8%)

eval131.0ms (1.4%)

prune149.0ms (1.6%)

simplify161.0ms (1.7%)

localize178.0ms (1.9%)

series56.0ms (0.6%)

rewrite312.0ms (3.3%)

simplify367.0ms (3.9%)

eval236.0ms (2.5%)

prune303.0ms (3.2%)

regimes107.0ms (1.1%)

regimes29.0ms (0.3%)

regimes4.0ms (0%)

regimes3.0ms (0%)

regimes16.0ms (0.2%)

regimes2.0ms (0%)

regimes3.0ms (0%)

bsearch0.0ms (0%)

bsearch35.0ms (0.4%)

bsearch61.0ms (0.6%)

bsearch35.0ms (0.4%)

bsearch34.0ms (0.4%)

bsearch11.0ms (0.1%)

simplify12.0ms (0.1%)

soundness1.2s (12.3%)

preprocess65.0ms (0.7%)

end0.0ms (0%)

Profiling