Metrics for math.sqrt on complex, real part

analyze174.0ms (1.9%)

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
0%	0%	99.9%	0.1%	0%	0%	0%	0
0%	0%	99.9%	0.1%	0%	0%	0%	1
0%	0%	99.9%	0.1%	0%	0%	0%	2
50%	50%	50%	0.1%	0%	0%	0%	3
50%	50%	50%	0.1%	0%	0%	0%	4
62.5%	62.4%	37.5%	0.1%	0%	0%	0%	5
62.5%	62.4%	37.5%	0.1%	0%	0%	0%	6
68.8%	68.7%	31.2%	0.1%	0%	0%	0%	7
68.8%	68.7%	31.2%	0.1%	0%	0%	0%	8
71.9%	71.8%	28.1%	0.1%	0%	0%	0%	9
71.9%	71.8%	28.1%	0.1%	0%	0%	0%	10
73.4%	73.4%	26.5%	0.1%	0%	0%	0%	11
73.4%	73.4%	26.5%	0.1%	0%	0%	0%	12

Compiler

Compiled 18 to 13 computations (27.8% saved)

Precisions

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

ival-mult: 52.0ms (64% of total)

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

ival-add: 11.0ms (13.5% of total)

const: 2.0ms (2.5% of total)

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

sample1.7s (17.7%)

Results

629.0ms	6266×	0	valid
482.0ms	1203×	2	valid
114.0ms	602×	1	valid
74.0ms	185×	3	valid

Precisions

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

ival-mult: 378.0ms (43.3% of total)

ival-sqrt: 232.0ms (26.6% of total)

ival-add: 174.0ms (20% of total)

backward-pass: 70.0ms (8% of total)

const: 19.0ms (2.2% of total)

Bogosity

preprocess59.0ms (0.6%)

Algorithm

2×	egg-herbie

Rules

832×	`fnmadd-define`
744×	`fmsub-define`
700×	`fnmsub-define`
500×	`fmm-def`
402×	`fma-define`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	36	60
1	118	60
2	210	60
3	358	60
4	717	60
5	1227	60
6	1756	60
7	2391	60
8	2786	60
9	2826	60
0	12	10
1	26	10
2	35	10
3	37	10
0	37	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 re (hypot.f64 re im)))))

Call 2

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

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

Symmetry

(abs im)

explain242.0ms (2.6%)

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
130	-	2	(-3.59332020745019e-157 8.242981084503955e-199)	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`
32	-	1	(-2.3411968725051298e-122 5.826255614257182e-219)	`(sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`
30	-	0	-	`(+.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`
0	-	0	-	`#s(literal 1/2 binary64)`
0	-	0	-	`(*.f64 im im)`
0	-	0	-	`re`
0	-	0	-	`(.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))`
0	-	0	-	`#s(literal 2 binary64)`
0	-	0	-	`(+.f64 (.f64 re re) (.f64 im im))`
0	-	0	-	`im`
0	-	0	-	`(*.f64 re re)`
0	-	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

101.0ms	384×	0	valid
55.0ms	86×	2	valid
12.0ms	32×	1	valid
6.0ms	10×	3	valid

Compiler

Compiled 173 to 38 computations (78% saved)

Precisions

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

ival-mult: 29.0ms (49.6% of total)

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

ival-add: 10.0ms (17.1% of total)

backward-pass: 7.0ms (12% of total)

const: 1.0ms (1.7% 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
▶	42.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))
▶	78.3%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))

Status

Accuracy

Program

▶

42.1%

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

▶

78.3%

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

Compiler

Compiled 29 to 21 computations (27.6% saved)

simplify7.0ms (0.1%)

Algorithm

1×	egg-herbie

Localize:

Found 8 expressions of interest:

New	Metric	Score	Program
✓	cost-diff	0	(.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))
✓	cost-diff	0	(sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))
✓	cost-diff	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))))
✓	cost-diff	320	(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))
✓	cost-diff	0	(+.f64 re (hypot.f64 re im))
✓	cost-diff	0	(*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))
✓	cost-diff	0	(sqrt.f64 (*.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im))))
✓	cost-diff	0	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))

Rules

20×	`-lowering-.f32`
20×	`-lowering-.f64`
12×	`fma-lowering-fma.f32`
12×	`fma-define`
12×	`+-lowering-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	16	83
1	32	83
2	40	83
0	40	83

Stop Event

1×	iter limit
1×	saturated

Calls

Call 1

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

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

localize308.0ms (3.3%)

Localize:

Found 8 expressions of interest:

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

Results

212.0ms	65×	5	exit
65.0ms	191×	0	valid

Compiler

Compiled 115 to 18 computations (84.3% saved)

Precisions

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

ival-mult: 29.0ms (33.7% of total)

backward-pass: 17.0ms (19.8% of total)

compiled-spec: 15.0ms (17.5% of total)

ival-sqrt: 13.0ms (15.1% of total)

ival-add: 11.0ms (12.8% of total)

const: 1.0ms (1.2% of total)

series25.0ms (0.3%)

Counts

10 → 240

Calls

Call 1

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

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

Calls

60 calls:

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

rewrite39.0ms (0.4%)

Algorithm

1×	batch-egg-rewrite

Rules

64×	`-lowering-.f32`
64×	`-lowering-.f64`
36×	`pow-to-exp`
36×	`logaddexp-define`
32×	`exp-prod`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	16	68
1	42	68
2	71	68
3	101	68
4	149	68
5	197	68
6	217	68
0	217	68

Stop Event

1×	iter limit
1×	saturated

Counts

10 → 59

Calls

Call 1

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

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

simplify317.0ms (3.4%)

Algorithm

1×	egg-herbie

Rules

7220×	`-lowering-.f32`
7220×	`-lowering-.f64`
2506×	`+-lowering-+.f64`
2506×	`+-lowering-+.f32`
1616×	`sum3-define`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	500	5174
1	1776	4554
2	6909	4474
0	8988	4474

Stop Event

1×	iter limit
1×	node limit

Counts

240 → 240

Calls

Call 1

Inputs
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))
(* re (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))
(* re (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
(* re (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/64 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(+ (* 1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/1024 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))
(+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))))
(+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* -1/4 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/8 (sqrt (/ 1 (pow re 3)))))))
(+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/4 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* (sqrt im) (sqrt 2))
(+ (* 1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(* (sqrt re) (pow (sqrt 2) 2))
(* re (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))
(* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))
(* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/32 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
(* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))
(+ (* 1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/512 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* (sqrt re) (pow (sqrt 2) 2))
(+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (pow (sqrt 2) 2)))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* -1/2 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/4 (sqrt (/ 1 (pow re 3)))))))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* 1/4 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/2 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))
(* (sqrt im) (sqrt 2))
(* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* 2 im)
(+ (* 2 im) (* 2 re))
(+ (* 2 im) (* re (+ 2 (/ re im))))
(+ (* 2 im) (* re (+ 2 (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))))))
(* 4 re)
(* re (+ 4 (/ (pow im 2) (pow re 2))))
(* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))
(* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))
(* -1 (/ (pow im 2) re))
(* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re))
(* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re))
(* -1 (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re))
(* 4 re)
(+ (* 4 re) (/ (pow im 2) re))
(+ (* 4 re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))))
(+ (* 4 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))))
(* 2 im)
(* im (+ 2 (* 2 (/ re im))))
(* im (+ 2 (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(* im (+ 2 (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2))))))
(* -2 im)
(* -1 (* im (+ 2 (* -2 (/ re im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (pow re 2) im)) (* 2 re)) im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im)) (* 2 re)) im)))))
im
(+ im re)
(+ im (* re (+ 1 (* 1/2 (/ re im)))))
(+ im (* re (+ 1 (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))
(* 2 re)
(* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))
(* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1/2 (/ (pow im 2) re))
(* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re))
(* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re))
(* -1 (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re))
(* 2 re)
(+ (* 1/2 (/ (pow im 2) re)) (* 2 re))
(+ (* 2 re) (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+ (* 2 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
im
(* im (+ 1 (/ re im)))
(* im (+ 1 (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im)))))
(* -1 im)
(* -1 (* im (+ 1 (* -1 (/ re im)))))
(* -1 (* im (+ 1 (* -1 (/ (+ re (* -1/2 (/ (pow re 2) im))) im)))))
(* -1 (* im (+ 1 (* -1 (/ (+ re (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im))) im)))))
im
(+ im (* 1/2 (/ (pow re 2) im)))
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
im
(* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))
(* re (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))
(* re (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
(* re (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/64 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(+ (* 1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/1024 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))
(+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))))
(+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* -1/4 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/8 (sqrt (/ 1 (pow re 3)))))))
(+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/4 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* (sqrt im) (sqrt 2))
(+ (* 1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(* (sqrt re) (pow (sqrt 2) 2))
(* re (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))
(* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))
(* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/32 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
(* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))
(+ (* 1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/512 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* (sqrt re) (pow (sqrt 2) 2))
(+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (pow (sqrt 2) 2)))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* -1/2 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/4 (sqrt (/ 1 (pow re 3)))))))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* 1/4 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/2 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))
(* (sqrt im) (sqrt 2))
(* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* 2 im)
(+ (* 2 im) (* 2 re))
(+ (* 2 im) (* re (+ 2 (/ re im))))
(+ (* 2 im) (* re (+ 2 (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))))))
(* 4 re)
(* re (+ 4 (/ (pow im 2) (pow re 2))))
(* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))
(* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))
(* -1 (/ (pow im 2) re))
(* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re))
(* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re))
(* -1 (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re))
(* 4 re)
(+ (* 4 re) (/ (pow im 2) re))
(+ (* 4 re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))))
(+ (* 4 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))))
(* 2 im)
(* im (+ 2 (* 2 (/ re im))))
(* im (+ 2 (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(* im (+ 2 (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2))))))
(* -2 im)
(* -1 (* im (+ 2 (* -2 (/ re im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (pow re 2) im)) (* 2 re)) im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im)) (* 2 re)) im)))))
im
(+ im re)
(+ im (* re (+ 1 (* 1/2 (/ re im)))))
(+ im (* re (+ 1 (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))
(* 2 re)
(* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))
(* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1/2 (/ (pow im 2) re))
(* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re))
(* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re))
(* -1 (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re))
(* 2 re)
(+ (* 1/2 (/ (pow im 2) re)) (* 2 re))
(+ (* 2 re) (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+ (* 2 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
im
(* im (+ 1 (/ re im)))
(* im (+ 1 (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im)))))
(* -1 im)
(* -1 (* im (+ 1 (* -1 (/ re im)))))
(* -1 (* im (+ 1 (* -1 (/ (+ re (* -1/2 (/ (pow re 2) im))) im)))))
(* -1 (* im (+ 1 (* -1 (/ (+ re (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im))) im)))))
(pow im 2)
(+ (pow im 2) (pow re 2))
(+ (pow im 2) (pow re 2))
(+ (pow im 2) (pow re 2))
(pow re 2)
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(pow re 2)
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(pow re 2)
(+ (pow im 2) (pow re 2))
(+ (pow im 2) (pow re 2))
(+ (pow im 2) (pow re 2))
(pow im 2)
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(pow im 2)
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))

Outputs
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+.f64 (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 re (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/4 binary64)))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))))))
(+.f64 (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 re (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (.f64 #s(literal 1/16 binary64) re)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/4 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(+.f64 (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/4 binary64))) (.f64 re (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (.f64 #s(literal -1/32 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/16 binary64))))))))
(* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(* re (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))
(.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (.f64 im im))) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* re (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
(.f64 re (+.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (.f64 im im))) (.f64 #s(literal -1/32 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))))
(* re (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/64 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
(.f64 re (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (.f64 im im))) (.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (+.f64 (.f64 #s(literal -1/32 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (.f64 #s(literal -1/64 binary64) (pow.f64 im #s(literal 4 binary64))) #s(literal 2 binary64))))))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))
(+ (* 1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 (/.f64 (.f64 (.f64 im (.f64 im im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal 1/32 binary64))))
(+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 (sqrt.f64 re) (.f64 (.f64 im (.f64 im im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal 1/64 binary64) (.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 re (*.f64 re re))))
(+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/1024 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 (sqrt.f64 re) (.f64 (.f64 im (.f64 im im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (+.f64 (/.f64 (.f64 #s(literal 1/64 binary64) (.f64 (pow.f64 im #s(literal 5 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 #s(literal 1/512 binary64) (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 re (.f64 re re))))
(* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))))
(+.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 re)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (.f64 #s(literal 1/8 binary64) (.f64 im im))))
(+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* -1/4 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/8 (sqrt (/ 1 (pow re 3)))))))
(+.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 re)) (.f64 (.f64 im im) (+.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (+.f64 (/.f64 #s(literal 1/32 binary64) (.f64 re (.f64 re re))) (/.f64 #s(literal 1/8 binary64) (.f64 re (.f64 re re))))) (.f64 (.f64 im im) #s(literal -1/4 binary64))) (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))))))
(+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/4 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))
(+.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 re)) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))) (.f64 im (.f64 im (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (+.f64 (/.f64 #s(literal 1/32 binary64) (.f64 re (.f64 re re))) (/.f64 #s(literal 1/8 binary64) (.f64 re (.f64 re re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/32 binary64) (.f64 re (.f64 re re))) (/.f64 #s(literal 1/8 binary64) (.f64 re (.f64 re re)))) (.f64 re re)))))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(.f64 im (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* im (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(.f64 im (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 re re)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) #s(literal 1/8 binary64))))))
(* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(.f64 im (+.f64 (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re))) #s(literal 1/16 binary64))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 re (sqrt.f64 #s(literal -1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(.f64 (+.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 re (sqrt.f64 #s(literal -1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 re (.f64 re (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) #s(literal -1/8 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(.f64 (-.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 re (sqrt.f64 #s(literal -1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 re (.f64 re (sqrt.f64 #s(literal -1 binary64))))) (.f64 (sqrt.f64 im) #s(literal 3/16 binary64))) (.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* 1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 #s(literal 1/2 binary64) re)))
(+ (* re (+ (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (* (sqrt im) (sqrt 2)))
(+.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (*.f64 #s(literal 1/8 binary64) re)))))
(+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(+.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 re (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) #s(literal -1/16 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/8 binary64))))))))
(* (sqrt re) (pow (sqrt 2) 2))
(*.f64 #s(literal 2 binary64) (sqrt.f64 re))
(* re (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))
(.f64 re (+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 #s(literal 1/4 binary64) (*.f64 im im)))))
(* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))
(.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 im im))) (+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/16 binary64))))))
(* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/32 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
(.f64 re (+.f64 (+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 im im)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (+.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/16 binary64)) (.f64 #s(literal -1/32 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 2 binary64)))))))
(* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 im (sqrt.f64 #s(literal -1 binary64)))))
(+ (* 1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 im (sqrt.f64 #s(literal -1 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (.f64 im (.f64 im im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 im (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 re) (.f64 (.f64 im (.f64 im im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal 1/32 binary64) (.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 re (.f64 re re))))
(+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/512 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 im (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 re) (.f64 (.f64 im (.f64 im im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (+.f64 (/.f64 (.f64 #s(literal 1/32 binary64) (.f64 (pow.f64 im #s(literal 5 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 #s(literal 1/256 binary64) (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 re (*.f64 re re))))
(* (sqrt re) (pow (sqrt 2) 2))
(*.f64 #s(literal 2 binary64) (sqrt.f64 re))
(+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (pow (sqrt 2) 2)))
(+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 re)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (.f64 #s(literal 1/4 binary64) (.f64 im im))))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* -1/2 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/4 (sqrt (/ 1 (pow re 3)))))))
(+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 re)) (.f64 (.f64 im im) (+.f64 (.f64 (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/32 binary64) (.f64 re (.f64 re re))) (/.f64 #s(literal 1/8 binary64) (.f64 re (.f64 re re))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1/2 binary64))) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))))))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* 1/4 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/2 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))
(+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 re)) (.f64 im (.f64 im (+.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))) (.f64 im (.f64 im (+.f64 (.f64 (+.f64 (/.f64 #s(literal 1/32 binary64) (.f64 re (.f64 re re))) (/.f64 #s(literal 1/8 binary64) (.f64 re (.f64 re re)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1/2 binary64))) (.f64 (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/32 binary64) (.f64 re (.f64 re re))) (/.f64 #s(literal 1/8 binary64) (.f64 re (.f64 re re)))) (.f64 re re))))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(.f64 im (+.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (*.f64 im im))))))))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(.f64 im (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (+.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/4 binary64))))))
(* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(.f64 im (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 re re)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) #s(literal 1/8 binary64))) (+.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (*.f64 im im)))))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1 binary64)))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(-.f64 #s(literal 0 binary64) (.f64 im (+.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 re (sqrt.f64 #s(literal -1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (*.f64 im im))))))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(.f64 (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 re (.f64 re (sqrt.f64 #s(literal -1 binary64))))) #s(literal -1/4 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 re (sqrt.f64 #s(literal -1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(.f64 (-.f64 (+.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 re (sqrt.f64 #s(literal -1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))))) (.f64 (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 re (.f64 re (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 #s(literal 3/8 binary64) (.f64 im (.f64 im im))))) (-.f64 #s(literal 0 binary64) im))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* 2 im) (* 2 re))
(*.f64 #s(literal 2 binary64) (+.f64 im re))
(+ (* 2 im) (* re (+ 2 (/ re im))))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))
(+ (* 2 im) (* re (+ 2 (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))))))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 #s(literal 2 binary64) (.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 re re)) (.f64 im (*.f64 im im))))))))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(* re (+ 4 (/ (pow im 2) (pow re 2))))
(.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))))
(* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))
(.f64 re (+.f64 #s(literal 4 binary64) (+.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 re #s(literal 4 binary64))))))
(* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))
(.f64 re (+.f64 (+.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))) (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 re #s(literal 4 binary64))))))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re))
(/.f64 (+.f64 (.f64 im im) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re))
(/.f64 (+.f64 (+.f64 (.f64 im im) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (.f64 re re))) (/.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re))
(/.f64 (-.f64 (+.f64 (+.f64 (.f64 im im) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (.f64 re re))) (/.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (pow.f64 re #s(literal 6 binary64)))) (-.f64 #s(literal 0 binary64) re))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(+ (* 4 re) (/ (pow im 2) re))
(+.f64 (.f64 re #s(literal 4 binary64)) (/.f64 (.f64 im im) re))
(+ (* 4 re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))))
(+.f64 (.f64 re #s(literal 4 binary64)) (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (.f64 (.f64 im im) #s(literal -1/4 binary64)) (.f64 re (*.f64 re re))))))
(+ (* 4 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))))
(+.f64 (.f64 re #s(literal 4 binary64)) (.f64 im (.f64 im (+.f64 (/.f64 #s(literal 1 binary64) re) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/4 binary64) (.f64 re (*.f64 re re)))))))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* 2 (/ re im))))
(.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 2 binary64) re) im)))
(* im (+ 2 (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(.f64 im (+.f64 (/.f64 (.f64 #s(literal 2 binary64) re) im) (+.f64 #s(literal 2 binary64) (.f64 re (/.f64 re (.f64 im im))))))
(* im (+ 2 (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2))))))
(.f64 im (+.f64 #s(literal 2 binary64) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 2 binary64) re) im) (.f64 re (/.f64 re (.f64 im im)))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))))
(* -2 im)
(*.f64 im #s(literal -2 binary64))
(* -1 (* im (+ 2 (* -2 (/ re im)))))
(.f64 (+.f64 #s(literal 2 binary64) (/.f64 (.f64 re #s(literal -2 binary64)) im)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (pow re 2) im)) (* 2 re)) im)))))
(.f64 (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) re) (/.f64 (*.f64 re re) im)) im)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im)) (* 2 re)) im)))))
(-.f64 #s(literal 0 binary64) (.f64 im (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) re) (/.f64 (+.f64 (.f64 re re) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im))) im)) im))))
im
(+ im re)
(+.f64 im re)
(+ im (* re (+ 1 (* 1/2 (/ re im)))))
(+.f64 im (.f64 re (+.f64 #s(literal 1 binary64) (.f64 re (/.f64 #s(literal 1/2 binary64) im)))))
(+ im (* re (+ 1 (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))
(+.f64 im (.f64 re (+.f64 #s(literal 1 binary64) (.f64 re (+.f64 (/.f64 (.f64 (.f64 re re) #s(literal -1/8 binary64)) (.f64 im (.f64 im im))) (/.f64 #s(literal 1/2 binary64) im))))))
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
(* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))
(.f64 re (+.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re))))
(* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(.f64 re (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re)) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (pow.f64 re #s(literal 4 binary64))))))
(* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(.f64 re (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re)) (+.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (pow.f64 re #s(literal 4 binary64))))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))))
(* -1/2 (/ (pow im 2) re))
(/.f64 (.f64 (.f64 im im) #s(literal -1/2 binary64)) re)
(* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re))
(/.f64 (+.f64 (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (.f64 re re)) (.f64 #s(literal 1/2 binary64) (.f64 im im))) (-.f64 #s(literal 0 binary64) re))
(* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re))
(/.f64 (+.f64 (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (.f64 re re)) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re))
(/.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (.f64 re re)) (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64))) (pow.f64 re #s(literal 6 binary64))))) (-.f64 #s(literal 0 binary64) re))
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
(+ (* 1/2 (/ (pow im 2) re)) (* 2 re))
(+.f64 (.f64 #s(literal 2 binary64) re) (/.f64 (.f64 #s(literal 1/2 binary64) (*.f64 im im)) re))
(+ (* 2 re) (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+.f64 (.f64 #s(literal 2 binary64) re) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 (.f64 im im) #s(literal -1/8 binary64)) (.f64 re (*.f64 re re))) (/.f64 #s(literal 1/2 binary64) re))))
(+ (* 2 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
(+.f64 (.f64 #s(literal 2 binary64) re) (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (.f64 re (*.f64 re re))))))))
im
(* im (+ 1 (/ re im)))
(*.f64 im (+.f64 #s(literal 1 binary64) (/.f64 re im)))
(* im (+ 1 (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im))))
(.f64 im (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 re im) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im)))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im)))))
(.f64 im (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im)) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))) (/.f64 re im)))))
(* -1 im)
(-.f64 #s(literal 0 binary64) im)
(* -1 (* im (+ 1 (* -1 (/ re im)))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(* -1 (* im (+ 1 (* -1 (/ (+ re (* -1/2 (/ (pow re 2) im))) im)))))
(.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re (/.f64 (.f64 (*.f64 re re) #s(literal -1/2 binary64)) im)) im)))
(* -1 (* im (+ 1 (* -1 (/ (+ re (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im))) im)))))
(-.f64 #s(literal 0 binary64) (.f64 im (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (.f64 im im)) (.f64 #s(literal 1/2 binary64) (*.f64 re re))) im)) im))))
im
(+ im (* 1/2 (/ (pow re 2) im)))
(+.f64 im (.f64 re (.f64 re (/.f64 #s(literal 1/2 binary64) im))))
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+.f64 im (.f64 re (.f64 re (+.f64 (/.f64 (.f64 (.f64 re re) #s(literal -1/8 binary64)) (.f64 im (.f64 im im))) (/.f64 #s(literal 1/2 binary64) im)))))
(+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))
(+.f64 im (.f64 (.f64 re re) (+.f64 (/.f64 #s(literal 1/2 binary64) im) (.f64 (.f64 re re) (+.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 re re)) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (.f64 im (.f64 im im))))))))
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(.f64 re (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (pow.f64 re #s(literal 4 binary64))))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(.f64 re (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (pow.f64 re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re)) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))))))
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(-.f64 #s(literal 0 binary64) (.f64 re (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re)) (+.f64 #s(literal 1 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (pow.f64 re #s(literal 4 binary64)))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (pow.f64 re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re)) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))))) (-.f64 #s(literal 0 binary64) re))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(+.f64 re (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) re))
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+.f64 re (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 (.f64 im im) #s(literal -1/8 binary64)) (.f64 re (.f64 re re))) (/.f64 #s(literal 1/2 binary64) re))))
(+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
(+.f64 re (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (.f64 re (.f64 re re))))))))
im
(* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))
(.f64 im (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))
(.f64 im (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(.f64 im (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im)) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64)))))
(* -1 im)
(-.f64 #s(literal 0 binary64) im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im)) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
(.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im)) (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 6 binary64))) (pow.f64 im #s(literal 6 binary64)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+.f64 (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 re (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/4 binary64)))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))))))
(+.f64 (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 re (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (.f64 #s(literal 1/16 binary64) re)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/4 binary64))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(+.f64 (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/4 binary64))) (.f64 re (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (.f64 #s(literal -1/32 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/16 binary64))))))))
(* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(* re (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))
(.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (.f64 im im))) (*.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* re (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
(.f64 re (+.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (.f64 im im))) (.f64 #s(literal -1/32 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))))))))
(* re (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/64 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
(.f64 re (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (.f64 im im))) (.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (+.f64 (.f64 #s(literal -1/32 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (.f64 #s(literal -1/64 binary64) (pow.f64 im #s(literal 4 binary64))) #s(literal 2 binary64))))))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))))
(+ (* 1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (.f64 (/.f64 (.f64 (.f64 im (.f64 im im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal 1/32 binary64))))
(+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 (sqrt.f64 re) (.f64 (.f64 im (.f64 im im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal 1/64 binary64) (.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 re (*.f64 re re))))
(+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/1024 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 #s(literal 1/2 binary64) im) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))))) (/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/32 binary64) (.f64 (sqrt.f64 re) (.f64 (.f64 im (.f64 im im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (+.f64 (/.f64 (.f64 #s(literal 1/64 binary64) (.f64 (pow.f64 im #s(literal 5 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 #s(literal 1/512 binary64) (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 re (.f64 re re))))
(* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))
(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
(+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))))
(+.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 re)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (.f64 #s(literal 1/8 binary64) (.f64 im im))))
(+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* -1/4 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/8 (sqrt (/ 1 (pow re 3)))))))
(+.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 re)) (.f64 (.f64 im im) (+.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (+.f64 (/.f64 #s(literal 1/32 binary64) (.f64 re (.f64 re re))) (/.f64 #s(literal 1/8 binary64) (.f64 re (.f64 re re))))) (.f64 (.f64 im im) #s(literal -1/4 binary64))) (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))))))
(+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/4 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))
(+.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 re)) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))) (.f64 im (.f64 im (+.f64 (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (+.f64 (/.f64 #s(literal 1/32 binary64) (.f64 re (.f64 re re))) (/.f64 #s(literal 1/8 binary64) (.f64 re (.f64 re re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/32 binary64) (.f64 re (.f64 re re))) (/.f64 #s(literal 1/8 binary64) (.f64 re (.f64 re re)))) (.f64 re re)))))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(.f64 im (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* im (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(.f64 im (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 re re)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) #s(literal 1/8 binary64))))))
(* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(.f64 im (+.f64 (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re))) #s(literal 1/16 binary64))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 re (sqrt.f64 #s(literal -1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(.f64 (+.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 re (sqrt.f64 #s(literal -1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 re (.f64 re (sqrt.f64 #s(literal -1 binary64))))) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) #s(literal -1/8 binary64)))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(.f64 (-.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (.f64 (.f64 re (sqrt.f64 #s(literal -1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 re (.f64 re (sqrt.f64 #s(literal -1 binary64))))) (.f64 (sqrt.f64 im) #s(literal 3/16 binary64))) (.f64 im (*.f64 im im)))) (-.f64 #s(literal 0 binary64) im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* 1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 #s(literal 1/2 binary64) re)))
(+ (* re (+ (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (* (sqrt im) (sqrt 2)))
(+.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (*.f64 #s(literal 1/8 binary64) re)))))
(+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(+.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 re (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) #s(literal -1/16 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/8 binary64))))))))
(* (sqrt re) (pow (sqrt 2) 2))
(*.f64 #s(literal 2 binary64) (sqrt.f64 re))
(* re (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))
(.f64 re (+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 #s(literal 1/4 binary64) (*.f64 im im)))))
(* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))
(.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 im im))) (+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/16 binary64))))))
(* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/32 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
(.f64 re (+.f64 (+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 im im)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (+.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/16 binary64)) (.f64 #s(literal -1/32 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 2 binary64)))))))
(* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 im (sqrt.f64 #s(literal -1 binary64)))))
(+ (* 1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 im (sqrt.f64 #s(literal -1 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 (.f64 im (.f64 im im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (sqrt.f64 #s(literal 1/2 binary64)))))
(+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 im (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 re) (.f64 (.f64 im (.f64 im im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 (.f64 #s(literal 1/32 binary64) (.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 re (.f64 re re))))
(+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/512 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 im (sqrt.f64 #s(literal -1 binary64))))) (/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 re) (.f64 (.f64 im (.f64 im im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (+.f64 (/.f64 (.f64 #s(literal 1/32 binary64) (.f64 (pow.f64 im #s(literal 5 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 #s(literal 1/256 binary64) (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))))))) (.f64 re (*.f64 re re))))
(* (sqrt re) (pow (sqrt 2) 2))
(*.f64 #s(literal 2 binary64) (sqrt.f64 re))
(+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (pow (sqrt 2) 2)))
(+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 re)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (.f64 #s(literal 1/4 binary64) (.f64 im im))))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* -1/2 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/4 (sqrt (/ 1 (pow re 3)))))))
(+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 re)) (.f64 (.f64 im im) (+.f64 (.f64 (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/32 binary64) (.f64 re (.f64 re re))) (/.f64 #s(literal 1/8 binary64) (.f64 re (.f64 re re))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1/2 binary64))) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))))))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* 1/4 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/2 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))
(+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 re)) (.f64 im (.f64 im (+.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))) (.f64 im (.f64 im (+.f64 (.f64 (+.f64 (/.f64 #s(literal 1/32 binary64) (.f64 re (.f64 re re))) (/.f64 #s(literal 1/8 binary64) (.f64 re (.f64 re re)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal -1/2 binary64))) (.f64 (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (.f64 #s(literal 1/8 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/32 binary64) (.f64 re (.f64 re re))) (/.f64 #s(literal 1/8 binary64) (.f64 re (.f64 re re)))) (.f64 re re))))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(.f64 im (+.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (*.f64 im im))))))))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(.f64 im (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (+.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/4 binary64))))))
(* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(.f64 im (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 re re)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) #s(literal 1/8 binary64))) (+.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (*.f64 im im)))))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1 binary64)))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(-.f64 #s(literal 0 binary64) (.f64 im (+.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 re (sqrt.f64 #s(literal -1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (*.f64 im im))))))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(.f64 (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 re (.f64 re (sqrt.f64 #s(literal -1 binary64))))) #s(literal -1/4 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 re (sqrt.f64 #s(literal -1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))))) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(.f64 (-.f64 (+.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 re (sqrt.f64 #s(literal -1 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))))) (.f64 (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 re (.f64 re (sqrt.f64 #s(literal -1 binary64)))))) (/.f64 #s(literal 3/8 binary64) (.f64 im (.f64 im im))))) (-.f64 #s(literal 0 binary64) im))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* 2 im) (* 2 re))
(*.f64 #s(literal 2 binary64) (+.f64 im re))
(+ (* 2 im) (* re (+ 2 (/ re im))))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im))))
(+ (* 2 im) (* re (+ 2 (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))))))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 #s(literal 2 binary64) (.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 re re)) (.f64 im (*.f64 im im))))))))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(* re (+ 4 (/ (pow im 2) (pow re 2))))
(.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re))))
(* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))
(.f64 re (+.f64 #s(literal 4 binary64) (+.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 re #s(literal 4 binary64))))))
(* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))
(.f64 re (+.f64 (+.f64 (/.f64 (.f64 im im) (.f64 re re)) (/.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))) (+.f64 #s(literal 4 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 re #s(literal 4 binary64))))))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re))
(/.f64 (+.f64 (.f64 im im) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re))
(/.f64 (+.f64 (+.f64 (.f64 im im) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (.f64 re re))) (/.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re))
(/.f64 (-.f64 (+.f64 (+.f64 (.f64 im im) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (.f64 re re))) (/.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (pow.f64 re #s(literal 6 binary64)))) (-.f64 #s(literal 0 binary64) re))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(+ (* 4 re) (/ (pow im 2) re))
(+.f64 (.f64 re #s(literal 4 binary64)) (/.f64 (.f64 im im) re))
(+ (* 4 re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))))
(+.f64 (.f64 re #s(literal 4 binary64)) (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (.f64 (.f64 im im) #s(literal -1/4 binary64)) (.f64 re (*.f64 re re))))))
(+ (* 4 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))))
(+.f64 (.f64 re #s(literal 4 binary64)) (.f64 im (.f64 im (+.f64 (/.f64 #s(literal 1 binary64) re) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/4 binary64) (.f64 re (*.f64 re re)))))))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* 2 (/ re im))))
(.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 2 binary64) re) im)))
(* im (+ 2 (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(.f64 im (+.f64 (/.f64 (.f64 #s(literal 2 binary64) re) im) (+.f64 #s(literal 2 binary64) (.f64 re (/.f64 re (.f64 im im))))))
(* im (+ 2 (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2))))))
(.f64 im (+.f64 #s(literal 2 binary64) (+.f64 (+.f64 (/.f64 (.f64 #s(literal 2 binary64) re) im) (.f64 re (/.f64 re (.f64 im im)))) (/.f64 (*.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))))
(* -2 im)
(*.f64 im #s(literal -2 binary64))
(* -1 (* im (+ 2 (* -2 (/ re im)))))
(.f64 (+.f64 #s(literal 2 binary64) (/.f64 (.f64 re #s(literal -2 binary64)) im)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (pow re 2) im)) (* 2 re)) im)))))
(.f64 (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) re) (/.f64 (*.f64 re re) im)) im)) (-.f64 #s(literal 0 binary64) im))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im)) (* 2 re)) im)))))
(-.f64 #s(literal 0 binary64) (.f64 im (-.f64 #s(literal 2 binary64) (/.f64 (-.f64 (.f64 #s(literal 2 binary64) re) (/.f64 (+.f64 (.f64 re re) (/.f64 (.f64 #s(literal -1/4 binary64) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im))) im)) im))))
im
(+ im re)
(+.f64 im re)
(+ im (* re (+ 1 (* 1/2 (/ re im)))))
(+.f64 im (.f64 re (+.f64 #s(literal 1 binary64) (.f64 re (/.f64 #s(literal 1/2 binary64) im)))))
(+ im (* re (+ 1 (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))
(+.f64 im (.f64 re (+.f64 #s(literal 1 binary64) (.f64 re (+.f64 (/.f64 (.f64 (.f64 re re) #s(literal -1/8 binary64)) (.f64 im (.f64 im im))) (/.f64 #s(literal 1/2 binary64) im))))))
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
(* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))
(.f64 re (+.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re))))
(* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(.f64 re (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re)) (+.f64 #s(literal 2 binary64) (/.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (pow.f64 re #s(literal 4 binary64))))))
(* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(.f64 re (+.f64 (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re)) (+.f64 #s(literal 2 binary64) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (pow.f64 re #s(literal 4 binary64))))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))))
(* -1/2 (/ (pow im 2) re))
(/.f64 (.f64 (.f64 im im) #s(literal -1/2 binary64)) re)
(* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re))
(/.f64 (+.f64 (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (.f64 re re)) (.f64 #s(literal 1/2 binary64) (.f64 im im))) (-.f64 #s(literal 0 binary64) re))
(* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re))
(/.f64 (+.f64 (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (.f64 re re)) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re))
(/.f64 (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64)))) (+.f64 (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/8 binary64)) (.f64 re re)) (/.f64 (.f64 #s(literal -1/2 binary64) (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64))) (pow.f64 re #s(literal 6 binary64))))) (-.f64 #s(literal 0 binary64) re))
(* 2 re)
(*.f64 #s(literal 2 binary64) re)
(+ (* 1/2 (/ (pow im 2) re)) (* 2 re))
(+.f64 (.f64 #s(literal 2 binary64) re) (/.f64 (.f64 #s(literal 1/2 binary64) (*.f64 im im)) re))
(+ (* 2 re) (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+.f64 (.f64 #s(literal 2 binary64) re) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 (.f64 im im) #s(literal -1/8 binary64)) (.f64 re (*.f64 re re))) (/.f64 #s(literal 1/2 binary64) re))))
(+ (* 2 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
(+.f64 (.f64 #s(literal 2 binary64) re) (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (.f64 re (*.f64 re re))))))))
im
(* im (+ 1 (/ re im)))
(*.f64 im (+.f64 #s(literal 1 binary64) (/.f64 re im)))
(* im (+ 1 (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im))))
(.f64 im (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 re im) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im)))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im)))))
(.f64 im (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im)) (+.f64 (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))) (/.f64 re im)))))
(* -1 im)
(-.f64 #s(literal 0 binary64) im)
(* -1 (* im (+ 1 (* -1 (/ re im)))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(* -1 (* im (+ 1 (* -1 (/ (+ re (* -1/2 (/ (pow re 2) im))) im)))))
(.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re (/.f64 (.f64 (*.f64 re re) #s(literal -1/2 binary64)) im)) im)))
(* -1 (* im (+ 1 (* -1 (/ (+ re (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im))) im)))))
(-.f64 #s(literal 0 binary64) (.f64 im (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (.f64 im im)) (.f64 #s(literal 1/2 binary64) (*.f64 re re))) im)) im))))
(pow im 2)
(*.f64 im im)
(+ (pow im 2) (pow re 2))
(+.f64 (.f64 im im) (.f64 re re))
(+ (pow im 2) (pow re 2))
(+.f64 (.f64 im im) (.f64 re re))
(+ (pow im 2) (pow re 2))
(+.f64 (.f64 im im) (.f64 re re))
(pow re 2)
(*.f64 re re)
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(.f64 (.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 im im) (.f64 re re))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(.f64 (.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 im im) (.f64 re re))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(.f64 (.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 im im) (.f64 re re))))
(pow re 2)
(*.f64 re re)
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(.f64 (.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 im im) (.f64 re re))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(.f64 (.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 im im) (.f64 re re))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(.f64 (.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 im im) (.f64 re re))))
(pow re 2)
(*.f64 re re)
(+ (pow im 2) (pow re 2))
(+.f64 (.f64 im im) (.f64 re re))
(+ (pow im 2) (pow re 2))
(+.f64 (.f64 im im) (.f64 re re))
(+ (pow im 2) (pow re 2))
(+.f64 (.f64 im im) (.f64 re re))
(pow im 2)
(*.f64 im im)
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(.f64 (.f64 im im) (+.f64 #s(literal 1 binary64) (.f64 re (/.f64 re (.f64 im im)))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(.f64 (.f64 im im) (+.f64 #s(literal 1 binary64) (.f64 re (/.f64 re (.f64 im im)))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(.f64 (.f64 im im) (+.f64 #s(literal 1 binary64) (.f64 re (/.f64 re (.f64 im im)))))
(pow im 2)
(*.f64 im im)
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(.f64 (.f64 im im) (+.f64 #s(literal 1 binary64) (.f64 re (/.f64 re (.f64 im im)))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(.f64 (.f64 im im) (+.f64 #s(literal 1 binary64) (.f64 re (/.f64 re (.f64 im im)))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(.f64 (.f64 im im) (+.f64 #s(literal 1 binary64) (.f64 re (/.f64 re (.f64 im im)))))

eval32.0ms (0.3%)

Compiler: Compiled 7042 to 857 computations (87.8% saved)

prune51.0ms (0.5%)

Pruning

15 alts after pruning (13 fresh and 2 done)

	Pruned	Kept	Total
New	286	13	299
Fresh	0	0	0
Picked	0	2	2
Done	0	0	0
Total	286	15	301

Accuracy

86.5%

Counts

301 → 15

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	77.7%	(.f64 (pow.f64 (+.f64 re (hypot.f64 re im)) #s(literal 1/2 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
	49.6%	(.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
	42.5%	(.f64 im (+.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) re) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
▶	28.0%	(*.f64 #s(literal 1 binary64) (sqrt.f64 re))
▶	10.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (+.f64 (.f64 im im) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (.f64 re re))) (-.f64 #s(literal 0 binary64) re))))
▶	13.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 (.f64 im im) re))))
	25.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (.f64 re #s(literal 4 binary64)) (/.f64 (*.f64 im im) re))))
▶	21.8%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (.f64 re #s(literal 4 binary64)) (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (.f64 (.f64 im im) #s(literal -1/4 binary64)) (.f64 re (.f64 re re))))))))
	49.9%	(.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))))))
	38.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 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 re re)) (.f64 im (.f64 im im))))))))))
	50.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))))
✓	42.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))
✓	78.3%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
	52.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 im re))))
	72.7%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (exp.f64 (log.f64 (+.f64 re (hypot.f64 re im)))))))

Compiler

Compiled 453 to 327 computations (27.8% saved)

simplify188.0ms (2%)

Algorithm

1×	egg-herbie

Localize:

Found 18 expressions of interest:

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

Rules

3524×	`-lowering-.f32`
3524×	`-lowering-.f64`
1916×	`sum5-define`
1808×	`sum4-define`
1126×	`fma-lowering-fma.f32`

Iterations

Useful iterations: 5 (0.0ms)

Iter	Nodes	Cost
0	41	265
1	100	256
2	229	256
3	575	256
4	1381	247
5	2017	239
6	3478	239
7	6728	239
0	8223	239

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

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

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

localize338.0ms (3.6%)

Localize:

Found 18 expressions of interest:

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

Results

256.0ms

256×

invalid

Compiler

Compiled 331 to 41 computations (87.6% saved)

Precisions

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

ival-sqrt: 44.0ms (34% of total)

ival-mult: 36.0ms (27.8% of total)

ival-pow: 15.0ms (11.6% of total)

ival-add: 12.0ms (9.3% of total)

ival-div: 9.0ms (7% of total)

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

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

const: 1.0ms (0.8% of total)

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

series52.0ms (0.6%)

Counts

24 → 456

Calls

Call 1

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

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

114 calls:

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

rewrite403.0ms (4.3%)

Algorithm

1×	batch-egg-rewrite

Rules

3550×	`-lowering-.f32`
3550×	`-lowering-.f64`
2400×	`/-lowering-/.f32`
2400×	`/-lowering-/.f64`
900×	`+-lowering-+.f64`

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	41	191
1	156	183
2	769	182
3	5719	179
0	8121	179

Stop Event

1×	iter limit
1×	node limit

Counts

24 → 550

Calls

Call 1

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

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

simplify475.0ms (5.1%)

Algorithm

1×	egg-herbie

Rules

5914×	`-lowering-.f32`
5914×	`-lowering-.f64`
5054×	`+-lowering-+.f64`
5054×	`+-lowering-+.f32`
2156×	`/-lowering-/.f32`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	943	7673
1	3244	6995
2	7956	6960
0	8198	6960

Stop Event

1×	iter limit
1×	node limit

Counts

456 → 456

Calls

Call 1

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

eval247.0ms (2.6%)

Compiler: Compiled 25734 to 3825 computations (85.1% saved)

prune246.0ms (2.6%)

Pruning

24 alts after pruning (22 fresh and 2 done)

	Pruned	Kept	Total
New	1094	17	1111
Fresh	3	5	8
Picked	5	0	5
Done	0	2	2
Total	1102	24	1126

Accuracy

98.2%

Counts

1126 → 24

Alt Table

Click to see full alt table

Status	Accuracy	Program
	7.4%	(/.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 re (-.f64 (/.f64 (.f64 im (.f64 im (.f64 (.f64 im im) #s(literal 1/4 binary64)))) (.f64 re re)) (.f64 im im)))))
	72.2%	(.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 re (hypot.f64 re im)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
▶	77.7%	(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 re (hypot.f64 re im)))) (sqrt.f64 #s(literal 2 binary64)))
	72.7%	(.f64 (exp.f64 (.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 re (hypot.f64 re im))))) (*.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
	18.0%	(.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (.f64 im im)) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64))))
	10.4%	(.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 (/.f64 re (-.f64 #s(literal 0 binary64) (.f64 im im))))))
	18.0%	(.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (*.f64 im im)) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal -1/2 binary64))))
▶	22.3%	(.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 im) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)))))
	16.1%	(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (-.f64 #s(literal 0 binary64) im) (/.f64 re im))))
▶	13.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal -1 binary64) (/.f64 re (.f64 im im)))))
	16.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 im re) im))))
	25.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (/.f64 (.f64 im im) re) (*.f64 re #s(literal 4 binary64)))))
	23.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (.f64 re #s(literal 4 binary64)) (.f64 (.f64 im im) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 im im) #s(literal -1/4 binary64)) (*.f64 re re))) re)))))
	49.9%	(.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))))))
	38.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 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 re re)) (.f64 im (.f64 im im))))))))))
▶	13.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (.f64 im im) (/.f64 (+.f64 #s(literal -1 binary64) (.f64 #s(literal 1/4 binary64) (.f64 im (/.f64 im (.f64 re re))))) re))))
	50.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))))
✓	42.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))
✓	78.3%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
	52.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 im re))))
	72.7%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (exp.f64 (log.f64 (+.f64 re (hypot.f64 re im)))))))
	13.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (neg.f64 (/.f64 (.f64 im im) re))))
▶	28.0%	(sqrt.f64 re)
	26.1%	(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 re)))

Compiler

Compiled 673 to 487 computations (27.6% saved)

simplify180.0ms (1.9%)

Algorithm

1×	egg-herbie

Localize:

Found 17 expressions of interest:

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

Rules

2984×	`-lowering-.f32`
2984×	`-lowering-.f64`
1492×	`fmsub-define`
1470×	`/-lowering-/.f32`
1470×	`/-lowering-/.f64`

Iterations

Useful iterations: 5 (0.0ms)

Iter	Nodes	Cost
0	35	201
1	70	196
2	140	186
3	253	186
4	496	186
5	920	183
6	2114	183
7	4282	183
8	7941	183
0	8003	183

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

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

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

localize228.0ms (2.4%)

Localize:

Found 17 expressions of interest:

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

Results

181.0ms

256×

invalid

Compiler

Compiled 233 to 35 computations (85% saved)

Precisions

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

ival-sqrt: 40.0ms (41.3% of total)

ival-mult: 32.0ms (33.1% of total)

ival-div: 9.0ms (9.3% of total)

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

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

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

const: 1.0ms (1% of total)

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

series28.0ms (0.3%)

Counts

19 → 396

Calls

Call 1

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

Calls

99 calls:

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

rewrite228.0ms (2.4%)

Algorithm

1×	batch-egg-rewrite

Rules

2650×	`-lowering-.f32`
2650×	`-lowering-.f64`
2600×	`/-lowering-/.f32`
2600×	`/-lowering-/.f64`
928×	`--lowering--.f32`

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	35	138
1	119	129
2	519	121
3	2516	119
0	8347	119

Stop Event

1×	iter limit
1×	node limit

Counts

19 → 648

Calls

Call 1

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

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

simplify358.0ms (3.8%)

Algorithm

1×	egg-herbie

Rules

6672×	`-lowering-.f32`
6672×	`-lowering-.f64`
3726×	`+-lowering-+.f64`
3726×	`+-lowering-+.f32`
1770×	`associate-r`

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	740	6018
1	2544	5391
2	7448	5347
0	8148	5347

Stop Event

1×	iter limit
1×	node limit

Counts

396 → 396

Calls

Call 1

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

eval401.0ms (4.3%)

Compiler: Compiled 19209 to 3028 computations (84.2% saved)

prune148.0ms (1.6%)

Pruning

23 alts after pruning (18 fresh and 5 done)

	Pruned	Kept	Total
New	1077	8	1085
Fresh	7	10	17
Picked	2	3	5
Done	0	2	2
Total	1086	23	1109

Accuracy

99.9%

Counts

1109 → 23

Alt Table

Click to see full alt table

Status	Accuracy	Program
	27.0%	(/.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 re (+.f64 #s(literal -1 binary64) (.f64 im (/.f64 #s(literal 1/4 binary64) (*.f64 re (/.f64 re im))))))))
▶	28.0%	(/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal -1/2 binary64)))
	26.5%	(/.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)) im))
▶	26.8%	(.f64 (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal -1/2 binary64)) (.f64 #s(literal 1/2 binary64) im))
	72.2%	(.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 re (hypot.f64 re im)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
	26.8%	(*.f64 (/.f64 im (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
✓	77.7%	(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 re (hypot.f64 re im)))) (sqrt.f64 #s(literal 2 binary64)))
	72.7%	(.f64 (.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 re (hypot.f64 re im)))))) (sqrt.f64 #s(literal 2 binary64)))
▶	26.8%	(*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) im)))
✓	22.3%	(.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 im) (sqrt.f64 (-.f64 #s(literal 0 binary64) (/.f64 im re)))))
	16.1%	(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (/.f64 im re) (/.f64 #s(literal -1 binary64) im))))
	16.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 im re) im))))
	25.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (/.f64 (.f64 im im) re) (*.f64 re #s(literal 4 binary64)))))
▶	23.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (.f64 re #s(literal 4 binary64)) (.f64 (.f64 im im) (/.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 im im) #s(literal -1/4 binary64)) (*.f64 re re))) re)))))
	49.9%	(.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))))))
	38.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 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 re re)) (.f64 im (.f64 im im))))))))))
	50.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))))
✓	42.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))
✓	78.3%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
	52.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 im re))))
▶	72.7%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (exp.f64 (log.f64 (+.f64 re (hypot.f64 re im)))))))
✓	28.0%	(sqrt.f64 re)
	26.1%	(exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 re)))

Compiler

Compiled 567 to 420 computations (25.9% saved)

simplify165.0ms (1.8%)

Algorithm

1×	egg-herbie

Localize:

Found 18 expressions of interest:

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

Rules

2928×	`sum3-define`
2768×	`sum5-define`
2192×	`-lowering-.f32`
2192×	`-lowering-.f64`
1576×	`sum4-define`

Iterations

Useful iterations: 4 (0.0ms)

Iter	Nodes	Cost
0	37	222
1	81	215
2	150	215
3	276	208
4	574	204
5	960	204
6	1237	204
7	1791	204
8	2598	204
9	4086	204
10	5920	204
11	6992	204
0	8724	204

Stop Event

1×	iter limit
1×	node limit

Calls

Call 1

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

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

localize257.0ms (2.7%)

Localize:

Found 18 expressions of interest:

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

Results

189.0ms

256×

invalid

Compiler

Compiled 269 to 37 computations (86.2% saved)

Precisions

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

ival-add: 31.0ms (30.9% of total)

ival-mult: 24.0ms (24% of total)

ival-div: 15.0ms (15% of total)

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

ival-sqrt: 6.0ms (6% of total)

ival-pow: 6.0ms (6% of total)

ival-exp: 3.0ms (3% of total)

ival-log: 3.0ms (3% of total)

const: 2.0ms (2% of total)

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

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

series31.0ms (0.3%)

Counts

19 → 360

Calls

Call 1

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

Outputs
#<alt im>
#<alt (+ im re)>
#<alt (+ im (* re (+ 1 (* 1/2 (/ re im)))))>
#<alt (+ im (* re (+ 1 (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))>
#<alt (* 2 re)>
#<alt (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))>
#<alt (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))>
#<alt (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))>
#<alt (* -1/2 (/ (pow im 2) re))>
#<alt (* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re))>
#<alt (* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re))>
#<alt (* -1 (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re))>
#<alt (* 2 re)>
#<alt (+ (* 1/2 (/ (pow im 2) re)) (* 2 re))>
#<alt (+ (* 2 re) (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))>
#<alt (+ (* 2 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))>
#<alt im>
#<alt (* im (+ 1 (/ re im)))>
#<alt (* im (+ 1 (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im))))>
#<alt (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im)))))>
#<alt (* -1 im)>
#<alt (* -1 (* im (+ 1 (* -1 (/ re im)))))>
#<alt (* -1 (* im (+ 1 (* -1 (/ (+ re (* -1/2 (/ (pow re 2) im))) im)))))>
#<alt (* -1 (* im (+ 1 (* -1 (/ (+ re (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im))) im)))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))>
#<alt (* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))>
#<alt (* re (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))>
#<alt (* re (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))>
#<alt (* re (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/64 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))>
#<alt (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))>
#<alt (+ (* 1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))>
#<alt (+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))>
#<alt (+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/1024 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))>
#<alt (* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))>
#<alt (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))))>
#<alt (+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* -1/4 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/8 (sqrt (/ 1 (pow re 3)))))))>
#<alt (+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/4 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))>
#<alt (* 1/2 (* (sqrt im) (sqrt 2)))>
#<alt (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))>
#<alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))>
#<alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (+ (* 1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (* (sqrt im) (sqrt 2)))>
#<alt (+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))>
#<alt (* (sqrt re) (pow (sqrt 2) 2))>
#<alt (* re (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))>
#<alt (* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))>
#<alt (* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/32 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))>
#<alt (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))>
#<alt (+ (* 1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))>
#<alt (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))>
#<alt (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/512 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))>
#<alt (* (sqrt re) (pow (sqrt 2) 2))>
#<alt (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (pow (sqrt 2) 2)))>
#<alt (+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* -1/2 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/4 (sqrt (/ 1 (pow re 3)))))))>
#<alt (+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* 1/4 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/2 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))>
#<alt (* (sqrt im) (sqrt 2))>
#<alt (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))>
#<alt (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))>
#<alt (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))>
#<alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))>
#<alt (* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))>
#<alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))>
#<alt (* 2 im)>
#<alt (+ (* 2 im) (* 2 re))>
#<alt (+ (* 2 im) (* re (+ 2 (/ re im))))>
#<alt (+ (* 2 im) (* re (+ 2 (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))))))>
#<alt (* 4 re)>
#<alt (* re (+ 4 (/ (pow im 2) (pow re 2))))>
#<alt (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))>
#<alt (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))>
#<alt (* -1 (/ (pow im 2) re))>
#<alt (* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re))>
#<alt (* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re))>
#<alt (* -1 (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re))>
#<alt (* 4 re)>
#<alt (+ (* 4 re) (/ (pow im 2) re))>
#<alt (+ (* 4 re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))))>
#<alt (+ (* 4 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))))>
#<alt (* 2 im)>
#<alt (* im (+ 2 (* 2 (/ re im))))>
#<alt (* im (+ 2 (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2)))))>
#<alt (* im (+ 2 (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2))))))>
#<alt (* -2 im)>
#<alt (* -1 (* im (+ 2 (* -2 (/ re im)))))>
#<alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (pow re 2) im)) (* 2 re)) im)))))>
#<alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im)) (* 2 re)) im)))))>
#<alt (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))>
#<alt (* -1 (sqrt re))>
#<alt (* -1 (sqrt re))>
#<alt (* -1 (sqrt re))>
#<alt (sqrt (/ 1 re))>
#<alt (sqrt (/ 1 re))>
#<alt (sqrt (/ 1 re))>
#<alt (sqrt (/ 1 re))>
#<alt (sqrt (/ 1 re))>
#<alt (sqrt (/ 1 re))>
#<alt (sqrt (/ 1 re))>
#<alt (sqrt (/ 1 re))>
#<alt (* (sqrt (/ 1 re)) (pow (sqrt -1) 2))>
#<alt (* (sqrt (/ 1 re)) (pow (sqrt -1) 2))>
#<alt (* (sqrt (/ 1 re)) (pow (sqrt -1) 2))>
#<alt (* (sqrt (/ 1 re)) (pow (sqrt -1) 2))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* (sqrt (/ 1 re)) (sqrt -1))>
#<alt (* (sqrt (/ 1 re)) (sqrt -1))>
#<alt (* (sqrt (/ 1 re)) (sqrt -1))>
#<alt (* (sqrt (/ 1 re)) (sqrt -1))>
#<alt (* (sqrt (/ 1 re)) (sqrt -1))>
#<alt (* (sqrt (/ 1 re)) (sqrt -1))>
#<alt (* (sqrt (/ 1 re)) (sqrt -1))>
#<alt (* (sqrt (/ 1 re)) (sqrt -1))>
#<alt (* (sqrt (/ 1 re)) (sqrt -1))>
#<alt (* (sqrt (/ 1 re)) (sqrt -1))>
#<alt (* (sqrt (/ 1 re)) (sqrt -1))>
#<alt (* (sqrt (/ 1 re)) (sqrt -1))>
#<alt (* -1 re)>
#<alt (* -1 re)>
#<alt (* -1 re)>
#<alt (* -1 re)>
#<alt (* -1 re)>
#<alt (* -1 re)>
#<alt (* -1 re)>
#<alt (* -1 re)>
#<alt (* -1 re)>
#<alt (* -1 re)>
#<alt (* -1 re)>
#<alt (* -1 re)>
#<alt (* 1/2 im)>
#<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 (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* (* im (sqrt -1)) (sqrt (/ 1 re)))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))>
#<alt (* 1/2 (* (* (pow im 2) (sqrt -1/4)) (sqrt (/ 1 (pow re 3)))))>
#<alt (/ (+ (* 1/4 (* (sqrt (pow re 5)) (/ 1 (sqrt -1/4)))) (* 1/2 (* (* (pow im 2) (sqrt -1/4)) (sqrt re)))) (pow re 2))>
#<alt (/ (+ (* 1/2 (* (* (pow im 2) (sqrt -1/4)) (sqrt re))) (* (pow re 3) (+ (* 1/4 (* (sqrt (/ 1 re)) (/ 1 (sqrt -1/4)))) (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt (pow re 3)))))) (pow re 2))>
#<alt (/ (+ (* 1/2 (* (* (pow im 2) (sqrt -1/4)) (sqrt re))) (* (pow re 3) (+ (* 1/4 (* (sqrt (/ 1 re)) (/ 1 (sqrt -1/4)))) (* (pow re 2) (+ (* -1/16 (* (/ 1 (* (pow im 2) (pow (sqrt -1/4) 3))) (sqrt (/ 1 re)))) (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt (/ 1 re)))))))) (pow re 2))>
#<alt (sqrt re)>
#<alt (* re (+ (sqrt (/ 1 re)) (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))>
#<alt (* re (+ (sqrt (/ 1 re)) (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))))))>
#<alt (* re (+ (sqrt (/ 1 re)) (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/128 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))))>
#<alt (* -1/2 (* (sqrt re) (* (sqrt -4) (sqrt -1))))>
#<alt (* -1 (* re (+ (* 1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1)))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt re))) (* 1/16 (* (/ (* (pow im 4) (sqrt -1)) (sqrt -4)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1)))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt re))) (+ (* 1/16 (* (/ (* (pow im 4) (sqrt -1)) (sqrt -4)) (sqrt (/ 1 (pow re 3))))) (* 1/16 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt -4) 3)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1)))))))>
#<alt (sqrt re)>
#<alt (+ (sqrt re) (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 3))))))>
#<alt (+ (sqrt re) (* (pow im 2) (+ (* -5/128 (* (pow im 2) (sqrt (/ 1 (pow re 7))))) (* 1/8 (sqrt (/ 1 (pow re 3)))))))>
#<alt (+ (sqrt re) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -5/128 (sqrt (/ 1 (pow re 7)))) (* 5/1024 (* (pow im 2) (sqrt (/ 1 (pow re 11))))))))))>
#<alt (* 1/2 (* (* (pow im 2) (sqrt -1/4)) (sqrt (/ 1 (pow re 3)))))>
#<alt (* (pow im 2) (+ (* 1/4 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (* 1/2 (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4)))))>
#<alt (* (pow im 2) (+ (* 1/4 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (+ (* 1/4 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 4) (sqrt -1/4))) (sqrt (pow re 3)))) (* 1/2 (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4))))))>
#<alt (* (pow im 2) (+ (* -1/8 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 6) (pow (sqrt -1/4) 3))) (sqrt (pow re 7)))) (+ (* 1/4 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (+ (* 1/4 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 4) (sqrt -1/4))) (sqrt (pow re 3)))) (* 1/2 (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4)))))))>
#<alt (* 1/2 (* (* (pow im 2) (sqrt -1/4)) (sqrt (/ 1 (pow re 3)))))>
#<alt (* (pow im 2) (+ (* 1/4 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (* 1/2 (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4)))))>
#<alt (* (pow im 2) (+ (* 1/4 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (+ (* 1/4 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 4) (sqrt -1/4))) (sqrt (pow re 3)))) (* 1/2 (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4))))))>
#<alt (* (pow im 2) (+ (* -1/8 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 6) (pow (sqrt -1/4) 3))) (sqrt (pow re 7)))) (+ (* 1/4 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (+ (* 1/4 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 4) (sqrt -1/4))) (sqrt (pow re 3)))) (* 1/2 (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4)))))))>
#<alt (* (* (pow im 2) (sqrt -1/4)) (sqrt (/ 1 (pow re 3))))>
#<alt (/ (+ (* 1/2 (* (sqrt (pow re 5)) (/ 1 (sqrt -1/4)))) (* (* (pow im 2) (sqrt -1/4)) (sqrt re))) (pow re 2))>
#<alt (/ (+ (* (* (pow im 2) (sqrt -1/4)) (sqrt re)) (* (pow re 3) (+ (* 1/2 (* (sqrt (/ 1 re)) (/ 1 (sqrt -1/4)))) (* 2 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt (pow re 3))))))) (pow re 2))>
#<alt (/ (+ (* (* (pow im 2) (sqrt -1/4)) (sqrt re)) (* (pow re 3) (+ (* 1/2 (* (sqrt (/ 1 re)) (/ 1 (sqrt -1/4)))) (* (pow re 2) (+ (* -1/8 (* (/ 1 (* (pow im 2) (pow (sqrt -1/4) 3))) (sqrt (/ 1 re)))) (* 2 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt (/ 1 re))))))))) (pow re 2))>
#<alt (* 2 (sqrt re))>
#<alt (* re (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 2 (sqrt (/ 1 re)))))>
#<alt (* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 2 (sqrt (/ 1 re))))))>
#<alt (* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/64 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 2 (sqrt (/ 1 re)))))))>
#<alt (* -1 (* (sqrt re) (* (sqrt -4) (sqrt -1))))>
#<alt (* -1 (* re (+ (* 1/2 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/2 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt re))) (* 1/8 (* (/ (* (pow im 4) (sqrt -1)) (sqrt -4)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1))))))>
#<alt (* -1 (* re (+ (* -1 (/ (+ (* -1/2 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt re))) (+ (* 1/8 (* (/ (* (pow im 4) (sqrt -1)) (sqrt -4)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt -4) 3)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1))))))>
#<alt (* 2 (sqrt re))>
#<alt (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* 2 (sqrt re)))>
#<alt (+ (* 2 (sqrt re)) (* (pow im 2) (+ (* -5/64 (* (pow im 2) (sqrt (/ 1 (pow re 7))))) (* 1/4 (sqrt (/ 1 (pow re 3)))))))>
#<alt (+ (* 2 (sqrt re)) (* (pow im 2) (+ (* 1/4 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -5/64 (sqrt (/ 1 (pow re 7)))) (* 5/512 (* (pow im 2) (sqrt (/ 1 (pow re 11))))))))))>
#<alt (* (* (pow im 2) (sqrt -1/4)) (sqrt (/ 1 (pow re 3))))>
#<alt (* (pow im 2) (+ (* 1/2 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4))))>
#<alt (* (pow im 2) (+ (* 1/2 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (+ (* 1/2 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 4) (sqrt -1/4))) (sqrt (pow re 3)))) (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4)))))>
#<alt (* (pow im 2) (+ (* -1/4 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 6) (pow (sqrt -1/4) 3))) (sqrt (pow re 7)))) (+ (* 1/2 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (+ (* 1/2 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 4) (sqrt -1/4))) (sqrt (pow re 3)))) (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4))))))>
#<alt (* (* (pow im 2) (sqrt -1/4)) (sqrt (/ 1 (pow re 3))))>
#<alt (* (pow im 2) (+ (* 1/2 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4))))>
#<alt (* (pow im 2) (+ (* 1/2 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (+ (* 1/2 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 4) (sqrt -1/4))) (sqrt (pow re 3)))) (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4)))))>
#<alt (* (pow im 2) (+ (* -1/4 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 6) (pow (sqrt -1/4) 3))) (sqrt (pow re 7)))) (+ (* 1/2 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (+ (* 1/2 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 4) (sqrt -1/4))) (sqrt (pow re 3)))) (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4))))))>
#<alt (* -1/4 (/ (pow im 4) (pow re 3)))>
#<alt (/ (+ (* -1/4 (pow im 4)) (* (pow im 2) (pow re 2))) (pow re 3))>
#<alt (/ (+ (* -1/4 (pow im 4)) (* (pow re 2) (+ (* 4 (pow re 2)) (pow im 2)))) (pow re 3))>
#<alt (/ (+ (* -1/4 (pow im 4)) (* (pow re 2) (+ (* 4 (pow re 2)) (pow im 2)))) (pow re 3))>
#<alt (* 4 re)>
#<alt (* re (+ 4 (/ (pow im 2) (pow re 2))))>
#<alt (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))>
#<alt (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))>
#<alt (* 4 re)>
#<alt (* -1 (* re (- (* -1 (/ (pow im 2) (pow re 2))) 4)))>
#<alt (* -1 (* re (- (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/4 (/ (pow im 4) (pow re 4)))) 4)))>
#<alt (* -1 (* re (- (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/4 (/ (pow im 4) (pow re 4)))) 4)))>
#<alt (* 4 re)>
#<alt (+ (* 4 re) (/ (pow im 2) re))>
#<alt (+ (* 4 re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))))>
#<alt (+ (* 4 re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))))>
#<alt (* -1/4 (/ (pow im 4) (pow re 3)))>
#<alt (* (pow im 4) (- (/ 1 (* (pow im 2) re)) (* 1/4 (/ 1 (pow re 3)))))>
#<alt (* (pow im 4) (- (+ (* 4 (/ re (pow im 4))) (/ 1 (* (pow im 2) re))) (* 1/4 (/ 1 (pow re 3)))))>
#<alt (* (pow im 4) (- (+ (* 4 (/ re (pow im 4))) (/ 1 (* (pow im 2) re))) (* 1/4 (/ 1 (pow re 3)))))>
#<alt (* -1/4 (/ (pow im 4) (pow re 3)))>
#<alt (* (pow im 4) (- (/ 1 (* (pow im 2) re)) (* 1/4 (/ 1 (pow re 3)))))>
#<alt (* (pow im 4) (- (+ (* 4 (/ re (pow im 4))) (/ 1 (* (pow im 2) re))) (* 1/4 (/ 1 (pow re 3)))))>
#<alt (* (pow im 4) (- (+ (* 4 (/ re (pow im 4))) (/ 1 (* (pow im 2) re))) (* 1/4 (/ 1 (pow re 3)))))>
#<alt (* 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 (log im)>
#<alt (+ (log im) (/ re im))>
#<alt (+ (log im) (* re (+ (* -1/6 (/ (pow re 2) (pow im 3))) (/ 1 im))))>
#<alt (+ (log im) (* re (+ (* (pow re 2) (- (* 3/40 (/ (pow re 2) (pow im 5))) (* 1/6 (/ 1 (pow im 3))))) (/ 1 im))))>
#<alt (+ (log 2) (* -1 (log (/ 1 re))))>
#<alt (+ (log 2) (+ (* -1 (log (/ 1 re))) (* 1/4 (/ (pow im 2) (pow re 2)))))>
#<alt (+ (log 2) (+ (* -1 (log (/ 1 re))) (+ (* 1/24 (/ (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))) (pow re 4))) (* 1/4 (/ (pow im 2) (pow re 2))))))>
#<alt (+ (log 2) (+ (* -1 (log (/ 1 re))) (+ (* 1/720 (/ (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6)))) (pow re 6))) (+ (* 1/24 (/ (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))) (pow re 4))) (* 1/4 (/ (pow im 2) (pow re 2)))))))>
#<alt (+ (log (* 1/2 (pow im 2))) (log (/ -1 re)))>
#<alt (+ (log (* 1/2 (pow im 2))) (+ (log (/ -1 re)) (* -1/4 (/ (pow im 2) (pow re 2)))))>
#<alt (+ (log (* 1/2 (pow im 2))) (+ (log (/ -1 re)) (+ (* -1/4 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))) (pow re 4))))))>
#<alt (+ (log (* 1/2 (pow im 2))) (+ (log (/ -1 re)) (+ (* -1/4 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))) (pow re 6))) (* 1/24 (/ (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))) (pow re 4)))))))>
#<alt (log (* 2 re))>
#<alt (+ (log (* 2 re)) (* 1/4 (/ (pow im 2) (pow re 2))))>
#<alt (+ (log (* 2 re)) (* (pow im 2) (+ (* -3/32 (/ (pow im 2) (pow re 4))) (* 1/4 (/ 1 (pow re 2))))))>
#<alt (+ (log (* 2 re)) (* (pow im 2) (+ (* (pow im 2) (- (* 5/96 (/ (pow im 2) (pow re 6))) (* 3/32 (/ 1 (pow re 4))))) (* 1/4 (/ 1 (pow re 2))))))>
#<alt (* -1 (log (/ 1 im)))>
#<alt (+ (* -1 (log (/ 1 im))) (/ re im))>
#<alt (+ (* -1 (log (/ 1 im))) (+ (* 1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow im 2))) (/ re im)))>
#<alt (+ (* -1 (log (/ 1 im))) (+ (* 1/6 (/ (+ (* -3 (pow re 3)) (* 2 (pow re 3))) (pow im 3))) (+ (* 1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow im 2))) (/ re im))))>
#<alt (* -1 (log (/ -1 im)))>
#<alt (+ (* -1 (log (/ -1 im))) (* -1 (/ re im)))>
#<alt (+ (* -1 (log (/ -1 im))) (* -1 (/ (+ re (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) im))) im)))>
#<alt (+ (* -1 (log (/ -1 im))) (* -1 (/ (+ re (* -1 (/ (+ (* -1/6 (/ (+ (* -3 (pow re 3)) (* 2 (pow re 3))) im)) (* 1/2 (+ (* -1 (pow re 2)) (pow re 2)))) im))) im)))>
#<alt (/ 1 im)>
#<alt (/ 1 im)>
#<alt (/ 1 im)>
#<alt (/ 1 im)>
#<alt (/ 1 im)>
#<alt (/ 1 im)>
#<alt (/ 1 im)>
#<alt (/ 1 im)>
#<alt (/ 1 im)>
#<alt (/ 1 im)>
#<alt (/ 1 im)>
#<alt (/ 1 im)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>
#<alt (pow im 2)>

Calls

90 calls:

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

rewrite216.0ms (2.3%)

Algorithm

1×	batch-egg-rewrite

Rules

3232×	`-lowering-.f32`
3232×	`-lowering-.f64`
2650×	`/-lowering-/.f32`
2650×	`/-lowering-/.f64`
1010×	`frac-2neg`

Iterations

Useful iterations: 3 (0.0ms)

Iter	Nodes	Cost
0	37	136
1	132	131
2	484	130
3	2510	124
0	8487	124

Stop Event

1×	iter limit
1×	node limit

Counts

19 → 351

Calls

Call 1

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

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

simplify341.0ms (3.6%)

Algorithm

1×	egg-herbie

Rules

8626×	`-lowering-.f32`
8626×	`-lowering-.f64`
4602×	`+-lowering-+.f64`
4602×	`+-lowering-+.f32`
1640×	`associate-r`

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	829	5778
1	2834	5110
0	8711	5110

Stop Event

1×	iter limit
1×	node limit

Counts

360 → 360

Calls

Call 1

Inputs
im
(+ im re)
(+ im (* re (+ 1 (* 1/2 (/ re im)))))
(+ im (* re (+ 1 (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))
(* 2 re)
(* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))
(* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1/2 (/ (pow im 2) re))
(* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re))
(* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re))
(* -1 (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re))
(* 2 re)
(+ (* 1/2 (/ (pow im 2) re)) (* 2 re))
(+ (* 2 re) (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+ (* 2 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
im
(* im (+ 1 (/ re im)))
(* im (+ 1 (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im)))))
(* -1 im)
(* -1 (* im (+ 1 (* -1 (/ re im)))))
(* -1 (* im (+ 1 (* -1 (/ (+ re (* -1/2 (/ (pow re 2) im))) im)))))
(* -1 (* im (+ 1 (* -1 (/ (+ re (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im))) im)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))
(* re (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))
(* re (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
(* re (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/64 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(+ (* 1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/1024 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))
(+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))))
(+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* -1/4 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/8 (sqrt (/ 1 (pow re 3)))))))
(+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/4 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(* (sqrt im) (sqrt 2))
(+ (* 1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (* (sqrt im) (sqrt 2)))
(+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(* (sqrt re) (pow (sqrt 2) 2))
(* re (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))
(* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))
(* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/32 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
(* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))
(+ (* 1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/512 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(* (sqrt re) (pow (sqrt 2) 2))
(+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (pow (sqrt 2) 2)))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* -1/2 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/4 (sqrt (/ 1 (pow re 3)))))))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* 1/4 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/2 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))
(* (sqrt im) (sqrt 2))
(* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(* 2 im)
(+ (* 2 im) (* 2 re))
(+ (* 2 im) (* re (+ 2 (/ re im))))
(+ (* 2 im) (* re (+ 2 (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))))))
(* 4 re)
(* re (+ 4 (/ (pow im 2) (pow re 2))))
(* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))
(* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))
(* -1 (/ (pow im 2) re))
(* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re))
(* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re))
(* -1 (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re))
(* 4 re)
(+ (* 4 re) (/ (pow im 2) re))
(+ (* 4 re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))))
(+ (* 4 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))))
(* 2 im)
(* im (+ 2 (* 2 (/ re im))))
(* im (+ 2 (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(* im (+ 2 (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2))))))
(* -2 im)
(* -1 (* im (+ 2 (* -2 (/ re im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (pow re 2) im)) (* 2 re)) im)))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im)) (* 2 re)) im)))))
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(* -1 (sqrt re))
(* -1 (sqrt re))
(* -1 (sqrt re))
(* -1 (sqrt re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(sqrt (/ 1 re))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* (sqrt (/ 1 re)) (sqrt -1))
(* (sqrt (/ 1 re)) (sqrt -1))
(* (sqrt (/ 1 re)) (sqrt -1))
(* (sqrt (/ 1 re)) (sqrt -1))
(* (sqrt (/ 1 re)) (sqrt -1))
(* (sqrt (/ 1 re)) (sqrt -1))
(* (sqrt (/ 1 re)) (sqrt -1))
(* (sqrt (/ 1 re)) (sqrt -1))
(* (sqrt (/ 1 re)) (sqrt -1))
(* (sqrt (/ 1 re)) (sqrt -1))
(* (sqrt (/ 1 re)) (sqrt -1))
(* (sqrt (/ 1 re)) (sqrt -1))
(* -1 re)
(* -1 re)
(* -1 re)
(* -1 re)
(* -1 re)
(* -1 re)
(* -1 re)
(* -1 re)
(* -1 re)
(* -1 re)
(* -1 re)
(* -1 re)
(* 1/2 im)
(* 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 (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* (* im (sqrt -1)) (sqrt (/ 1 re)))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(* 1/2 (* (* (pow im 2) (sqrt -1/4)) (sqrt (/ 1 (pow re 3)))))
(/ (+ (* 1/4 (* (sqrt (pow re 5)) (/ 1 (sqrt -1/4)))) (* 1/2 (* (* (pow im 2) (sqrt -1/4)) (sqrt re)))) (pow re 2))
(/ (+ (* 1/2 (* (* (pow im 2) (sqrt -1/4)) (sqrt re))) (* (pow re 3) (+ (* 1/4 (* (sqrt (/ 1 re)) (/ 1 (sqrt -1/4)))) (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt (pow re 3)))))) (pow re 2))
(/ (+ (* 1/2 (* (* (pow im 2) (sqrt -1/4)) (sqrt re))) (* (pow re 3) (+ (* 1/4 (* (sqrt (/ 1 re)) (/ 1 (sqrt -1/4)))) (* (pow re 2) (+ (* -1/16 (* (/ 1 (* (pow im 2) (pow (sqrt -1/4) 3))) (sqrt (/ 1 re)))) (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt (/ 1 re)))))))) (pow re 2))
(sqrt re)
(* re (+ (sqrt (/ 1 re)) (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))
(* re (+ (sqrt (/ 1 re)) (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))))))
(* re (+ (sqrt (/ 1 re)) (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/128 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))))
(* -1/2 (* (sqrt re) (* (sqrt -4) (sqrt -1))))
(* -1 (* re (+ (* 1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt re))) (* 1/16 (* (/ (* (pow im 4) (sqrt -1)) (sqrt -4)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt re))) (+ (* 1/16 (* (/ (* (pow im 4) (sqrt -1)) (sqrt -4)) (sqrt (/ 1 (pow re 3))))) (* 1/16 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt -4) 3)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1)))))))
(sqrt re)
(+ (sqrt re) (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 3))))))
(+ (sqrt re) (* (pow im 2) (+ (* -5/128 (* (pow im 2) (sqrt (/ 1 (pow re 7))))) (* 1/8 (sqrt (/ 1 (pow re 3)))))))
(+ (sqrt re) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -5/128 (sqrt (/ 1 (pow re 7)))) (* 5/1024 (* (pow im 2) (sqrt (/ 1 (pow re 11))))))))))
(* 1/2 (* (* (pow im 2) (sqrt -1/4)) (sqrt (/ 1 (pow re 3)))))
(* (pow im 2) (+ (* 1/4 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (* 1/2 (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4)))))
(* (pow im 2) (+ (* 1/4 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (+ (* 1/4 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 4) (sqrt -1/4))) (sqrt (pow re 3)))) (* 1/2 (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4))))))
(* (pow im 2) (+ (* -1/8 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 6) (pow (sqrt -1/4) 3))) (sqrt (pow re 7)))) (+ (* 1/4 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (+ (* 1/4 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 4) (sqrt -1/4))) (sqrt (pow re 3)))) (* 1/2 (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4)))))))
(* 1/2 (* (* (pow im 2) (sqrt -1/4)) (sqrt (/ 1 (pow re 3)))))
(* (pow im 2) (+ (* 1/4 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (* 1/2 (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4)))))
(* (pow im 2) (+ (* 1/4 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (+ (* 1/4 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 4) (sqrt -1/4))) (sqrt (pow re 3)))) (* 1/2 (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4))))))
(* (pow im 2) (+ (* -1/8 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 6) (pow (sqrt -1/4) 3))) (sqrt (pow re 7)))) (+ (* 1/4 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (+ (* 1/4 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 4) (sqrt -1/4))) (sqrt (pow re 3)))) (* 1/2 (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4)))))))
(* (* (pow im 2) (sqrt -1/4)) (sqrt (/ 1 (pow re 3))))
(/ (+ (* 1/2 (* (sqrt (pow re 5)) (/ 1 (sqrt -1/4)))) (* (* (pow im 2) (sqrt -1/4)) (sqrt re))) (pow re 2))
(/ (+ (* (* (pow im 2) (sqrt -1/4)) (sqrt re)) (* (pow re 3) (+ (* 1/2 (* (sqrt (/ 1 re)) (/ 1 (sqrt -1/4)))) (* 2 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt (pow re 3))))))) (pow re 2))
(/ (+ (* (* (pow im 2) (sqrt -1/4)) (sqrt re)) (* (pow re 3) (+ (* 1/2 (* (sqrt (/ 1 re)) (/ 1 (sqrt -1/4)))) (* (pow re 2) (+ (* -1/8 (* (/ 1 (* (pow im 2) (pow (sqrt -1/4) 3))) (sqrt (/ 1 re)))) (* 2 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt (/ 1 re))))))))) (pow re 2))
(* 2 (sqrt re))
(* re (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 2 (sqrt (/ 1 re)))))
(* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 2 (sqrt (/ 1 re))))))
(* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/64 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 2 (sqrt (/ 1 re)))))))
(* -1 (* (sqrt re) (* (sqrt -4) (sqrt -1))))
(* -1 (* re (+ (* 1/2 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/2 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt re))) (* 1/8 (* (/ (* (pow im 4) (sqrt -1)) (sqrt -4)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/2 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt re))) (+ (* 1/8 (* (/ (* (pow im 4) (sqrt -1)) (sqrt -4)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt -4) 3)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1))))))
(* 2 (sqrt re))
(+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* 2 (sqrt re)))
(+ (* 2 (sqrt re)) (* (pow im 2) (+ (* -5/64 (* (pow im 2) (sqrt (/ 1 (pow re 7))))) (* 1/4 (sqrt (/ 1 (pow re 3)))))))
(+ (* 2 (sqrt re)) (* (pow im 2) (+ (* 1/4 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -5/64 (sqrt (/ 1 (pow re 7)))) (* 5/512 (* (pow im 2) (sqrt (/ 1 (pow re 11))))))))))
(* (* (pow im 2) (sqrt -1/4)) (sqrt (/ 1 (pow re 3))))
(* (pow im 2) (+ (* 1/2 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4))))
(* (pow im 2) (+ (* 1/2 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (+ (* 1/2 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 4) (sqrt -1/4))) (sqrt (pow re 3)))) (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4)))))
(* (pow im 2) (+ (* -1/4 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 6) (pow (sqrt -1/4) 3))) (sqrt (pow re 7)))) (+ (* 1/2 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (+ (* 1/2 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 4) (sqrt -1/4))) (sqrt (pow re 3)))) (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4))))))
(* (* (pow im 2) (sqrt -1/4)) (sqrt (/ 1 (pow re 3))))
(* (pow im 2) (+ (* 1/2 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4))))
(* (pow im 2) (+ (* 1/2 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (+ (* 1/2 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 4) (sqrt -1/4))) (sqrt (pow re 3)))) (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4)))))
(* (pow im 2) (+ (* -1/4 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 6) (pow (sqrt -1/4) 3))) (sqrt (pow re 7)))) (+ (* 1/2 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (+ (* 1/2 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 4) (sqrt -1/4))) (sqrt (pow re 3)))) (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4))))))
(* -1/4 (/ (pow im 4) (pow re 3)))
(/ (+ (* -1/4 (pow im 4)) (* (pow im 2) (pow re 2))) (pow re 3))
(/ (+ (* -1/4 (pow im 4)) (* (pow re 2) (+ (* 4 (pow re 2)) (pow im 2)))) (pow re 3))
(/ (+ (* -1/4 (pow im 4)) (* (pow re 2) (+ (* 4 (pow re 2)) (pow im 2)))) (pow re 3))
(* 4 re)
(* re (+ 4 (/ (pow im 2) (pow re 2))))
(* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))
(* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))
(* 4 re)
(* -1 (* re (- (* -1 (/ (pow im 2) (pow re 2))) 4)))
(* -1 (* re (- (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/4 (/ (pow im 4) (pow re 4)))) 4)))
(* -1 (* re (- (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/4 (/ (pow im 4) (pow re 4)))) 4)))
(* 4 re)
(+ (* 4 re) (/ (pow im 2) re))
(+ (* 4 re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))))
(+ (* 4 re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))))
(* -1/4 (/ (pow im 4) (pow re 3)))
(* (pow im 4) (- (/ 1 (* (pow im 2) re)) (* 1/4 (/ 1 (pow re 3)))))
(* (pow im 4) (- (+ (* 4 (/ re (pow im 4))) (/ 1 (* (pow im 2) re))) (* 1/4 (/ 1 (pow re 3)))))
(* (pow im 4) (- (+ (* 4 (/ re (pow im 4))) (/ 1 (* (pow im 2) re))) (* 1/4 (/ 1 (pow re 3)))))
(* -1/4 (/ (pow im 4) (pow re 3)))
(* (pow im 4) (- (/ 1 (* (pow im 2) re)) (* 1/4 (/ 1 (pow re 3)))))
(* (pow im 4) (- (+ (* 4 (/ re (pow im 4))) (/ 1 (* (pow im 2) re))) (* 1/4 (/ 1 (pow re 3)))))
(* (pow im 4) (- (+ (* 4 (/ re (pow im 4))) (/ 1 (* (pow im 2) re))) (* 1/4 (/ 1 (pow re 3)))))
(* 4 re)
(* 4 re)
(* 4 re)
(* 4 re)
(* 4 re)
(* 4 re)
(* 4 re)
(* 4 re)
(* 4 re)
(* 4 re)
(* 4 re)
(* 4 re)
(log im)
(+ (log im) (/ re im))
(+ (log im) (* re (+ (* -1/6 (/ (pow re 2) (pow im 3))) (/ 1 im))))
(+ (log im) (* re (+ (* (pow re 2) (- (* 3/40 (/ (pow re 2) (pow im 5))) (* 1/6 (/ 1 (pow im 3))))) (/ 1 im))))
(+ (log 2) (* -1 (log (/ 1 re))))
(+ (log 2) (+ (* -1 (log (/ 1 re))) (* 1/4 (/ (pow im 2) (pow re 2)))))
(+ (log 2) (+ (* -1 (log (/ 1 re))) (+ (* 1/24 (/ (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))) (pow re 4))) (* 1/4 (/ (pow im 2) (pow re 2))))))
(+ (log 2) (+ (* -1 (log (/ 1 re))) (+ (* 1/720 (/ (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6)))) (pow re 6))) (+ (* 1/24 (/ (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))) (pow re 4))) (* 1/4 (/ (pow im 2) (pow re 2)))))))
(+ (log (* 1/2 (pow im 2))) (log (/ -1 re)))
(+ (log (* 1/2 (pow im 2))) (+ (log (/ -1 re)) (* -1/4 (/ (pow im 2) (pow re 2)))))
(+ (log (* 1/2 (pow im 2))) (+ (log (/ -1 re)) (+ (* -1/4 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))) (pow re 4))))))
(+ (log (* 1/2 (pow im 2))) (+ (log (/ -1 re)) (+ (* -1/4 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))) (pow re 6))) (* 1/24 (/ (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))) (pow re 4)))))))
(log (* 2 re))
(+ (log (* 2 re)) (* 1/4 (/ (pow im 2) (pow re 2))))
(+ (log (* 2 re)) (* (pow im 2) (+ (* -3/32 (/ (pow im 2) (pow re 4))) (* 1/4 (/ 1 (pow re 2))))))
(+ (log (* 2 re)) (* (pow im 2) (+ (* (pow im 2) (- (* 5/96 (/ (pow im 2) (pow re 6))) (* 3/32 (/ 1 (pow re 4))))) (* 1/4 (/ 1 (pow re 2))))))
(* -1 (log (/ 1 im)))
(+ (* -1 (log (/ 1 im))) (/ re im))
(+ (* -1 (log (/ 1 im))) (+ (* 1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow im 2))) (/ re im)))
(+ (* -1 (log (/ 1 im))) (+ (* 1/6 (/ (+ (* -3 (pow re 3)) (* 2 (pow re 3))) (pow im 3))) (+ (* 1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow im 2))) (/ re im))))
(* -1 (log (/ -1 im)))
(+ (* -1 (log (/ -1 im))) (* -1 (/ re im)))
(+ (* -1 (log (/ -1 im))) (* -1 (/ (+ re (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) im))) im)))
(+ (* -1 (log (/ -1 im))) (* -1 (/ (+ re (* -1 (/ (+ (* -1/6 (/ (+ (* -3 (pow re 3)) (* 2 (pow re 3))) im)) (* 1/2 (+ (* -1 (pow re 2)) (pow re 2)))) im))) im)))
(/ 1 im)
(/ 1 im)
(/ 1 im)
(/ 1 im)
(/ 1 im)
(/ 1 im)
(/ 1 im)
(/ 1 im)
(/ 1 im)
(/ 1 im)
(/ 1 im)
(/ 1 im)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)
(pow im 2)

Outputs
im
(+ im re)
(+.f64 im re)
(+ im (* re (+ 1 (* 1/2 (/ re im)))))
(+.f64 im (.f64 re (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) re) im))))
(+ im (* re (+ 1 (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))
(+.f64 im (.f64 re (+.f64 #s(literal 1 binary64) (.f64 re (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 re re)) (.f64 im (.f64 im im))) (/.f64 #s(literal 1/2 binary64) im))))))
(* 2 re)
(*.f64 re #s(literal 2 binary64))
(* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))
(.f64 re (+.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re))))
(* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(.f64 re (+.f64 (+.f64 #s(literal 2 binary64) (/.f64 (.f64 #s(literal -1/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 (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(.f64 re (+.f64 #s(literal 2 binary64) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 re re)) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))))))
(* -1/2 (/ (pow im 2) re))
(/.f64 (.f64 #s(literal -1/2 binary64) (.f64 im im)) re)
(* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re))
(/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (.f64 re re)) (.f64 #s(literal 1/2 binary64) (.f64 im im))) (-.f64 #s(literal 0 binary64) re))
(* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re))
(/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (.f64 re re)) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (/.f64 (*.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) (-.f64 #s(literal 0 binary64) re))
(* -1 (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re))
(/.f64 (+.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64))) (.f64 re re)) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64))))) (/.f64 (.f64 (*.f64 #s(literal -1/2 binary64) (pow.f64 im #s(literal 8 binary64))) #s(literal 5/64 binary64)) (pow.f64 re #s(literal 6 binary64)))) (-.f64 #s(literal 0 binary64) re))
(* 2 re)
(*.f64 re #s(literal 2 binary64))
(+ (* 1/2 (/ (pow im 2) re)) (* 2 re))
(+.f64 (.f64 re #s(literal 2 binary64)) (/.f64 (.f64 #s(literal 1/2 binary64) (*.f64 im im)) re))
(+ (* 2 re) (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+.f64 (.f64 re #s(literal 2 binary64)) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 im im)) (.f64 re (*.f64 re re))) (/.f64 #s(literal 1/2 binary64) re))))
(+ (* 2 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
(+.f64 (.f64 re #s(literal 2 binary64)) (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/2 binary64) re) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal 1/16 binary64) (.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (.f64 re (*.f64 re re))))))))
im
(* im (+ 1 (/ re im)))
(*.f64 im (+.f64 #s(literal 1 binary64) (/.f64 re im)))
(* im (+ 1 (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im))))
(.f64 im (+.f64 (+.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im)))))
(.f64 im (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 #s(literal 1/2 binary64) (.f64 re re)) (.f64 im im)) (+.f64 (/.f64 re im) (/.f64 (*.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64)))))))
(* -1 im)
(-.f64 #s(literal 0 binary64) im)
(* -1 (* im (+ 1 (* -1 (/ re im)))))
(*.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 re im)))
(* -1 (* im (+ 1 (* -1 (/ (+ re (* -1/2 (/ (pow re 2) im))) im)))))
(.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re (/.f64 (.f64 (*.f64 re re) #s(literal -1/2 binary64)) im)) im)))
(* -1 (* im (+ 1 (* -1 (/ (+ re (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im))) im)))))
(.f64 (-.f64 #s(literal 0 binary64) im) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (/.f64 (+.f64 (/.f64 (.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64))) (.f64 im im)) (.f64 #s(literal 1/2 binary64) (*.f64 re re))) im)) im)))
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+.f64 (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 re (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/4 binary64)))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))))))
(+.f64 (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/4 binary64))) (.f64 re (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/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 (.f64 re (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) #s(literal -1/32 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/16 binary64))))))))
(* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))
(sqrt.f64 re)
(* re (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))
(.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (.f64 im im) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* re (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
(.f64 re (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (.f64 im im) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/32 binary64)))))
(* re (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/64 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
(.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (+.f64 (.f64 #s(literal -1/32 binary64) (pow.f64 im #s(literal 4 binary64))) (.f64 #s(literal -1/64 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 2 binary64))))) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (*.f64 im im) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(+ (* 1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) im))) (.f64 #s(literal 1/32 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (.f64 (.f64 im (.f64 im im)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))))))
(+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) im))) (/.f64 (+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (.f64 im (.f64 im im)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 re))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 #s(literal 1/64 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))))) (.f64 re (*.f64 re re))))
(+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/1024 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
(-.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) im))) (/.f64 (+.f64 (.f64 #s(literal -1/32 binary64) (/.f64 (.f64 (.f64 im (.f64 im im)) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 re))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (+.f64 (.f64 #s(literal 1/64 binary64) (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal 1/1024 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))))))) (.f64 re (*.f64 re re))))
(* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))
(sqrt.f64 re)
(+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))))
(+.f64 (sqrt.f64 re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 im im) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (*.f64 re re)))))))
(+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* -1/4 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/8 (sqrt (/ 1 (pow re 3)))))))
(+.f64 (sqrt.f64 re) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))) (.f64 (.f64 im im) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (+.f64 (/.f64 #s(literal 1/8 binary64) (.f64 re (.f64 re re))) (/.f64 #s(literal 1/16 binary64) (.f64 re (.f64 re (.f64 re #s(literal 2 binary64)))))) #s(literal -1/4 binary64)))))))
(+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/4 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))
(+.f64 (sqrt.f64 re) (.f64 im (.f64 im (+.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))) (.f64 im (.f64 im (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (+.f64 (/.f64 #s(literal 1/8 binary64) (.f64 re (.f64 re re))) (/.f64 #s(literal 1/16 binary64) (.f64 re (.f64 re (.f64 re #s(literal 2 binary64)))))) #s(literal -1/4 binary64))) (.f64 (.f64 im im) (.f64 (.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/8 binary64) (.f64 re (.f64 re re))) (/.f64 #s(literal 1/16 binary64) (.f64 re (.f64 re (.f64 re #s(literal 2 binary64)))))) (*.f64 re re)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) #s(literal 1/4 binary64))))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(.f64 im (+.f64 (.f64 (.f64 re (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) #s(literal 1/4 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(* im (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))
(.f64 im (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (+.f64 (.f64 (.f64 re (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) #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 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/8 binary64))))))
(* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
(.f64 im (+.f64 (.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/16 binary64)) (+.f64 (.f64 (.f64 re (sqrt.f64 #s(literal 2 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) #s(literal 1/4 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal -1 binary64)) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64)))))
(* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64))) (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal -1 binary64)) re))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (*.f64 re re))))))))
(* -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 #s(literal 0 binary64) im) (-.f64 (+.f64 (.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal -1 binary64)) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (sqrt.f64 #s(literal -1 binary64)))) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 re re))) (.f64 (sqrt.f64 im) #s(literal 3/16 binary64))) (.f64 im (*.f64 im im)))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* 1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(+.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))))
(+ (* re (+ (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (* (sqrt im) (sqrt 2)))
(+.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 re (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/8 binary64)))))))
(+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(+.f64 (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))) (.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))) (.f64 re (+.f64 (.f64 (.f64 #s(literal -1/16 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64))))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/8 binary64))))))))
(* (sqrt re) (pow (sqrt 2) 2))
(*.f64 #s(literal 2 binary64) (sqrt.f64 re))
(* re (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))
(.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (.f64 im im) #s(literal 1/4 binary64))) (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))
(.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (.f64 im im) #s(literal 1/4 binary64))) (+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/16 binary64))))))
(* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/32 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
(.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (+.f64 (.f64 #s(literal -1/16 binary64) (pow.f64 im #s(literal 4 binary64))) (.f64 #s(literal -1/32 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 2 binary64))))) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (.f64 im im) #s(literal 1/4 binary64))) (.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))))
(* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))
(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) im)))
(+ (* 1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) im))) (.f64 #s(literal 1/16 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 (.f64 (.f64 im (.f64 im im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))))))
(+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) im))) (/.f64 (+.f64 (.f64 (/.f64 (.f64 (.f64 im (.f64 im im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 re) #s(literal -1/16 binary64))) (.f64 (.f64 #s(literal 1/32 binary64) (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))))) (.f64 re (.f64 re re))))
(+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/512 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))
(-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) im))) (/.f64 (+.f64 (.f64 (/.f64 (.f64 (.f64 im (.f64 im im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 re) #s(literal -1/16 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (+.f64 (.f64 #s(literal 1/32 binary64) (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (.f64 #s(literal 1/512 binary64) (pow.f64 im #s(literal 5 binary64))) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 1/2 binary64)))))))) (.f64 re (.f64 re re))))
(* (sqrt re) (pow (sqrt 2) 2))
(*.f64 #s(literal 2 binary64) (sqrt.f64 re))
(+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (pow (sqrt 2) 2)))
(+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 re)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (.f64 #s(literal 1/4 binary64) (.f64 im im))))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* -1/2 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/4 (sqrt (/ 1 (pow re 3)))))))
(+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 re)) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))) (.f64 (.f64 im im) (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (+.f64 (/.f64 #s(literal 1/8 binary64) (.f64 re (.f64 re re))) (/.f64 #s(literal 1/16 binary64) (.f64 re (.f64 re (*.f64 re #s(literal 2 binary64)))))))))))
(+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* 1/4 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/2 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))
(+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 re)) (.f64 im (.f64 im (+.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))) (.f64 (.f64 im im) (+.f64 (.f64 (.f64 #s(literal -1/2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (+.f64 (/.f64 #s(literal 1/8 binary64) (.f64 re (.f64 re re))) (/.f64 #s(literal 1/16 binary64) (.f64 re (.f64 re (.f64 re #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 im im) (.f64 (-.f64 (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64))) (.f64 #s(literal -1/8 binary64) (/.f64 (+.f64 (/.f64 #s(literal 1/8 binary64) (.f64 re (.f64 re re))) (/.f64 #s(literal 1/16 binary64) (.f64 re (.f64 re (.f64 re #s(literal 2 binary64)))))) (.f64 re re)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(.f64 im (+.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
(* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))
(.f64 im (+.f64 (.f64 (sqrt.f64 #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 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (*.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/4 binary64))))))
(* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
(.f64 im (+.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re re)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/8 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 #s(literal -1 binary64) (sqrt.f64 im)))
(* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(-.f64 #s(literal 0 binary64) (.f64 im (+.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal -1 binary64)) re)))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(.f64 (-.f64 #s(literal 0 binary64) im) (+.f64 (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal -1 binary64)) re)))) (+.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 re re))) #s(literal -1/4 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 #s(literal 0 binary64) (.f64 im (-.f64 (+.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal -1 binary64)) re))))) (/.f64 (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 re re))) (.f64 (sqrt.f64 im) #s(literal 3/8 binary64))) (.f64 im (.f64 im im))))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* 2 im) (* 2 re))
(*.f64 #s(literal 2 binary64) (+.f64 im re))
(+ (* 2 im) (* re (+ 2 (/ re im))))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 (/.f64 re im) #s(literal 2 binary64))))
(+ (* 2 im) (* re (+ 2 (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))))))
(+.f64 (.f64 im #s(literal 2 binary64)) (.f64 re (+.f64 #s(literal 2 binary64) (.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 re re)) (.f64 im (*.f64 im im))))))))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(* re (+ 4 (/ (pow im 2) (pow re 2))))
(.f64 re (+.f64 (/.f64 (.f64 im im) (*.f64 re re)) #s(literal 4 binary64)))
(* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))
(.f64 re (+.f64 (/.f64 (.f64 im im) (.f64 re re)) (+.f64 (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal 4 binary64))))
(* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))
(.f64 re (+.f64 (+.f64 (/.f64 (.f64 im im) (.f64 re re)) (+.f64 (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))))
(* -1 (/ (pow im 2) re))
(-.f64 #s(literal 0 binary64) (/.f64 (*.f64 im im) re))
(* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re))
(/.f64 (+.f64 (.f64 im im) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (*.f64 re re))) (-.f64 #s(literal 0 binary64) re))
(* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re))
(/.f64 (+.f64 (+.f64 (.f64 im im) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (.f64 re re))) (/.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64)))) (-.f64 #s(literal 0 binary64) re))
(* -1 (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re))
(/.f64 (-.f64 (+.f64 (+.f64 (.f64 im im) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (.f64 re re))) (/.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (pow.f64 re #s(literal 6 binary64)))) (-.f64 #s(literal 0 binary64) re))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(+ (* 4 re) (/ (pow im 2) re))
(+.f64 (/.f64 (.f64 im im) re) (.f64 re #s(literal 4 binary64)))
(+ (* 4 re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))))
(+.f64 (.f64 re #s(literal 4 binary64)) (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 im im)) (.f64 re (*.f64 re re))))))
(+ (* 4 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))))
(+.f64 (.f64 re #s(literal 4 binary64)) (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal 1/8 binary64) (.f64 im im)) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/4 binary64) (.f64 re (*.f64 re re))))))))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* 2 (/ re im))))
(.f64 im (+.f64 #s(literal 2 binary64) (/.f64 (.f64 re #s(literal 2 binary64)) im)))
(* im (+ 2 (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(.f64 im (+.f64 (/.f64 (.f64 re re) (.f64 im im)) (+.f64 #s(literal 2 binary64) (/.f64 (.f64 re #s(literal 2 binary64)) im))))
(* im (+ 2 (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2))))))
(.f64 im (+.f64 (+.f64 (/.f64 (.f64 re re) (.f64 im im)) (+.f64 #s(literal 2 binary64) (/.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 (-.f64 #s(literal 0 binary64) im) (+.f64 #s(literal 2 binary64) (.f64 (/.f64 re im) #s(literal -2 binary64))))
(* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (pow re 2) im)) (* 2 re)) 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 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im)) (* 2 re)) 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)))
(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))
(-.f64 #s(literal 0 binary64) (sqrt.f64 re))
(* -1 (sqrt re))
(-.f64 #s(literal 0 binary64) (sqrt.f64 re))
(* -1 (sqrt re))
(-.f64 #s(literal 0 binary64) (sqrt.f64 re))
(* -1 (sqrt re))
(-.f64 #s(literal 0 binary64) (sqrt.f64 re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(sqrt (/ 1 re))
(sqrt.f64 (/.f64 #s(literal 1 binary64) re))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* (sqrt (/ 1 re)) (pow (sqrt -1) 2))
(*.f64 #s(literal -1 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* (sqrt (/ 1 re)) (sqrt -1))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))
(* (sqrt (/ 1 re)) (sqrt -1))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))
(* (sqrt (/ 1 re)) (sqrt -1))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))
(* (sqrt (/ 1 re)) (sqrt -1))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))
(* (sqrt (/ 1 re)) (sqrt -1))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))
(* (sqrt (/ 1 re)) (sqrt -1))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))
(* (sqrt (/ 1 re)) (sqrt -1))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))
(* (sqrt (/ 1 re)) (sqrt -1))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))
(* (sqrt (/ 1 re)) (sqrt -1))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))
(* (sqrt (/ 1 re)) (sqrt -1))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))
(* (sqrt (/ 1 re)) (sqrt -1))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))
(* (sqrt (/ 1 re)) (sqrt -1))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64)))
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* -1 re)
(-.f64 #s(literal 0 binary64) re)
(* 1/2 im)
(*.f64 im #s(literal 1/2 binary64))
(* 1/2 im)
(*.f64 im #s(literal 1/2 binary64))
(* 1/2 im)
(*.f64 im #s(literal 1/2 binary64))
(* 1/2 im)
(*.f64 im #s(literal 1/2 binary64))
(* 1/2 im)
(*.f64 im #s(literal 1/2 binary64))
(* 1/2 im)
(*.f64 im #s(literal 1/2 binary64))
(* 1/2 im)
(*.f64 im #s(literal 1/2 binary64))
(* 1/2 im)
(*.f64 im #s(literal 1/2 binary64))
(* 1/2 im)
(*.f64 im #s(literal 1/2 binary64))
(* 1/2 im)
(*.f64 im #s(literal 1/2 binary64))
(* 1/2 im)
(*.f64 im #s(literal 1/2 binary64))
(* 1/2 im)
(*.f64 im #s(literal 1/2 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 (sqrt -1)) (sqrt (/ 1 re)))
(.f64 im (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 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 (sqrt -1)) (sqrt (/ 1 re)))
(.f64 im (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 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 (sqrt -1)) (sqrt (/ 1 re)))
(.f64 im (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 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 (sqrt -1)) (sqrt (/ 1 re)))
(.f64 im (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 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 (sqrt -1)) (sqrt (/ 1 re)))
(.f64 im (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 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 (sqrt -1)) (sqrt (/ 1 re)))
(.f64 im (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 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 (sqrt -1)) (sqrt (/ 1 re)))
(.f64 im (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 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 (sqrt -1)) (sqrt (/ 1 re)))
(.f64 im (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 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 (sqrt -1)) (sqrt (/ 1 re)))
(.f64 im (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 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 (sqrt -1)) (sqrt (/ 1 re)))
(.f64 im (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 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 (sqrt -1)) (sqrt (/ 1 re)))
(.f64 im (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 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 (sqrt -1)) (sqrt (/ 1 re)))
(.f64 im (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* im (sqrt -1)) (sqrt (/ 1 re))))
(.f64 (.f64 im #s(literal 1/2 binary64)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))
(* 1/2 (* (* (pow im 2) (sqrt -1/4)) (sqrt (/ 1 (pow re 3)))))
(.f64 (.f64 im im) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (.f64 (sqrt.f64 #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))
(/ (+ (* 1/4 (* (sqrt (pow re 5)) (/ 1 (sqrt -1/4)))) (* 1/2 (* (* (pow im 2) (sqrt -1/4)) (sqrt re)))) (pow re 2))
(/.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 (pow.f64 re #s(literal 5 binary64))) (sqrt.f64 #s(literal -1/4 binary64)))) (.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 (sqrt.f64 #s(literal -1/4 binary64)) (sqrt.f64 re)))) (.f64 re re))
(/ (+ (* 1/2 (* (* (pow im 2) (sqrt -1/4)) (sqrt re))) (* (pow re 3) (+ (* 1/4 (* (sqrt (/ 1 re)) (/ 1 (sqrt -1/4)))) (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt (pow re 3)))))) (pow re 2))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 (sqrt.f64 #s(literal -1/4 binary64)) (sqrt.f64 re))) (.f64 (.f64 re (.f64 re re)) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/4 binary64)))) (/.f64 (sqrt.f64 (.f64 re (.f64 re re))) (.f64 im (.f64 im (sqrt.f64 #s(literal -1/4 binary64)))))))) (*.f64 re re))
(/ (+ (* 1/2 (* (* (pow im 2) (sqrt -1/4)) (sqrt re))) (* (pow re 3) (+ (* 1/4 (* (sqrt (/ 1 re)) (/ 1 (sqrt -1/4)))) (* (pow re 2) (+ (* -1/16 (* (/ 1 (* (pow im 2) (pow (sqrt -1/4) 3))) (sqrt (/ 1 re)))) (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt (/ 1 re)))))))) (pow re 2))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im)) (.f64 (sqrt.f64 #s(literal -1/4 binary64)) (sqrt.f64 re))) (.f64 re (.f64 (.f64 re re) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/4 binary64)))) (.f64 (.f64 re re) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (+.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 im im)) (.f64 #s(literal -1/4 binary64) (sqrt.f64 #s(literal -1/4 binary64))))) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 im im)) (sqrt.f64 #s(literal -1/4 binary64)))))))))) (.f64 re re))
(sqrt re)
(sqrt.f64 re)
(* re (+ (sqrt (/ 1 re)) (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))
(.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (.f64 im im) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(* re (+ (sqrt (/ 1 re)) (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))))))
(.f64 re (+.f64 (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (.f64 im im) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/32 binary64)))))
(* re (+ (sqrt (/ 1 re)) (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/128 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5)))))))))
(.f64 re (+.f64 (.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))) #s(literal -5/128 binary64)) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (.f64 im im) #s(literal 1/8 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* -1/2 (* (sqrt re) (* (sqrt -4) (sqrt -1))))
(.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -4 binary64))) (*.f64 (sqrt.f64 re) #s(literal -1/2 binary64)))
(* -1 (* re (+ (* 1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1)))))))
(.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (.f64 (.f64 (.f64 #s(literal 1/4 binary64) (.f64 im im)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64))))) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -4 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 1/2 binary64)))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt re))) (* 1/16 (* (/ (* (pow im 4) (sqrt -1)) (sqrt -4)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1)))))))
(.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -4 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 1/2 binary64))) (/.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 im im) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 re))) (sqrt.f64 #s(literal -4 binary64)))) (.f64 (.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 4 binary64))) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))))) (.f64 re (*.f64 re re)))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt re))) (+ (* 1/16 (* (/ (* (pow im 4) (sqrt -1)) (sqrt -4)) (sqrt (/ 1 (pow re 3))))) (* 1/16 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt -4) 3)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1)))))))
(.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -4 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) #s(literal 1/2 binary64))) (/.f64 (+.f64 (.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 im im) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 re))) (sqrt.f64 #s(literal -4 binary64)))) (.f64 #s(literal 1/16 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (+.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -4 binary64)))) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal -4 binary64) (sqrt.f64 #s(literal -4 binary64)))))))) (.f64 re (*.f64 re re)))))
(sqrt re)
(sqrt.f64 re)
(+ (sqrt re) (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 3))))))
(+.f64 (sqrt.f64 re) (.f64 #s(literal 1/8 binary64) (.f64 (.f64 im im) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (*.f64 re re)))))))
(+ (sqrt re) (* (pow im 2) (+ (* -5/128 (* (pow im 2) (sqrt (/ 1 (pow re 7))))) (* 1/8 (sqrt (/ 1 (pow re 3)))))))
(+.f64 (sqrt.f64 re) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) (.f64 #s(literal -5/128 binary64) (.f64 im im))))))
(+ (sqrt re) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -5/128 (sqrt (/ 1 (pow re 7)))) (* 5/1024 (* (pow im 2) (sqrt (/ 1 (pow re 11))))))))))
(+.f64 (sqrt.f64 re) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal 1/8 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))) (.f64 im (.f64 im (+.f64 (.f64 #s(literal -5/128 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 11 binary64)))) (.f64 (*.f64 im im) #s(literal 5/1024 binary64)))))))))
(* 1/2 (* (* (pow im 2) (sqrt -1/4)) (sqrt (/ 1 (pow re 3)))))
(.f64 (.f64 im im) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (.f64 (sqrt.f64 #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))
(* (pow im 2) (+ (* 1/4 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (* 1/2 (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4)))))
(.f64 (.f64 im im) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 re) (.f64 im (.f64 im (sqrt.f64 #s(literal -1/4 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (*.f64 (sqrt.f64 #s(literal -1/4 binary64)) #s(literal 1/2 binary64)))))
(* (pow im 2) (+ (* 1/4 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (+ (* 1/4 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 4) (sqrt -1/4))) (sqrt (pow re 3)))) (* 1/2 (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4))))))
(.f64 (.f64 im im) (+.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (sqrt.f64 re) (.f64 im (.f64 im (sqrt.f64 #s(literal -1/4 binary64))))) (.f64 (/.f64 (+.f64 (.f64 re #s(literal 4 binary64)) (/.f64 (.f64 #s(literal 1/4 binary64) re) #s(literal 1/4 binary64))) (pow.f64 im #s(literal 4 binary64))) (/.f64 (sqrt.f64 (.f64 re (.f64 re re))) (sqrt.f64 #s(literal -1/4 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (.f64 (sqrt.f64 #s(literal -1/4 binary64)) #s(literal 1/2 binary64)))))
(* (pow im 2) (+ (* -1/8 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 6) (pow (sqrt -1/4) 3))) (sqrt (pow re 7)))) (+ (* 1/4 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (+ (* 1/4 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 4) (sqrt -1/4))) (sqrt (pow re 3)))) (* 1/2 (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4)))))))
(.f64 (.f64 im im) (+.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (sqrt.f64 re) (.f64 im (.f64 im (sqrt.f64 #s(literal -1/4 binary64))))) (.f64 (/.f64 (+.f64 (.f64 re #s(literal 4 binary64)) (/.f64 (.f64 #s(literal 1/4 binary64) re) #s(literal 1/4 binary64))) (pow.f64 im #s(literal 4 binary64))) (/.f64 (sqrt.f64 (.f64 re (.f64 re re))) (sqrt.f64 #s(literal -1/4 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (.f64 (sqrt.f64 #s(literal -1/4 binary64)) #s(literal 1/2 binary64)))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (+.f64 (.f64 re #s(literal 4 binary64)) (/.f64 (.f64 #s(literal 1/4 binary64) re) #s(literal 1/4 binary64))) (.f64 (pow.f64 im #s(literal 6 binary64)) (.f64 #s(literal -1/4 binary64) (sqrt.f64 #s(literal -1/4 binary64))))) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))))))
(* 1/2 (* (* (pow im 2) (sqrt -1/4)) (sqrt (/ 1 (pow re 3)))))
(.f64 (.f64 im im) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (.f64 (sqrt.f64 #s(literal -1/4 binary64)) #s(literal 1/2 binary64))))
(* (pow im 2) (+ (* 1/4 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (* 1/2 (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4)))))
(.f64 (.f64 im im) (+.f64 (.f64 #s(literal 1/4 binary64) (/.f64 (sqrt.f64 re) (.f64 im (.f64 im (sqrt.f64 #s(literal -1/4 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (*.f64 (sqrt.f64 #s(literal -1/4 binary64)) #s(literal 1/2 binary64)))))
(* (pow im 2) (+ (* 1/4 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (+ (* 1/4 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 4) (sqrt -1/4))) (sqrt (pow re 3)))) (* 1/2 (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4))))))
(.f64 (.f64 im im) (+.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (sqrt.f64 re) (.f64 im (.f64 im (sqrt.f64 #s(literal -1/4 binary64))))) (.f64 (/.f64 (+.f64 (.f64 re #s(literal 4 binary64)) (/.f64 (.f64 #s(literal 1/4 binary64) re) #s(literal 1/4 binary64))) (pow.f64 im #s(literal 4 binary64))) (/.f64 (sqrt.f64 (.f64 re (.f64 re re))) (sqrt.f64 #s(literal -1/4 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (.f64 (sqrt.f64 #s(literal -1/4 binary64)) #s(literal 1/2 binary64)))))
(* (pow im 2) (+ (* -1/8 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 6) (pow (sqrt -1/4) 3))) (sqrt (pow re 7)))) (+ (* 1/4 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (+ (* 1/4 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 4) (sqrt -1/4))) (sqrt (pow re 3)))) (* 1/2 (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4)))))))
(.f64 (.f64 im im) (+.f64 (+.f64 (.f64 #s(literal 1/4 binary64) (+.f64 (/.f64 (sqrt.f64 re) (.f64 im (.f64 im (sqrt.f64 #s(literal -1/4 binary64))))) (.f64 (/.f64 (+.f64 (.f64 re #s(literal 4 binary64)) (/.f64 (.f64 #s(literal 1/4 binary64) re) #s(literal 1/4 binary64))) (pow.f64 im #s(literal 4 binary64))) (/.f64 (sqrt.f64 (.f64 re (.f64 re re))) (sqrt.f64 #s(literal -1/4 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (.f64 (sqrt.f64 #s(literal -1/4 binary64)) #s(literal 1/2 binary64)))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (+.f64 (.f64 re #s(literal 4 binary64)) (/.f64 (.f64 #s(literal 1/4 binary64) re) #s(literal 1/4 binary64))) (.f64 (pow.f64 im #s(literal 6 binary64)) (.f64 #s(literal -1/4 binary64) (sqrt.f64 #s(literal -1/4 binary64))))) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))))))
(* (* (pow im 2) (sqrt -1/4)) (sqrt (/ 1 (pow re 3))))
(.f64 (.f64 im im) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (*.f64 re re)))) (sqrt.f64 #s(literal -1/4 binary64))))
(/ (+ (* 1/2 (* (sqrt (pow re 5)) (/ 1 (sqrt -1/4)))) (* (* (pow im 2) (sqrt -1/4)) (sqrt re))) (pow re 2))
(/.f64 (+.f64 (.f64 (.f64 im im) (.f64 (sqrt.f64 #s(literal -1/4 binary64)) (sqrt.f64 re))) (.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (pow.f64 re #s(literal 5 binary64))) (sqrt.f64 #s(literal -1/4 binary64))))) (*.f64 re re))
(/ (+ (* (* (pow im 2) (sqrt -1/4)) (sqrt re)) (* (pow re 3) (+ (* 1/2 (* (sqrt (/ 1 re)) (/ 1 (sqrt -1/4)))) (* 2 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt (pow re 3))))))) (pow re 2))
(/.f64 (+.f64 (.f64 (.f64 im im) (.f64 (sqrt.f64 #s(literal -1/4 binary64)) (sqrt.f64 re))) (.f64 (.f64 re (.f64 re re)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/4 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 (sqrt.f64 (.f64 re (.f64 re re))) (.f64 im (.f64 im (sqrt.f64 #s(literal -1/4 binary64))))))))) (*.f64 re re))
(/ (+ (* (* (pow im 2) (sqrt -1/4)) (sqrt re)) (* (pow re 3) (+ (* 1/2 (* (sqrt (/ 1 re)) (/ 1 (sqrt -1/4)))) (* (pow re 2) (+ (* -1/8 (* (/ 1 (* (pow im 2) (pow (sqrt -1/4) 3))) (sqrt (/ 1 re)))) (* 2 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt (/ 1 re))))))))) (pow re 2))
(/.f64 (+.f64 (.f64 (.f64 im im) (.f64 (sqrt.f64 #s(literal -1/4 binary64)) (sqrt.f64 re))) (.f64 (.f64 re (.f64 re re)) (+.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1/4 binary64)))) (.f64 (.f64 re re) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (+.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 im im)) (.f64 #s(literal -1/4 binary64) (sqrt.f64 #s(literal -1/4 binary64))))) (.f64 #s(literal 2 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (.f64 im im)) (sqrt.f64 #s(literal -1/4 binary64)))))))))) (.f64 re re))
(* 2 (sqrt re))
(*.f64 #s(literal 2 binary64) (sqrt.f64 re))
(* re (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 2 (sqrt (/ 1 re)))))
(.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (.f64 im im) #s(literal 1/4 binary64))) (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 2 (sqrt (/ 1 re))))))
(.f64 re (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (.f64 im im) #s(literal 1/4 binary64))) (+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/16 binary64))))))
(* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/64 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 2 (sqrt (/ 1 re)))))))
(.f64 re (+.f64 (.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64))))) #s(literal -5/64 binary64)) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (.f64 (.f64 im im) #s(literal 1/4 binary64))) (*.f64 #s(literal 2 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))))
(* -1 (* (sqrt re) (* (sqrt -4) (sqrt -1))))
(.f64 (-.f64 #s(literal 0 binary64) (sqrt.f64 re)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -4 binary64))))
(* -1 (* re (+ (* 1/2 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1))))))
(.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -4 binary64)))) (.f64 (.f64 (.f64 #s(literal 1/2 binary64) (*.f64 im im)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -4 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/2 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt re))) (* 1/8 (* (/ (* (pow im 4) (sqrt -1)) (sqrt -4)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1))))))
(.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -4 binary64)))) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 im im) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 re))) (sqrt.f64 #s(literal -4 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -4 binary64)))) #s(literal 1/8 binary64)))) (.f64 re (.f64 re re)))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/2 (* (/ (* (pow im 2) (sqrt -1)) (sqrt -4)) (sqrt re))) (+ (* 1/8 (* (/ (* (pow im 4) (sqrt -1)) (sqrt -4)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt -4) 3)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -4) (sqrt -1))))))
(.f64 (-.f64 #s(literal 0 binary64) re) (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -4 binary64)))) (/.f64 (+.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (.f64 im im) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 re))) (sqrt.f64 #s(literal -4 binary64)))) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (+.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) (/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -4 binary64)))) (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal -4 binary64) (sqrt.f64 #s(literal -4 binary64)))))))) (.f64 re (.f64 re re)))))
(* 2 (sqrt re))
(*.f64 #s(literal 2 binary64) (sqrt.f64 re))
(+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* 2 (sqrt re)))
(+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 re)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (.f64 #s(literal 1/4 binary64) (.f64 im im))))
(+ (* 2 (sqrt re)) (* (pow im 2) (+ (* -5/64 (* (pow im 2) (sqrt (/ 1 (pow re 7))))) (* 1/4 (sqrt (/ 1 (pow re 3)))))))
(+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 re)) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) (.f64 #s(literal -5/64 binary64) (*.f64 im im))))))
(+ (* 2 (sqrt re)) (* (pow im 2) (+ (* 1/4 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -5/64 (sqrt (/ 1 (pow re 7)))) (* 5/512 (* (pow im 2) (sqrt (/ 1 (pow re 11))))))))))
(+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 re)) (.f64 (.f64 im im) (+.f64 (.f64 #s(literal 1/4 binary64) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))) (.f64 (.f64 im im) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 7 binary64)))) #s(literal -5/64 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 11 binary64)))) (.f64 (.f64 im im) #s(literal 5/512 binary64))))))))
(* (* (pow im 2) (sqrt -1/4)) (sqrt (/ 1 (pow re 3))))
(.f64 (.f64 im im) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (*.f64 re re)))) (sqrt.f64 #s(literal -1/4 binary64))))
(* (pow im 2) (+ (* 1/2 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4))))
(.f64 (.f64 im im) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (sqrt.f64 #s(literal -1/4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) (.f64 im (.f64 im (sqrt.f64 #s(literal -1/4 binary64))))))))
(* (pow im 2) (+ (* 1/2 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (+ (* 1/2 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 4) (sqrt -1/4))) (sqrt (pow re 3)))) (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4)))))
(.f64 (.f64 im im) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (sqrt.f64 re) (.f64 im (.f64 im (sqrt.f64 #s(literal -1/4 binary64))))) (.f64 (/.f64 (+.f64 (.f64 re #s(literal 4 binary64)) (/.f64 (.f64 #s(literal 1/4 binary64) re) #s(literal 1/4 binary64))) (pow.f64 im #s(literal 4 binary64))) (/.f64 (sqrt.f64 (.f64 re (.f64 re re))) (sqrt.f64 #s(literal -1/4 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (*.f64 re re)))) (sqrt.f64 #s(literal -1/4 binary64)))))
(* (pow im 2) (+ (* -1/4 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 6) (pow (sqrt -1/4) 3))) (sqrt (pow re 7)))) (+ (* 1/2 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (+ (* 1/2 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 4) (sqrt -1/4))) (sqrt (pow re 3)))) (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4))))))
(.f64 (.f64 im im) (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (sqrt.f64 re) (.f64 im (.f64 im (sqrt.f64 #s(literal -1/4 binary64))))) (.f64 (/.f64 (+.f64 (.f64 re #s(literal 4 binary64)) (/.f64 (.f64 #s(literal 1/4 binary64) re) #s(literal 1/4 binary64))) (pow.f64 im #s(literal 4 binary64))) (/.f64 (sqrt.f64 (.f64 re (.f64 re re))) (sqrt.f64 #s(literal -1/4 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (sqrt.f64 #s(literal -1/4 binary64)))) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (+.f64 (.f64 re #s(literal 4 binary64)) (/.f64 (.f64 #s(literal 1/4 binary64) re) #s(literal 1/4 binary64))) (.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal -1/4 binary64) (sqrt.f64 #s(literal -1/4 binary64))))) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))))))
(* (* (pow im 2) (sqrt -1/4)) (sqrt (/ 1 (pow re 3))))
(.f64 (.f64 im im) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (*.f64 re re)))) (sqrt.f64 #s(literal -1/4 binary64))))
(* (pow im 2) (+ (* 1/2 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4))))
(.f64 (.f64 im im) (+.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (sqrt.f64 #s(literal -1/4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (sqrt.f64 re) (.f64 im (.f64 im (sqrt.f64 #s(literal -1/4 binary64))))))))
(* (pow im 2) (+ (* 1/2 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (+ (* 1/2 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 4) (sqrt -1/4))) (sqrt (pow re 3)))) (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4)))))
(.f64 (.f64 im im) (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (sqrt.f64 re) (.f64 im (.f64 im (sqrt.f64 #s(literal -1/4 binary64))))) (.f64 (/.f64 (+.f64 (.f64 re #s(literal 4 binary64)) (/.f64 (.f64 #s(literal 1/4 binary64) re) #s(literal 1/4 binary64))) (pow.f64 im #s(literal 4 binary64))) (/.f64 (sqrt.f64 (.f64 re (.f64 re re))) (sqrt.f64 #s(literal -1/4 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (*.f64 re re)))) (sqrt.f64 #s(literal -1/4 binary64)))))
(* (pow im 2) (+ (* -1/4 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 6) (pow (sqrt -1/4) 3))) (sqrt (pow re 7)))) (+ (* 1/2 (* (/ 1 (* (pow im 2) (sqrt -1/4))) (sqrt re))) (+ (* 1/2 (* (/ (- (* 4 re) (* 1/4 (/ re (pow (sqrt -1/4) 2)))) (* (pow im 4) (sqrt -1/4))) (sqrt (pow re 3)))) (* (sqrt (/ 1 (pow re 3))) (sqrt -1/4))))))
(.f64 (.f64 im im) (+.f64 (+.f64 (.f64 #s(literal 1/2 binary64) (+.f64 (/.f64 (sqrt.f64 re) (.f64 im (.f64 im (sqrt.f64 #s(literal -1/4 binary64))))) (.f64 (/.f64 (+.f64 (.f64 re #s(literal 4 binary64)) (/.f64 (.f64 #s(literal 1/4 binary64) re) #s(literal 1/4 binary64))) (pow.f64 im #s(literal 4 binary64))) (/.f64 (sqrt.f64 (.f64 re (.f64 re re))) (sqrt.f64 #s(literal -1/4 binary64)))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))) (sqrt.f64 #s(literal -1/4 binary64)))) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (+.f64 (.f64 re #s(literal 4 binary64)) (/.f64 (.f64 #s(literal 1/4 binary64) re) #s(literal 1/4 binary64))) (.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal -1/4 binary64) (sqrt.f64 #s(literal -1/4 binary64))))) (sqrt.f64 (pow.f64 re #s(literal 7 binary64)))))))
(* -1/4 (/ (pow im 4) (pow re 3)))
(/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (.f64 re (*.f64 re re)))
(/ (+ (* -1/4 (pow im 4)) (* (pow im 2) (pow re 2))) (pow re 3))
(/.f64 (+.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (.f64 re (.f64 im (.f64 im re)))) (.f64 re (.f64 re re)))
(/ (+ (* -1/4 (pow im 4)) (* (pow re 2) (+ (* 4 (pow re 2)) (pow im 2)))) (pow re 3))
(/.f64 (+.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (.f64 re #s(literal 4 binary64)))))) (.f64 re (.f64 re re)))
(/ (+ (* -1/4 (pow im 4)) (* (pow re 2) (+ (* 4 (pow re 2)) (pow im 2)))) (pow re 3))
(/.f64 (+.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (.f64 (.f64 re re) (+.f64 (.f64 im im) (.f64 re (.f64 re #s(literal 4 binary64)))))) (.f64 re (.f64 re re)))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(* re (+ 4 (/ (pow im 2) (pow re 2))))
(.f64 re (+.f64 (/.f64 (.f64 im im) (*.f64 re re)) #s(literal 4 binary64)))
(* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))
(.f64 re (+.f64 (/.f64 (.f64 im im) (.f64 re re)) (+.f64 (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal 4 binary64))))
(* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))
(.f64 re (+.f64 (/.f64 (.f64 im im) (.f64 re re)) (+.f64 (/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (pow.f64 re #s(literal 4 binary64))) #s(literal 4 binary64))))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(* -1 (* re (- (* -1 (/ (pow im 2) (pow re 2))) 4)))
(.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (/.f64 (.f64 im im) (-.f64 #s(literal 0 binary64) (*.f64 re re))) #s(literal -4 binary64)))
(* -1 (* re (- (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/4 (/ (pow im 4) (pow re 4)))) 4)))
(.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (-.f64 (/.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))) #s(literal -4 binary64)))
(* -1 (* re (- (+ (* -1 (/ (pow im 2) (pow re 2))) (* 1/4 (/ (pow im 4) (pow re 4)))) 4)))
(.f64 (-.f64 #s(literal 0 binary64) re) (+.f64 (-.f64 (/.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))) #s(literal -4 binary64)))
(* 4 re)
(*.f64 re #s(literal 4 binary64))
(+ (* 4 re) (/ (pow im 2) re))
(+.f64 (/.f64 (.f64 im im) re) (.f64 re #s(literal 4 binary64)))
(+ (* 4 re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))))
(+.f64 (.f64 re #s(literal 4 binary64)) (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 im im)) (.f64 re (*.f64 re re))))))
(+ (* 4 re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))))
(+.f64 (.f64 re #s(literal 4 binary64)) (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1 binary64) re) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 im im)) (.f64 re (*.f64 re re))))))
(* -1/4 (/ (pow im 4) (pow re 3)))
(/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (.f64 re (*.f64 re re)))
(* (pow im 4) (- (/ 1 (* (pow im 2) re)) (* 1/4 (/ 1 (pow re 3)))))
(.f64 (pow.f64 im #s(literal 4 binary64)) (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) (.f64 im im)) re) (/.f64 #s(literal -1/4 binary64) (.f64 re (.f64 re re)))))
(* (pow im 4) (- (+ (* 4 (/ re (pow im 4))) (/ 1 (* (pow im 2) re))) (* 1/4 (/ 1 (pow re 3)))))
(.f64 (pow.f64 im #s(literal 4 binary64)) (+.f64 (/.f64 (.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) (.f64 im im)) re) (/.f64 #s(literal -1/4 binary64) (.f64 re (*.f64 re re))))))
(* (pow im 4) (- (+ (* 4 (/ re (pow im 4))) (/ 1 (* (pow im 2) re))) (* 1/4 (/ 1 (pow re 3)))))
(.f64 (pow.f64 im #s(literal 4 binary64)) (+.f64 (/.f64 (.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) (.f64 im im)) re) (/.f64 #s(literal -1/4 binary64) (.f64 re (*.f64 re re))))))
(* -1/4 (/ (pow im 4) (pow re 3)))
(/.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1/4 binary64)) (.f64 re (*.f64 re re)))
(* (pow im 4) (- (/ 1 (* (pow im 2) re)) (* 1/4 (/ 1 (pow re 3)))))
(.f64 (pow.f64 im #s(literal 4 binary64)) (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) (.f64 im im)) re) (/.f64 #s(literal -1/4 binary64) (.f64 re (.f64 re re)))))
(* (pow im 4) (- (+ (* 4 (/ re (pow im 4))) (/ 1 (* (pow im 2) re))) (* 1/4 (/ 1 (pow re 3)))))
(.f64 (pow.f64 im #s(literal 4 binary64)) (+.f64 (/.f64 (.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) (.f64 im im)) re) (/.f64 #s(literal -1/4 binary64) (.f64 re (*.f64 re re))))))
(* (pow im 4) (- (+ (* 4 (/ re (pow im 4))) (/ 1 (* (pow im 2) re))) (* 1/4 (/ 1 (pow re 3)))))
(.f64 (pow.f64 im #s(literal 4 binary64)) (+.f64 (/.f64 (.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (+.f64 (/.f64 (/.f64 #s(literal 1 binary64) (.f64 im im)) re) (/.f64 #s(literal -1/4 binary64) (.f64 re (*.f64 re re))))))
(* 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))
(log im)
(log.f64 im)
(+ (log im) (/ re im))
(+.f64 (/.f64 re im) (log.f64 im))
(+ (log im) (* re (+ (* -1/6 (/ (pow re 2) (pow im 3))) (/ 1 im))))
(+.f64 (.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (.f64 #s(literal -1/6 binary64) (.f64 re re)) (.f64 im (*.f64 im im))))) (log.f64 im))
(+ (log im) (* re (+ (* (pow re 2) (- (* 3/40 (/ (pow re 2) (pow im 5))) (* 1/6 (/ 1 (pow im 3))))) (/ 1 im))))
(+.f64 (.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (.f64 (.f64 re re) (+.f64 (/.f64 (.f64 #s(literal 3/40 binary64) (.f64 re re)) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal -1/6 binary64) (.f64 im (*.f64 im im))))))) (log.f64 im))
(+ (log 2) (* -1 (log (/ 1 re))))
(+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 re))
(+ (log 2) (+ (* -1 (log (/ 1 re))) (* 1/4 (/ (pow im 2) (pow re 2)))))
(+.f64 (log.f64 #s(literal 2 binary64)) (+.f64 (log.f64 re) (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 im im)) (*.f64 re re))))
(+ (log 2) (+ (* -1 (log (/ 1 re))) (+ (* 1/24 (/ (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))) (pow re 4))) (* 1/4 (/ (pow im 2) (pow re 2))))))
(+.f64 (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 re)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 im im)) (.f64 re re)) (/.f64 (.f64 #s(literal 1/24 binary64) (*.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64))) (pow.f64 re #s(literal 4 binary64)))))
(+ (log 2) (+ (* -1 (log (/ 1 re))) (+ (* 1/720 (/ (+ (* 15/4 (pow im 6)) (+ (* 45/4 (pow im 6)) (* 45/2 (pow im 6)))) (pow re 6))) (+ (* 1/24 (/ (+ (* -3/2 (pow im 4)) (* -3/4 (pow im 4))) (pow re 4))) (* 1/4 (/ (pow im 2) (pow re 2)))))))
(+.f64 (+.f64 (+.f64 (log.f64 #s(literal 2 binary64)) (log.f64 re)) (+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 im im)) (.f64 re re)) (/.f64 (.f64 #s(literal 1/24 binary64) (.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -9/4 binary64))) (pow.f64 re #s(literal 4 binary64))))) (/.f64 (.f64 #s(literal 1/720 binary64) (*.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 75/2 binary64))) (pow.f64 re #s(literal 6 binary64))))
(+ (log (* 1/2 (pow im 2))) (log (/ -1 re)))
(+.f64 (log.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re)))
(+ (log (* 1/2 (pow im 2))) (+ (log (/ -1 re)) (* -1/4 (/ (pow im 2) (pow re 2)))))
(+.f64 (log.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im))) (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 im im)) (*.f64 re re))))
(+ (log (* 1/2 (pow im 2))) (+ (log (/ -1 re)) (+ (* -1/4 (/ (pow im 2) (pow re 2))) (* 1/24 (/ (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))) (pow re 4))))))
(+.f64 (+.f64 (log.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im))) (log.f64 (/.f64 #s(literal -1 binary64) re))) (+.f64 (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 im im)) (.f64 re re)) (/.f64 (.f64 (*.f64 #s(literal 1/24 binary64) (pow.f64 im #s(literal 4 binary64))) #s(literal 9/4 binary64)) (pow.f64 re #s(literal 4 binary64)))))
(+ (log (* 1/2 (pow im 2))) (+ (log (/ -1 re)) (+ (* -1/4 (/ (pow im 2) (pow re 2))) (+ (* 1/720 (/ (+ (* -720 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* -15/4 (pow im 6)) (* 45/2 (pow im 6)))) (pow re 6))) (* 1/24 (/ (+ (* -3/4 (pow im 4)) (* 3 (pow im 4))) (pow re 4)))))))
(+.f64 (log.f64 (.f64 #s(literal 1/2 binary64) (.f64 im im))) (+.f64 (+.f64 (+.f64 (log.f64 (/.f64 #s(literal -1 binary64) re)) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 im im)) (.f64 re re))) (/.f64 (.f64 (.f64 #s(literal 1/24 binary64) (pow.f64 im #s(literal 4 binary64))) #s(literal 9/4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (.f64 #s(literal 1/720 binary64) (+.f64 (/.f64 (.f64 (.f64 #s(literal -720 binary64) (pow.f64 im #s(literal 8 binary64))) #s(literal 5/64 binary64)) (.f64 im im)) (.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 75/4 binary64)))) (pow.f64 re #s(literal 6 binary64)))))
(log (* 2 re))
(log.f64 (*.f64 re #s(literal 2 binary64)))
(+ (log (* 2 re)) (* 1/4 (/ (pow im 2) (pow re 2))))
(+.f64 (/.f64 (.f64 #s(literal 1/4 binary64) (.f64 im im)) (.f64 re re)) (log.f64 (.f64 re #s(literal 2 binary64))))
(+ (log (* 2 re)) (* (pow im 2) (+ (* -3/32 (/ (pow im 2) (pow re 4))) (* 1/4 (/ 1 (pow re 2))))))
(+.f64 (log.f64 (.f64 re #s(literal 2 binary64))) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal -3/32 binary64) (.f64 im im)) (pow.f64 re #s(literal 4 binary64))) (/.f64 #s(literal 1/4 binary64) (.f64 re re)))))
(+ (log (* 2 re)) (* (pow im 2) (+ (* (pow im 2) (- (* 5/96 (/ (pow im 2) (pow re 6))) (* 3/32 (/ 1 (pow re 4))))) (* 1/4 (/ 1 (pow re 2))))))
(+.f64 (log.f64 (.f64 re #s(literal 2 binary64))) (.f64 (.f64 im im) (+.f64 (/.f64 #s(literal 1/4 binary64) (.f64 re re)) (.f64 (.f64 im im) (+.f64 (/.f64 (.f64 #s(literal 5/96 binary64) (.f64 im im)) (pow.f64 re #s(literal 6 binary64))) (/.f64 #s(literal -3/32 binary64) (pow.f64 re #s(literal 4 binary64))))))))
(* -1 (log (/ 1 im)))
(log.f64 im)
(+ (* -1 (log (/ 1 im))) (/ re im))
(+.f64 (/.f64 re im) (log.f64 im))
(+ (* -1 (log (/ 1 im))) (+ (* 1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow im 2))) (/ re im)))
(+.f64 (log.f64 im) (+.f64 (/.f64 re im) (/.f64 #s(literal 0 binary64) (*.f64 im im))))
(+ (* -1 (log (/ 1 im))) (+ (* 1/6 (/ (+ (* -3 (pow re 3)) (* 2 (pow re 3))) (pow im 3))) (+ (* 1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) (pow im 2))) (/ re im))))
(+.f64 (+.f64 (/.f64 re im) (/.f64 #s(literal 0 binary64) (.f64 im im))) (+.f64 (/.f64 (.f64 #s(literal 1/6 binary64) (.f64 re (-.f64 #s(literal 0 binary64) (.f64 re re)))) (.f64 im (.f64 im im))) (log.f64 im)))
(* -1 (log (/ -1 im)))
(-.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im)))
(+ (* -1 (log (/ -1 im))) (* -1 (/ re im)))
(-.f64 (-.f64 #s(literal 0 binary64) (/.f64 re im)) (log.f64 (/.f64 #s(literal -1 binary64) im)))
(+ (* -1 (log (/ -1 im))) (* -1 (/ (+ re (* -1/2 (/ (+ (* -1 (pow re 2)) (pow re 2)) im))) im)))
(-.f64 (/.f64 (+.f64 re (/.f64 #s(literal 0 binary64) im)) (-.f64 #s(literal 0 binary64) im)) (log.f64 (/.f64 #s(literal -1 binary64) im)))
(+ (* -1 (log (/ -1 im))) (* -1 (/ (+ re (* -1 (/ (+ (* -1/6 (/ (+ (* -3 (pow re 3)) (* 2 (pow re 3))) im)) (* 1/2 (+ (* -1 (pow re 2)) (pow re 2)))) im))) im)))
(-.f64 (-.f64 #s(literal 0 binary64) (log.f64 (/.f64 #s(literal -1 binary64) im))) (/.f64 (-.f64 re (/.f64 (+.f64 (.f64 #s(literal -1/6 binary64) (/.f64 (.f64 re (-.f64 #s(literal 0 binary64) (*.f64 re re))) im)) #s(literal 0 binary64)) im)) im))
(/ 1 im)
(/.f64 #s(literal 1 binary64) im)
(/ 1 im)
(/.f64 #s(literal 1 binary64) im)
(/ 1 im)
(/.f64 #s(literal 1 binary64) im)
(/ 1 im)
(/.f64 #s(literal 1 binary64) im)
(/ 1 im)
(/.f64 #s(literal 1 binary64) im)
(/ 1 im)
(/.f64 #s(literal 1 binary64) im)
(/ 1 im)
(/.f64 #s(literal 1 binary64) im)
(/ 1 im)
(/.f64 #s(literal 1 binary64) im)
(/ 1 im)
(/.f64 #s(literal 1 binary64) im)
(/ 1 im)
(/.f64 #s(literal 1 binary64) im)
(/ 1 im)
(/.f64 #s(literal 1 binary64) im)
(/ 1 im)
(/.f64 #s(literal 1 binary64) im)
(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)

eval125.0ms (1.3%)

Compiler: Compiled 14428 to 2220 computations (84.6% saved)

prune111.0ms (1.2%)

Pruning

23 alts after pruning (17 fresh and 6 done)

	Pruned	Kept	Total
New	814	7	821
Fresh	3	10	13
Picked	3	2	5
Done	1	4	5
Total	821	23	844

Accuracy

99.9%

Counts

844 → 23

Alt Table

Click to see full alt table

Status	Accuracy	Program
	28.0%	(pow.f64 (/.f64 #s(literal 1 binary64) re) #s(literal -1/2 binary64))
	26.8%	(/.f64 (*.f64 im #s(literal 1/2 binary64)) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)))
	27.0%	(/.f64 (.f64 #s(literal 1/2 binary64) im) (sqrt.f64 (/.f64 re (+.f64 #s(literal -1 binary64) (.f64 im (/.f64 #s(literal 1/4 binary64) (*.f64 re (/.f64 re im))))))))
✓	28.0%	(/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal -1/2 binary64)))
	26.5%	(/.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal 1/2 binary64)) im))
	26.8%	(.f64 (pow.f64 (neg.f64 re) #s(literal -1/2 binary64)) (.f64 #s(literal 1/2 binary64) im))
	72.2%	(.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (+.f64 re (hypot.f64 re im)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
✓	77.7%	(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 re (hypot.f64 re im)))) (sqrt.f64 #s(literal 2 binary64)))
	72.7%	(.f64 (.f64 #s(literal 1/2 binary64) (exp.f64 (*.f64 #s(literal 1/2 binary64) (log.f64 (+.f64 re (hypot.f64 re im)))))) (sqrt.f64 #s(literal 2 binary64)))
	26.4%	(*.f64 (sqrt.f64 (+.f64 (/.f64 re #s(literal 1/4 binary64)) (/.f64 im (/.f64 (/.f64 re (+.f64 #s(literal 1 binary64) (/.f64 im (/.f64 (/.f64 re (/.f64 #s(literal -1/4 binary64) re)) im)))) im)))) #s(literal 1/2 binary64))
	26.8%	(*.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 (neg.f64 re) #s(literal -1/2 binary64)) (/.f64 #s(literal 1 binary64) im)))
	17.6%	(.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal 0 binary64) (/.f64 #s(literal -1 binary64) im)) (*.f64 (/.f64 #s(literal -1 binary64) im) (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal -1/2 binary64)))) (/.f64 (/.f64 #s(literal 1 binary64) im) im)))
	16.1%	(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (/.f64 im re) (/.f64 #s(literal -1 binary64) im))))
	16.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 im re) im))))
	25.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (/.f64 (.f64 im im) re) (*.f64 re #s(literal 4 binary64)))))
	49.9%	(.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))))))
	38.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 (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 re re)) (.f64 im (.f64 im im))))))))))
	50.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))))
✓	42.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))
✓	78.3%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 re (hypot.f64 re im)))))
	52.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 im re))))
✓	72.7%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (exp.f64 (log.f64 (+.f64 re (hypot.f64 re im)))))))
✓	28.0%	(sqrt.f64 re)

Compiler

Compiled 924 to 458 computations (50.4% saved)

regimes98.0ms (1.1%)

Counts

47 → 2

Calls

Call 1

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

Outputs
(.f64 (pow.f64 (neg.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 re (hypot.f64 re im)))))

Calls

7 calls:

14.0ms	re
14.0ms	im
14.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))))
13.0ms	(+.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)
13.0ms	(.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))

Results

Accuracy	Segments	Branch
90.9%	2	`re`
78.3%	1	`im`
87.2%	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))))`
87.2%	2	`(sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`
87.3%	2	`(.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))`
87.3%	2	`(+.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`
78.3%	1	`(*.f64 im im)`

Compiler

Compiled 69 to 45 computations (34.8% saved)

regimes33.0ms (0.4%)

Counts

34 → 3

Calls

Call 1

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

Outputs
(.f64 (pow.f64 (neg.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))))
(sqrt.f64 re)

Calls

3 calls:

11.0ms	im
11.0ms	re
9.0ms	(*.f64 im im)

Results

Accuracy	Segments	Branch
60.3%	3	`im`
58.5%	2	`(*.f64 im im)`
80.0%	3	`re`

Compiler

Compiled 11 to 7 computations (36.4% saved)

regimes3.0ms (0%)

Counts

6 → 2

Calls

Call 1

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

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

Calls

1 calls:

3.0ms

re

Results

Accuracy	Segments	Branch
63.6%	2	`re`

Compiler

Compiled 3 to 2 computations (33.3% saved)

regimes5.0ms (0.1%)

Accuracy

Total -0.1b remaining (-0.2%)

Threshold costs -0.1b (-0.2%)

Counts

4 → 1

Calls

Call 1

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

Outputs
(sqrt.f64 re)

Calls

2 calls:

3.0ms	im
2.0ms	re

Results

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

Compiler

Compiled 6 to 4 computations (33.3% saved)

bsearch27.0ms (0.3%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
24.0ms	-1.0150576192586871e-62	-2.406060008460869e-67

Results

8.0ms	24×	2	valid
7.0ms	81×	0	valid
4.0ms	23×	1	valid

Compiler

Compiled 214 to 168 computations (21.5% saved)

Precisions

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

ival-mult: 5.0ms (39.9% of total)

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

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

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

const: 0.0ms (0% of total)

bsearch48.0ms (0.5%)

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
18.0ms	1.0180386593084244e-26	7.901032026823208e-19
26.0ms	-1.0150576192586871e-62	-2.406060008460869e-67

Results

21.0ms	223×	0	valid
9.0ms	28×	2	valid
4.0ms	21×	1	valid

Compiler

Compiled 342 to 277 computations (19% saved)

Precisions

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

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

ival-sqrt: 6.0ms (27.3% of total)

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

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

const: 1.0ms (4.5% of total)

bsearch21.0ms (0.2%)

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
19.0ms	1.0180386593084244e-26	7.901032026823208e-19

Results

13.0ms

144×

valid

Compiler

Compiled 148 to 124 computations (16.2% saved)

Precisions

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

ival-mult: 4.0ms (52.5% of total)

ival-sqrt: 2.0ms (26.2% of total)

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

const: 0.0ms (0% of total)

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

simplify10.0ms (0.1%)

Algorithm

1×	egg-herbie

Rules

18×	`*-commutative_binary64`
6×	`+-commutative_binary64`
2×	`sub-neg_binary64`
2×	`neg-sub0_binary64`
2×	`neg-mul-1_binary64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	34	62
1	48	62
2	50	62
3	51	62

Stop Event

1×

saturated

Calls

Call 1

Inputs
(if (<=.f64 re #s(literal -5928554968950589/237142198758023568227473377297792835283496928595231875152809132048206089502588928 binary64)) (.f64 (pow.f64 (neg.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 re (hypot.f64 re im))))))
(if (<=.f64 re #s(literal -4168515212543383/926336713898529563388567880069503262826159877325124512315660672063305037119488 binary64)) (.f64 (pow.f64 (neg.f64 re) #s(literal -1/2 binary64)) (.f64 #s(literal 1/2 binary64) im)) (if (<=.f64 re #s(literal 2395587863123407/10889035741470030830827987437816582766592 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 im re)))) (sqrt.f64 re)))
(if (<=.f64 re #s(literal 571152654438831/10384593717069655257060992658440192 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64)))) (sqrt.f64 re))
(sqrt.f64 re)

Outputs
(if (<=.f64 re #s(literal -5928554968950589/237142198758023568227473377297792835283496928595231875152809132048206089502588928 binary64)) (.f64 (pow.f64 (neg.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 re (hypot.f64 re im))))))
(if (<=.f64 re #s(literal -5928554968950589/237142198758023568227473377297792835283496928595231875152809132048206089502588928 binary64)) (.f64 (pow.f64 (-.f64 #s(literal 0 binary64) 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 re (hypot.f64 re im))))))
(if (<=.f64 re #s(literal -4168515212543383/926336713898529563388567880069503262826159877325124512315660672063305037119488 binary64)) (.f64 (pow.f64 (neg.f64 re) #s(literal -1/2 binary64)) (.f64 #s(literal 1/2 binary64) im)) (if (<=.f64 re #s(literal 2395587863123407/10889035741470030830827987437816582766592 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 im re)))) (sqrt.f64 re)))
(if (<=.f64 re #s(literal -4168515212543383/926336713898529563388567880069503262826159877325124512315660672063305037119488 binary64)) (.f64 (pow.f64 (-.f64 #s(literal 0 binary64) re) #s(literal -1/2 binary64)) (.f64 #s(literal 1/2 binary64) im)) (if (<=.f64 re #s(literal 2395587863123407/10889035741470030830827987437816582766592 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 re im)))) (sqrt.f64 re)))
(if (<=.f64 re #s(literal 571152654438831/10384593717069655257060992658440192 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64)))) (sqrt.f64 re))
(sqrt.f64 re)

soundness1.4s (14.6%)

Rules

7220×	`-lowering-.f32`
7220×	`-lowering-.f64`
3550×	`-lowering-.f32`
3550×	`-lowering-.f64`
3232×	`-lowering-.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	12	10
1	26	10
2	35	10
3	37	10
0	37	10
0	41	191
1	156	183
2	769	182
3	5719	179
0	8121	179
0	35	138
1	119	129
2	519	121
3	2516	119
0	8347	119
0	37	136
1	132	131
2	484	130
3	2510	124
0	8487	124
0	500	5174
1	1776	4554
2	6909	4474
0	8988	4474

Stop Event

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

Compiler

Compiled 300 to 216 computations (28% saved)

preprocess77.0ms (0.8%)

Compiler: Compiled 298 to 172 computations (42.3% saved)

analyze174.0ms (1.9%)

sample1.7s (17.7%)

preprocess59.0ms (0.6%)

explain242.0ms (2.6%)

eval0.0ms (0%)

prune1.0ms (0%)

simplify7.0ms (0.1%)

localize308.0ms (3.3%)

series25.0ms (0.3%)

rewrite39.0ms (0.4%)

simplify317.0ms (3.4%)

eval32.0ms (0.3%)

prune51.0ms (0.5%)

simplify188.0ms (2%)

localize338.0ms (3.6%)

series52.0ms (0.6%)

rewrite403.0ms (4.3%)

simplify475.0ms (5.1%)

eval247.0ms (2.6%)

prune246.0ms (2.6%)

simplify180.0ms (1.9%)

localize228.0ms (2.4%)

series28.0ms (0.3%)

rewrite228.0ms (2.4%)

simplify358.0ms (3.8%)

eval401.0ms (4.3%)

prune148.0ms (1.6%)

simplify165.0ms (1.8%)

localize257.0ms (2.7%)

series31.0ms (0.3%)

rewrite216.0ms (2.3%)

simplify341.0ms (3.6%)

eval125.0ms (1.3%)

prune111.0ms (1.2%)

regimes98.0ms (1.1%)

regimes33.0ms (0.4%)

regimes3.0ms (0%)

regimes5.0ms (0.1%)

bsearch27.0ms (0.3%)

bsearch48.0ms (0.5%)

bsearch21.0ms (0.2%)

simplify10.0ms (0.1%)

soundness1.4s (14.6%)

preprocess77.0ms (0.8%)

end0.0ms (0%)

Profiling