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

start0.0ms (0.0%)

Memory: 0.2MiB live, 0.2MiB allocated; 0ms collecting garbage

analyze235.0ms (4.8%)

Memory

-27.5MiB live, 226.4MiB allocated; 188ms collecting garbage

Algorithm

1×

Search

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

Compiler

Compiled 19 to 12 computations (36.8% saved)

sample1.2s (24.5%)

Memory

75.9MiB live, 2 184.6MiB allocated; 279ms collecting garbage

Samples

438.0ms	6 228×	0	valid
169.0ms	476×	3	valid
148.0ms	774×	2	valid
112.0ms	778×	1	valid

Precisions

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

ival-hypot: 314.0ms (51.1% of total)

ival-mult!: 110.0ms (17.9% of total)

ival-sqrt: 105.0ms (17.1% of total)

adjust: 48.0ms (7.8% of total)

ival-sub!: 38.0ms (6.2% of total)

Bogosity

preprocess61.0ms (1.3%)

Memory

-42.5MiB live, 66.8MiB allocated; 39ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	36	90
1	127	90
2	333	90
3	760	90
4	2673	90

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

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

Symmetry

(abs im)

Compiler

Compiled 30 to 24 computations (20.0% saved)

sample0.0ms (0.0%)

Memory

0.7MiB live, 0.7MiB allocated; 0ms collecting garbage

Calls

Call 1

Inputs
1/2
2

Outputs
#s(literal 1/2 binary64)
#s(literal 2 binary64)

Samples

0.0ms

1×

valid

Compiler

Compiled 4 to 4 computations (0.0% saved)

Precisions

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

adjust: 0.0ms (0.0% of total)

series60.0ms (1.2%)

Memory

22.4MiB live, 164.8MiB allocated; 13ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	661	4820

Stop Event

1×	iter-limit

Counts

12 → 122

Calls

Call 1

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

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

Calls

6 calls:

Time	Variable	Point
5.0ms	im	inf
3.0ms	re	inf
3.0ms	im	0
3.0ms	re	0
2.0ms	re	-inf

rewrite176.0ms (3.6%)

Memory

-3.0MiB live, 372.1MiB allocated; 43ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	12	75
0	20	75
1	81	75
2	297	75
3	976	75
4	2843	75
0	4043	75

Stop Event

1×	iter-limit
1×	node-limit
1×	iter-limit

Counts

12 → 537

Calls

Call 1

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

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

eval281.0ms (5.8%)

Memory: -16.2MiB live, 288.4MiB allocated; 162ms collecting garbage
Compiler: Compiled 19 224 to 3 971 computations (79.3% saved)

prune17.0ms (0.4%)

Memory

18.8MiB live, 65.9MiB allocated; 2ms collecting garbage

Pruning

13 alts after pruning (12 fresh and 1 done)

	Pruned	Kept	Total
New	636	12	648
Fresh	0	0	0
Picked	1	0	1
Done	-1	1	0
Total	636	13	649

Accuracy

87.5%

Counts

649 → 13

Alt Table

Click to see full alt table

Status	Accuracy	Program
	43.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal 2 binary64)) re) re)))
▶	38.7%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) #s(literal 2 binary64)) re) (neg.f64 re))) (neg.f64 re))))
	27.8%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 (+.f64 (.f64 im im) (.f64 re re)) (.f64 re re)) (+.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re)))))
	43.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 (sqrt.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (sqrt.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))) re))))
✓	43.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))
	33.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 re re) (.f64 im im))) (.f64 im im))) re))))
▶	38.7%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) (neg.f64 re))) (neg.f64 re)))))
	14.9%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (pow.f64 im #s(literal 2 binary64)) re))))
	9.9%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 2 binary64)))) (pow.f64 im #s(literal 2 binary64))) re))))
▶	52.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (/.f64 re im)))))))
	51.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal 2 binary64) im))))
▶	26.9%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))))
▶	51.0%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (*.f64 im (sqrt.f64 (/.f64 #s(literal 2 binary64) im)))))

Compiler

Compiled 559 to 400 computations (28.4% saved)

sample0.0ms (0.0%)

Memory

1.4MiB live, 1.4MiB allocated; 0ms collecting garbage

Calls

Call 1

Inputs
1/2
2
-2
-4
1

Outputs
#s(literal 1/2 binary64)
#s(literal 2 binary64)
#s(literal -2 binary64)
#s(literal -4 binary64)
#s(literal 1 binary64)

Samples

0.0ms

1×

valid

Compiler

Compiled 7 to 7 computations (0.0% saved)

Precisions

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

adjust: 0.0ms (0.0% of total)

series115.0ms (2.4%)

Memory

-15.1MiB live, 552.6MiB allocated; 41ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1307	12159

Stop Event

1×	iter-limit

Counts

41 → 289

Calls

Call 1

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

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

Calls

6 calls:

Time	Variable	Point
11.0ms	im	0
8.0ms	re	inf
7.0ms	re	0
4.0ms	im	inf
4.0ms	im	-inf

rewrite255.0ms (5.2%)

Memory

30.7MiB live, 696.3MiB allocated; 65ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	48	450
0	78	415
1	316	405
2	1244	405
0	4073	405

Stop Event

1×	iter-limit
1×	node-limit
1×	iter-limit

Counts

41 → 958

Calls

Call 1

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

Outputs
#s(literal 1/2 binary64)
re
im
#s(literal 2 binary64)
#s(literal -2 binary64)
(.f64 (.f64 re #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) im))
(*.f64 (/.f64 #s(literal 1 binary64) im) re)
(*.f64 (neg.f64 re) (/.f64 #s(literal 1 binary64) (neg.f64 im)))
(*.f64 re (/.f64 #s(literal 1 binary64) im))
(/.f64 (neg.f64 (*.f64 re #s(literal 1 binary64))) (neg.f64 im))
(/.f64 (*.f64 re #s(literal 1 binary64)) im)
(/.f64 (*.f64 #s(literal 1 binary64) re) im)
(/.f64 (neg.f64 re) (neg.f64 (neg.f64 (neg.f64 im))))
(/.f64 (neg.f64 re) (neg.f64 im))
(/.f64 #s(literal 1 binary64) (/.f64 im (*.f64 re #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (neg.f64 im)) re))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 im) (neg.f64 re)))
(/.f64 #s(literal 1 binary64) (/.f64 im re))
(/.f64 re (neg.f64 (neg.f64 im)))
(/.f64 re im)
(neg.f64 (/.f64 (neg.f64 re) im))
(.f64 (.f64 #s(literal -2 binary64) (neg.f64 re)) (/.f64 #s(literal 1 binary64) (neg.f64 im)))
(.f64 (.f64 (neg.f64 re) #s(literal -2 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 im)))
(.f64 (neg.f64 (.f64 #s(literal -2 binary64) re)) (/.f64 #s(literal 1 binary64) (neg.f64 im)))
(.f64 (.f64 #s(literal -2 binary64) re) (/.f64 #s(literal 1 binary64) im))
(*.f64 (/.f64 re im) #s(literal -2 binary64))
(*.f64 #s(literal -2 binary64) (/.f64 re im))
(.f64 re (.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))
(/.f64 (neg.f64 (*.f64 #s(literal -2 binary64) (neg.f64 re))) (neg.f64 (neg.f64 im)))
(/.f64 (neg.f64 (*.f64 (neg.f64 re) #s(literal -2 binary64))) (neg.f64 (neg.f64 im)))
(/.f64 (neg.f64 (neg.f64 (*.f64 #s(literal -2 binary64) re))) (neg.f64 (neg.f64 im)))
(/.f64 (*.f64 #s(literal -2 binary64) (neg.f64 re)) (neg.f64 im))
(/.f64 (*.f64 (neg.f64 re) #s(literal -2 binary64)) (neg.f64 im))
(/.f64 (neg.f64 (*.f64 #s(literal -2 binary64) re)) (neg.f64 im))
(/.f64 (*.f64 #s(literal -2 binary64) re) im)
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 im) (*.f64 #s(literal -2 binary64) (neg.f64 re))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 im) (*.f64 (neg.f64 re) #s(literal -2 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 im) (neg.f64 (*.f64 #s(literal -2 binary64) re))))
(/.f64 #s(literal 1 binary64) (/.f64 im (*.f64 #s(literal -2 binary64) re)))
(neg.f64 (/.f64 (+.f64 re re) im))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -1 binary64)))) (-.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -1 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal -2 binary64) (.f64 (/.f64 re im) #s(literal -2 binary64)))) (*.f64 (/.f64 re im) #s(literal -2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (.f64 (/.f64 re im) #s(literal -2 binary64)))) (*.f64 (/.f64 re im) #s(literal -2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 re re) im) #s(literal 2 binary64))) #s(literal 2 binary64))
(.f64 (-.f64 (+.f64 im im) (.f64 #s(literal 2 binary64) re)) (/.f64 #s(literal 1 binary64) im))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 2 binary64))) #s(literal 2 binary64))
(/.f64 (+.f64 (.f64 (-.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -1 binary64)) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) (neg.f64 re))) (neg.f64 im))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (neg.f64 im)) (.f64 (neg.f64 re) #s(literal -2 binary64))) (neg.f64 im))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (neg.f64 im)) (neg.f64 (.f64 #s(literal -2 binary64) re))) (neg.f64 im))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (neg.f64 im)) (.f64 #s(literal 2 binary64) (neg.f64 re))) (neg.f64 im))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)) (neg.f64 im))
(/.f64 (-.f64 (.f64 (-.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -1 binary64))) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (-.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -1 binary64)) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))))
(/.f64 (-.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) (.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 #s(literal -2 binary64) #s(literal -2 binary64))) (+.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -2 binary64)))
(/.f64 (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -1 binary64))) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (-.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -1 binary64)) #s(literal 1 binary64)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))) (*.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))))))
(/.f64 (-.f64 (pow.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal -2 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) (.f64 (/.f64 re im) #s(literal -2 binary64))) (+.f64 (.f64 #s(literal -2 binary64) #s(literal -2 binary64)) (.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -2 binary64)))))
(/.f64 (neg.f64 (-.f64 (+.f64 im im) (*.f64 #s(literal 2 binary64) re))) (neg.f64 im))
(/.f64 (-.f64 (+.f64 im im) (*.f64 #s(literal 2 binary64) re)) im)
(/.f64 (-.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) (.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (/.f64 (+.f64 re re) im) (/.f64 (+.f64 re re) im))) (+.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)))
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) (.f64 (/.f64 re im) #s(literal -2 binary64))) (-.f64 (.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 re re) im) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (+.f64 (.f64 (/.f64 (+.f64 re re) im) (/.f64 (+.f64 re re) im)) (*.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)))))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) (.f64 (/.f64 re im) #s(literal -2 binary64)))) (-.f64 #s(literal 2 binary64) (*.f64 (/.f64 re im) #s(literal -2 binary64))))
(/.f64 (+.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) (.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 #s(literal 2 binary64) (*.f64 (/.f64 re im) #s(literal -2 binary64))))))
(/.f64 #s(literal 1 binary64) (/.f64 im (-.f64 (+.f64 im im) (*.f64 #s(literal 2 binary64) re))))
(neg.f64 (-.f64 #s(literal -2 binary64) (*.f64 (/.f64 re im) #s(literal -2 binary64))))
(neg.f64 (-.f64 (/.f64 (+.f64 re re) im) #s(literal 2 binary64)))
(-.f64 (-.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -1 binary64)) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (neg.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))))
(-.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -2 binary64))
(-.f64 #s(literal 2 binary64) (*.f64 (/.f64 (neg.f64 re) im) #s(literal -2 binary64)))
(-.f64 #s(literal 2 binary64) (.f64 (neg.f64 re) (.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64))))
(-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im))
(+.f64 (/.f64 (+.f64 im im) im) (*.f64 (/.f64 re im) #s(literal -2 binary64)))
(+.f64 (-.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -1 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)))
(+.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 2 binary64))
(+.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (neg.f64 (/.f64 re im))) #s(literal -2 binary64)))
(+.f64 #s(literal 2 binary64) (*.f64 (neg.f64 (/.f64 re im)) #s(literal 2 binary64)))
(+.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (neg.f64 (/.f64 re im))))
(+.f64 #s(literal 2 binary64) (*.f64 (/.f64 re im) #s(literal -2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (+.f64 im im) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im))) (.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) im))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 im) (*.f64 (/.f64 re im) #s(literal -2 binary64))) (+.f64 im im))) (+.f64 im im))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (+.f64 re re) im) im) (+.f64 im im))) (+.f64 im im))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) im)) (+.f64 im im))) (+.f64 im im))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) im) (+.f64 im im))) (+.f64 im im))
(*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im)
(*.f64 im (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)))
(/.f64 (+.f64 (.f64 (+.f64 im im) im) (.f64 im (*.f64 #s(literal -2 binary64) re))) im)
(/.f64 (+.f64 (.f64 (+.f64 im im) im) (.f64 (*.f64 #s(literal -2 binary64) re) im)) im)
(/.f64 (-.f64 (.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im)) (.f64 (+.f64 im im) (+.f64 im im))) (-.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im) (+.f64 im im)))
(/.f64 (-.f64 (.f64 (+.f64 im im) (+.f64 im im)) (.f64 (.f64 (neg.f64 im) (.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 (neg.f64 im) (.f64 (/.f64 re im) #s(literal -2 binary64))))) (+.f64 (+.f64 im im) (.f64 (neg.f64 im) (.f64 (/.f64 re im) #s(literal -2 binary64)))))
(/.f64 (-.f64 (.f64 (+.f64 im im) (+.f64 im im)) (.f64 (.f64 (/.f64 (+.f64 re re) im) im) (.f64 (/.f64 (+.f64 re re) im) im))) (+.f64 (+.f64 im im) (*.f64 (/.f64 (+.f64 re re) im) im)))
(/.f64 (-.f64 (.f64 (+.f64 im im) (+.f64 im im)) (.f64 (neg.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im)) (neg.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im)))) (+.f64 (+.f64 im im) (neg.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im) #s(literal 3 binary64)) (pow.f64 (+.f64 im im) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im)) (-.f64 (.f64 (+.f64 im im) (+.f64 im im)) (.f64 (.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) im) (+.f64 im im)))))
(/.f64 (-.f64 (pow.f64 (+.f64 im im) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 im) (.f64 (/.f64 re im) #s(literal -2 binary64))) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 im im) (+.f64 im im)) (+.f64 (.f64 (.f64 (neg.f64 im) (.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 (neg.f64 im) (.f64 (/.f64 re im) #s(literal -2 binary64)))) (.f64 (+.f64 im im) (.f64 (neg.f64 im) (*.f64 (/.f64 re im) #s(literal -2 binary64)))))))
(/.f64 (-.f64 (pow.f64 (+.f64 im im) #s(literal 3 binary64)) (pow.f64 (.f64 (/.f64 (+.f64 re re) im) im) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 im im) (+.f64 im im)) (+.f64 (.f64 (.f64 (/.f64 (+.f64 re re) im) im) (.f64 (/.f64 (+.f64 re re) im) im)) (.f64 (+.f64 im im) (*.f64 (/.f64 (+.f64 re re) im) im)))))
(/.f64 (-.f64 (pow.f64 (+.f64 im im) #s(literal 3 binary64)) (pow.f64 (neg.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im)) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 im im) (+.f64 im im)) (+.f64 (.f64 (neg.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im)) (neg.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im))) (.f64 (+.f64 im im) (neg.f64 (.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) im))))))
(/.f64 (-.f64 (.f64 (+.f64 im im) (+.f64 im im)) (.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im))) (-.f64 (+.f64 im im) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im)))
(/.f64 (+.f64 (pow.f64 (+.f64 im im) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 im im) (+.f64 im im)) (-.f64 (.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im)) (.f64 (+.f64 im im) (.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) im)))))
(neg.f64 (-.f64 (.f64 (neg.f64 im) (.f64 (/.f64 re im) #s(literal -2 binary64))) (+.f64 im im)))
(neg.f64 (-.f64 (*.f64 (/.f64 (+.f64 re re) im) im) (+.f64 im im)))
(neg.f64 (-.f64 (neg.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im)) (+.f64 im im)))
(-.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im) (neg.f64 (+.f64 im im)))
(-.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im) (*.f64 (neg.f64 im) #s(literal 2 binary64)))
(-.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im) (*.f64 #s(literal -2 binary64) im))
(-.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im) (*.f64 im #s(literal -2 binary64)))
(-.f64 (+.f64 im im) (.f64 (/.f64 (neg.f64 re) im) (.f64 #s(literal -2 binary64) im)))
(-.f64 (+.f64 im im) (.f64 (neg.f64 (.f64 im (/.f64 re im))) #s(literal -2 binary64)))
(-.f64 (+.f64 im im) (*.f64 (+.f64 im im) (/.f64 re im)))
(-.f64 (+.f64 im im) (.f64 (neg.f64 (/.f64 re im)) (.f64 #s(literal -2 binary64) im)))
(-.f64 (+.f64 im im) (.f64 #s(literal 2 binary64) (.f64 (/.f64 re im) im)))
(-.f64 (+.f64 im im) (.f64 (neg.f64 im) (.f64 (/.f64 re im) #s(literal -2 binary64))))
(-.f64 (+.f64 im im) (*.f64 (/.f64 (+.f64 re re) im) im))
(-.f64 (+.f64 im im) (neg.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im)))
(+.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im) (+.f64 im im))
(+.f64 (+.f64 im im) (.f64 (neg.f64 (neg.f64 im)) (.f64 (/.f64 re im) #s(literal -2 binary64))))
(+.f64 (+.f64 im im) (neg.f64 (.f64 (neg.f64 im) (.f64 (/.f64 re im) #s(literal -2 binary64)))))
(+.f64 (+.f64 im im) (neg.f64 (*.f64 (/.f64 (+.f64 re re) im) im)))
(+.f64 (+.f64 im im) (neg.f64 (neg.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im))))
(+.f64 (+.f64 im im) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im))
(.f64 (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im)))) (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im)))))
(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im))) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im))))
(pow.f64 (.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im)) #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im))) #s(literal 2 binary64))
(pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im)) #s(literal 1 binary64))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im))
(sqrt.f64 (.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im)) #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im)))) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im)))))
(fabs.f64 (.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im))) (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im))))))
(fabs.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im)))
(.f64 (sqrt.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im)))) (sqrt.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im)))))
(.f64 (pow.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im)) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im)))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im))))))
(fabs.f64 (neg.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im)))))
(fabs.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im))))
(exp.f64 (.f64 (log.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im))))
#s(literal -4 binary64)
(*.f64 #s(literal -4 binary64) re)
(*.f64 re #s(literal -4 binary64))
(.f64 (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))))
(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))))
(pow.f64 (.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #s(literal 2 binary64))
(pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #s(literal 1 binary64))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))
(sqrt.f64 (.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))))
(fabs.f64 (.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))))))
(fabs.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))
(.f64 (sqrt.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (sqrt.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))))
(.f64 (pow.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))))))
(fabs.f64 (neg.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))))
(fabs.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))))
(exp.f64 (.f64 (log.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) im))) (/.f64 #s(literal 1 binary64) im))
(*.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) im))) (neg.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) im))))
(*.f64 (/.f64 #s(literal 1 binary64) im) #s(literal 2 binary64))
(*.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) im)) (sqrt.f64 (/.f64 #s(literal 2 binary64) im)))
(*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) (neg.f64 im)))
(*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) im))
(pow.f64 (*.f64 (/.f64 #s(literal 2 binary64) im) (/.f64 #s(literal 2 binary64) im)) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) im)) #s(literal 2 binary64))
(pow.f64 (/.f64 #s(literal 2 binary64) im) #s(literal 1 binary64))
(/.f64 (+.f64 (*.f64 (/.f64 #s(literal 1 binary64) im) (neg.f64 im)) #s(literal -1 binary64)) (neg.f64 im))
(/.f64 (+.f64 (*.f64 (/.f64 #s(literal 1 binary64) im) im) #s(literal 1 binary64)) im)
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (neg.f64 im)) (.f64 #s(literal -1 binary64) (neg.f64 im))) (*.f64 im im))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) im) (.f64 #s(literal 1 binary64) (neg.f64 im))) (*.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -1 binary64) im)) (*.f64 (neg.f64 im) im))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) im)) (.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) im))) (-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) im)))
(/.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1 binary64) im) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) im) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) im)) (-.f64 (.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) im)) (*.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) im)))))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (neg.f64 im)) (.f64 (neg.f64 im) #s(literal -1 binary64))) (*.f64 im im))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) im) (.f64 (neg.f64 im) #s(literal 1 binary64))) (*.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 im #s(literal -1 binary64))) (*.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) im) (.f64 im #s(literal 1 binary64))) (*.f64 im im))
(/.f64 (+.f64 im im) (*.f64 im im))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (neg.f64 im)) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 im) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 im #s(literal 2 binary64)))
(/.f64 #s(literal -2 binary64) (neg.f64 (neg.f64 (neg.f64 im))))
(/.f64 #s(literal -2 binary64) (neg.f64 im))
(/.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 im)))
(/.f64 #s(literal 2 binary64) im)
(neg.f64 (/.f64 #s(literal -2 binary64) im))
(-.f64 (/.f64 #s(literal 1 binary64) im) (*.f64 #s(literal -1 binary64) (/.f64 #s(literal 1 binary64) im)))
(-.f64 (/.f64 #s(literal 1 binary64) im) (neg.f64 (/.f64 #s(literal 1 binary64) im)))
(-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal -1 binary64) im))
(-.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) (neg.f64 im)))
(sqrt.f64 (*.f64 (/.f64 #s(literal 2 binary64) im) (/.f64 #s(literal 2 binary64) im)))
(fabs.f64 (*.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) im))) (sqrt.f64 (/.f64 #s(literal 2 binary64) im))))
(fabs.f64 (*.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) im)) (neg.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) im)))))
(fabs.f64 (/.f64 #s(literal 2 binary64) im))
(+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) im))
(*.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) im))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) im))))
(*.f64 (pow.f64 #s(literal -2 binary64) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (neg.f64 im)) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (/.f64 #s(literal 2 binary64) im) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 #s(literal 2 binary64) im) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal 2 binary64)))
(*.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (neg.f64 im))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) im) #s(literal 1/2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) im) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)))
(pow.f64 (/.f64 #s(literal 2 binary64) im) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 #s(literal -2 binary64)) (sqrt.f64 (neg.f64 im)))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (neg.f64 (neg.f64 im))))
(/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 im))
(sqrt.f64 (/.f64 #s(literal 2 binary64) im))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) im)))))
(fabs.f64 (neg.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) im))))
(fabs.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) im)))
(exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 2 binary64) im)) #s(literal 1/2 binary64)))
(*.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) im)) im)
(*.f64 im (sqrt.f64 (/.f64 #s(literal 2 binary64) im)))
#s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) im)) im))
(.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) im)) im)) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (*.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) im)) im)))
#s(literal 1 binary64)
(*.f64 (pow.f64 (fabs.f64 im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (fabs.f64 im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (neg.f64 im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (neg.f64 (fabs.f64 im))) (neg.f64 (neg.f64 (fabs.f64 im))))
(*.f64 (neg.f64 (neg.f64 (neg.f64 im))) (neg.f64 (neg.f64 (neg.f64 im))))
(*.f64 (pow.f64 (fabs.f64 im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 im) #s(literal 1 binary64)) (fabs.f64 im))
(*.f64 (pow.f64 (neg.f64 im) #s(literal 1 binary64)) (pow.f64 (neg.f64 im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 im) #s(literal 1 binary64)) (neg.f64 im))
(*.f64 (pow.f64 im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 im)))
(*.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 im)))
(*.f64 (pow.f64 im #s(literal 1 binary64)) (pow.f64 im #s(literal 1 binary64)))
(*.f64 (pow.f64 im #s(literal 1 binary64)) im)
(*.f64 (fabs.f64 im) (fabs.f64 im))
(*.f64 (neg.f64 im) (neg.f64 im))
(*.f64 im im)
(pow.f64 (neg.f64 (fabs.f64 im)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 im)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 im) #s(literal 2 binary64))
(pow.f64 (neg.f64 im) #s(literal 2 binary64))
(pow.f64 (*.f64 im im) #s(literal 1 binary64))
(pow.f64 im #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 im) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 im) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (neg.f64 im)))
(/.f64 (pow.f64 im #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) im))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 im) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 im) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal -2 binary64)))
(neg.f64 (*.f64 (neg.f64 im) im))
(sqrt.f64 (.f64 (.f64 im im) (*.f64 im im)))
(fabs.f64 (*.f64 (neg.f64 im) im))
(fabs.f64 (*.f64 im im))
(exp.f64 (*.f64 (log.f64 (fabs.f64 im)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 im)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 im) #s(literal 2 binary64)))
(*.f64 (pow.f64 (fabs.f64 re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (fabs.f64 re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (neg.f64 re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (neg.f64 re) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (neg.f64 (fabs.f64 re))) (neg.f64 (neg.f64 (fabs.f64 re))))
(*.f64 (pow.f64 (fabs.f64 re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 re) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 re) #s(literal 1 binary64)) (fabs.f64 re))
(*.f64 (pow.f64 (neg.f64 re) #s(literal 1 binary64)) (pow.f64 (neg.f64 re) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 re) #s(literal 1 binary64)) (neg.f64 re))
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (.f64 re re))
(.f64 (.f64 #s(literal 1 binary64) re) (*.f64 #s(literal 1 binary64) re))
(*.f64 (pow.f64 re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 re)))
(*.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)))
(*.f64 (pow.f64 re #s(literal 1 binary64)) re)
(*.f64 (fabs.f64 re) (fabs.f64 re))
(*.f64 (neg.f64 re) (neg.f64 re))
(.f64 (.f64 re re) (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(.f64 (.f64 re re) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) (.f64 re re))
(*.f64 re re)
(pow.f64 (neg.f64 (fabs.f64 re)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 re) #s(literal 2 binary64))
(pow.f64 (neg.f64 re) #s(literal 2 binary64))
(pow.f64 (*.f64 re re) #s(literal 1 binary64))
(pow.f64 re #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 re) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 re) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) re))
(/.f64 (pow.f64 re #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) re))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 re) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 re) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal -2 binary64)))
(neg.f64 (*.f64 (neg.f64 re) re))
(sqrt.f64 (.f64 (.f64 re re) (*.f64 re re)))
(fabs.f64 (*.f64 (neg.f64 re) re))
(fabs.f64 (*.f64 re re))
(exp.f64 (*.f64 (log.f64 (fabs.f64 re)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 re)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 re) #s(literal 2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 (neg.f64 im)) im) (.f64 re re))) (.f64 re re))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 im) im) (.f64 re re))) (.f64 re re))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 re) re) (.f64 im im))) (.f64 im im))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 im im) (.f64 re re))) (.f64 re re))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 re re) (.f64 im im))) (.f64 im im))
(.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))))
(.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))))
(pow.f64 (.f64 (+.f64 (.f64 re re) (.f64 im im)) (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 1/2 binary64))
(pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 1 binary64))
(pow.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 re re) (.f64 re re)) (.f64 (.f64 (neg.f64 (neg.f64 im)) im) (.f64 (neg.f64 (neg.f64 im)) im))) (-.f64 (.f64 re re) (.f64 (neg.f64 (neg.f64 im)) im)))
(/.f64 (+.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (neg.f64 im)) im) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 re re) (.f64 re re)) (-.f64 (.f64 (.f64 (neg.f64 (neg.f64 im)) im) (.f64 (neg.f64 (neg.f64 im)) im)) (.f64 (.f64 re re) (*.f64 (neg.f64 (neg.f64 im)) im)))))
(/.f64 (-.f64 (.f64 (.f64 re re) (.f64 re re)) (.f64 (.f64 (neg.f64 im) im) (.f64 (neg.f64 im) im))) (+.f64 (.f64 re re) (.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (.f64 (.f64 im im) (.f64 im im)) (.f64 (.f64 (neg.f64 re) re) (.f64 (neg.f64 re) re))) (+.f64 (.f64 im im) (.f64 (neg.f64 re) re)))
(/.f64 (-.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 im) im) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 re re) (.f64 re re)) (+.f64 (.f64 (.f64 (neg.f64 im) im) (.f64 (neg.f64 im) im)) (.f64 (.f64 re re) (*.f64 (neg.f64 im) im)))))
(/.f64 (-.f64 (pow.f64 (.f64 im im) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 re) re) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 im im) (.f64 im im)) (+.f64 (.f64 (.f64 (neg.f64 re) re) (.f64 (neg.f64 re) re)) (.f64 (.f64 im im) (*.f64 (neg.f64 re) re)))))
(/.f64 (-.f64 (.f64 (.f64 re re) (.f64 re re)) (.f64 (.f64 im im) (.f64 im im))) (-.f64 (.f64 re re) (.f64 im im)))
(/.f64 (-.f64 (.f64 (.f64 im im) (.f64 im im)) (.f64 (.f64 re re) (.f64 re re))) (-.f64 (.f64 im im) (.f64 re re)))
(/.f64 (+.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) (pow.f64 (.f64 im im) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 re re) (.f64 re re)) (-.f64 (.f64 (.f64 im im) (.f64 im im)) (.f64 (.f64 re re) (*.f64 im im)))))
(/.f64 (+.f64 (pow.f64 (.f64 im im) #s(literal 3 binary64)) (pow.f64 (.f64 re re) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 im im) (.f64 im im)) (-.f64 (.f64 (.f64 re re) (.f64 re re)) (.f64 (.f64 im im) (*.f64 re re)))))
(neg.f64 (-.f64 (.f64 (neg.f64 im) im) (.f64 re re)))
(-.f64 (.f64 re re) (.f64 (neg.f64 (neg.f64 (neg.f64 im))) im))
(-.f64 (.f64 re re) (.f64 (neg.f64 (neg.f64 (fabs.f64 im))) (neg.f64 (fabs.f64 im))))
(-.f64 (.f64 re re) (.f64 (neg.f64 (neg.f64 (neg.f64 im))) (neg.f64 (neg.f64 im))))
(-.f64 (.f64 re re) (neg.f64 (.f64 (neg.f64 (neg.f64 im)) im)))
(-.f64 (.f64 re re) (.f64 (neg.f64 im) im))
(-.f64 (.f64 im im) (.f64 (*.f64 #s(literal 1 binary64) re) (neg.f64 re)))
(-.f64 (.f64 im im) (.f64 (neg.f64 (neg.f64 (fabs.f64 re))) (neg.f64 (fabs.f64 re))))
(-.f64 (.f64 im im) (.f64 (neg.f64 re) re))
(sqrt.f64 (.f64 (+.f64 (.f64 re re) (.f64 im im)) (+.f64 (.f64 re re) (*.f64 im im))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))))
(fabs.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))))))
(fabs.f64 (+.f64 (.f64 re re) (.f64 im im)))
(+.f64 (.f64 re re) (.f64 (neg.f64 (neg.f64 (fabs.f64 im))) (fabs.f64 im)))
(+.f64 (.f64 re re) (.f64 (neg.f64 (neg.f64 (neg.f64 im))) (neg.f64 im)))
(+.f64 (.f64 re re) (.f64 (neg.f64 (neg.f64 im)) im))
(+.f64 (.f64 re re) (.f64 im im))
(+.f64 (.f64 im im) (.f64 (neg.f64 (neg.f64 (fabs.f64 re))) (fabs.f64 re)))
(+.f64 (.f64 im im) (.f64 re re))
(.f64 (sqrt.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (sqrt.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))))
(.f64 (pow.f64 (+.f64 (.f64 re re) (.f64 im im)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (.f64 re re) (*.f64 im im)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 (+.f64 (.f64 re re) (.f64 im im)) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))))
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))
(fabs.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))
(exp.f64 (.f64 (log.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 1/2 binary64)))
(*.f64 (neg.f64 re) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (neg.f64 re))
(neg.f64 (*.f64 #s(literal 1 binary64) re))
(neg.f64 re)
(.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) re))
(.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) re))
(.f64 (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))))) (/.f64 #s(literal -1 binary64) re))
(.f64 (/.f64 #s(literal -1 binary64) re) (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))))
(.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))) (/.f64 #s(literal 1 binary64) re))
(.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re)) #s(literal 1 binary64))
(.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -1 binary64) re))
(/.f64 (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 1 binary64))) re)
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))) re)
(/.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 1 binary64)) (neg.f64 re))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) (neg.f64 re))
(/.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (*.f64 #s(literal 1 binary64) re))
(/.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) re)
(/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 re) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 re) (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))))
(/.f64 #s(literal 1 binary64) (/.f64 re (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))
(neg.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re)) (/.f64 re re))) (/.f64 re re))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)))) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re)))
(.f64 (/.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 1 binary64)) (neg.f64 re)) (/.f64 re #s(literal 1 binary64)))
(.f64 (/.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 1 binary64)) #s(literal 1 binary64)) (/.f64 (neg.f64 re) re))
(.f64 (/.f64 (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))) re) (neg.f64 re)) (/.f64 (neg.f64 re) #s(literal 1 binary64)))
(.f64 (/.f64 (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))) re) #s(literal 1 binary64)) (/.f64 re re))
(.f64 (/.f64 (neg.f64 re) #s(literal 1 binary64)) (/.f64 (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))) re) (neg.f64 re)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)))) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (-.f64 (.f64 #s(literal 1 binary64) re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (/.f64 #s(literal 1 binary64) re))
(.f64 (/.f64 re re) (/.f64 (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))) re) #s(literal 1 binary64)))
(.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))) (/.f64 #s(literal 1 binary64) re))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re)) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) (/.f64 #s(literal -1 binary64) re))
(/.f64 (+.f64 (.f64 (/.f64 re re) (neg.f64 re)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64))) (neg.f64 re))
(/.f64 (+.f64 (.f64 (/.f64 re re) (neg.f64 re)) (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))))) (neg.f64 re))
(/.f64 (+.f64 (.f64 (/.f64 re re) re) (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))))) re)
(/.f64 (+.f64 (.f64 (/.f64 re re) (neg.f64 re)) (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))) (neg.f64 re))
(/.f64 (+.f64 (.f64 re re) (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64)) (neg.f64 re))) (.f64 re re))
(/.f64 (+.f64 (.f64 re re) (.f64 (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) (neg.f64 re))) (*.f64 re re))
(/.f64 (+.f64 (.f64 (neg.f64 re) re) (.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (neg.f64 re))) (*.f64 (neg.f64 re) re))
(/.f64 (+.f64 (.f64 re re) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re))) (*.f64 re re))
(/.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 re))) (.f64 (neg.f64 re) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 re))) (*.f64 (neg.f64 re) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) re)) (*.f64 re #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64)) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (neg.f64 re)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (.f64 (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (neg.f64 re)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) re) (.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) re))
(/.f64 (-.f64 (.f64 (/.f64 re re) (/.f64 re re)) (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)))) (-.f64 (/.f64 re re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re))))
(/.f64 (-.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re))) (.f64 #s(literal -1 binary64) #s(literal -1 binary64))) (+.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) #s(literal -1 binary64)))
(/.f64 (+.f64 (pow.f64 (/.f64 re re) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 re re) (/.f64 re re)) (-.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re))) (.f64 (/.f64 re re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) #s(literal 3 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re))) (+.f64 (.f64 #s(literal -1 binary64) #s(literal -1 binary64)) (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re)) #s(literal -1 binary64)))))
(/.f64 (+.f64 (.f64 re re) (.f64 (neg.f64 re) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64)))) (.f64 re re))
(/.f64 (+.f64 (.f64 re re) (.f64 (neg.f64 re) (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))))) (*.f64 re re))
(/.f64 (+.f64 (.f64 (neg.f64 re) re) (.f64 (neg.f64 re) (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))) (*.f64 (neg.f64 re) re))
(/.f64 (+.f64 (.f64 re re) (.f64 (neg.f64 re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) (*.f64 re re))
(/.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 re) #s(literal 2 binary64))) (.f64 (neg.f64 re) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) #s(literal 2 binary64)) (.f64 (neg.f64 re) #s(literal 2 binary64))) (*.f64 (neg.f64 re) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) #s(literal 2 binary64)) (.f64 re #s(literal 2 binary64))) (*.f64 re #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64)))) (.f64 #s(literal 2 binary64) (neg.f64 re)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))))) (*.f64 #s(literal 2 binary64) (neg.f64 re)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) re) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))) (*.f64 #s(literal 2 binary64) re))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) re) (.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))))) (*.f64 #s(literal 2 binary64) re))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (.f64 #s(literal 2 binary64) (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))) (*.f64 #s(literal 2 binary64) (neg.f64 re)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) re))
(/.f64 (.f64 (.f64 (neg.f64 re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #s(literal -1 binary64)) (*.f64 (neg.f64 re) re))
(/.f64 (.f64 (.f64 (neg.f64 re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #s(literal 1 binary64)) (*.f64 re re))
(/.f64 (.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (neg.f64 re)) #s(literal -1 binary64)) (*.f64 (neg.f64 re) re))
(/.f64 (.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (neg.f64 re)) #s(literal 1 binary64)) (*.f64 re re))
(/.f64 (neg.f64 (-.f64 (.f64 #s(literal 1 binary64) re) (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))))) (neg.f64 re))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) re) (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))) re)
(/.f64 (-.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re))) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (+.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))
(/.f64 (+.f64 (pow.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re))) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))))
(/.f64 (.f64 (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))) re) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (*.f64 #s(literal 1 binary64) re))
(/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) re)
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)))) (-.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re))) (.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re))))))
(/.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (neg.f64 re))
(/.f64 #s(literal 1 binary64) (/.f64 re (-.f64 (.f64 #s(literal 1 binary64) re) (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))))))
(/.f64 #s(literal 1 binary64) (/.f64 re (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))
(/.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 re)))
(/.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 2 binary64)) (.f64 (neg.f64 re) #s(literal 2 binary64)))
(neg.f64 (/.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) re))
(neg.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64)))
(-.f64 (/.f64 re re) (.f64 (/.f64 #s(literal 1 binary64) re) (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))))
(-.f64 (/.f64 re re) (.f64 (neg.f64 (/.f64 #s(literal -1 binary64) re)) (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))))
(-.f64 (/.f64 re re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))
(-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) #s(literal -1 binary64))
(-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) (/.f64 (neg.f64 re) re))
(-.f64 #s(literal 1 binary64) (.f64 (/.f64 #s(literal 1 binary64) re) (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 (/.f64 #s(literal -1 binary64) re)) (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))))
(-.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))
(+.f64 (/.f64 (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re))) (neg.f64 re)) (/.f64 re re))
(+.f64 (/.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re)) (neg.f64 re)) (neg.f64 re)) (/.f64 re re))
(+.f64 (/.f64 re re) (/.f64 (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re))) (neg.f64 re)))
(+.f64 (/.f64 re re) (/.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re)) (neg.f64 re)) (neg.f64 re)))
(+.f64 (/.f64 re re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)))
(+.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) (/.f64 re re))
(+.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))) (neg.f64 (/.f64 #s(literal -1 binary64) re))))
(+.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re))) (neg.f64 re)))
(+.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re)) (neg.f64 re)) (neg.f64 re)))
(+.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 re) (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re))))) (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 re) (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) (neg.f64 re)))) (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re)) (neg.f64 re)))
(.f64 (/.f64 (neg.f64 re) #s(literal 1 binary64)) (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))) re))
(.f64 (/.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 1 binary64)) (/.f64 re re))
(.f64 (.f64 (neg.f64 re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (/.f64 #s(literal -1 binary64) re))
(.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (neg.f64 re)) (/.f64 #s(literal -1 binary64) re))
(.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 1 binary64)) re)
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))))
(.f64 (/.f64 re re) (/.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 1 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))))
(.f64 (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))) re) (/.f64 (neg.f64 re) #s(literal 1 binary64)))
(.f64 (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))) re) (neg.f64 re))
(.f64 (neg.f64 re) (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))) re))
(/.f64 (-.f64 (.f64 re re) (+.f64 (.f64 re re) (.f64 im im))) (+.f64 (neg.f64 re) (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))))))
(/.f64 (-.f64 (.f64 re re) (+.f64 (.f64 re re) (.f64 im im))) (-.f64 (neg.f64 re) (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))))
(/.f64 (-.f64 (.f64 (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re))) (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)))) (.f64 re re)) (-.f64 (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re))) (neg.f64 re)))
(/.f64 (-.f64 (.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) (neg.f64 re)) (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) (neg.f64 re))) (.f64 re re)) (-.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re)) (neg.f64 re)) (neg.f64 re)))
(/.f64 (-.f64 (.f64 re re) (.f64 (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re))) (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re))))) (-.f64 (neg.f64 re) (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re)))))
(/.f64 (-.f64 (.f64 re re) (.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) (neg.f64 re)) (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) (neg.f64 re)))) (-.f64 (neg.f64 re) (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re)) (neg.f64 re))))
(/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re))) #s(literal 3 binary64)) (pow.f64 (neg.f64 re) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re))) (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)))) (-.f64 (.f64 re re) (.f64 (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re))) (neg.f64 re)))))
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) (neg.f64 re)) #s(literal 3 binary64)) (pow.f64 (neg.f64 re) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) (neg.f64 re)) (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) (neg.f64 re))) (-.f64 (.f64 re re) (.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re)) (neg.f64 re)) (neg.f64 re)))))
(/.f64 (+.f64 (pow.f64 (neg.f64 re) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re))) #s(literal 3 binary64))) (+.f64 (.f64 re re) (-.f64 (.f64 (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re))) (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)))) (.f64 (neg.f64 re) (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re)))))))
(/.f64 (+.f64 (pow.f64 (neg.f64 re) #s(literal 3 binary64)) (pow.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) (neg.f64 re)) #s(literal 3 binary64))) (+.f64 (.f64 re re) (-.f64 (.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) (neg.f64 re)) (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) (neg.f64 re))) (.f64 (neg.f64 re) (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re)) (neg.f64 re))))))
(/.f64 (-.f64 (pow.f64 (neg.f64 re) #s(literal 3 binary64)) (pow.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) #s(literal 3 binary64))) (+.f64 (.f64 re re) (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 (neg.f64 re) (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))))))
(/.f64 (neg.f64 (.f64 (neg.f64 re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))) re)
(/.f64 (neg.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) (neg.f64 re))) re)
(/.f64 (.f64 (neg.f64 re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)) (neg.f64 re))
(/.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) (neg.f64 re)) (neg.f64 re))
(/.f64 (+.f64 (pow.f64 (neg.f64 re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 3 binary64))) (+.f64 (.f64 re re) (-.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 (neg.f64 re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 3 binary64)) (pow.f64 (neg.f64 re) #s(literal 3 binary64))) (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (-.f64 (.f64 re re) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)))))
(/.f64 (-.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 re re)) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re)))
(/.f64 (-.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 re re)) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))
(/.f64 (-.f64 (pow.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (+.f64 (.f64 re re) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 re) (.f64 (neg.f64 re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 re) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) (neg.f64 re))))
(neg.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))
(-.f64 (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re))) (.f64 (*.f64 #s(literal 1 binary64) re) #s(literal 1 binary64)))
(-.f64 (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re))) (.f64 #s(literal -1 binary64) (neg.f64 re)))
(-.f64 (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re))) (.f64 re #s(literal 1 binary64)))
(-.f64 (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re))) (.f64 #s(literal 1 binary64) re))
(-.f64 (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re))) re)
(-.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) (neg.f64 re)) (.f64 (*.f64 #s(literal 1 binary64) re) #s(literal 1 binary64)))
(-.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) (neg.f64 re)) (.f64 #s(literal -1 binary64) (neg.f64 re)))
(-.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) (neg.f64 re)) (.f64 re #s(literal 1 binary64)))
(-.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re)) (neg.f64 re)) (.f64 #s(literal 1 binary64) re))
(-.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re)) (neg.f64 re)) re)
(-.f64 (neg.f64 re) (.f64 (.f64 #s(literal 1 binary64) re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re))))
(-.f64 (neg.f64 re) (.f64 re (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re))))
(-.f64 (neg.f64 re) (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) (neg.f64 re)))
(-.f64 (neg.f64 re) (neg.f64 (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re)))))
(-.f64 (neg.f64 re) (neg.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re)) (neg.f64 re))))
(-.f64 (neg.f64 re) (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))
(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (.f64 (.f64 #s(literal 1 binary64) re) #s(literal 1 binary64)))
(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (*.f64 #s(literal -1 binary64) (neg.f64 re)))
(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (*.f64 re #s(literal 1 binary64)))
(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (*.f64 #s(literal 1 binary64) re))
(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)
(+.f64 (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re))) (neg.f64 re))
(+.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re)) (neg.f64 re)) (neg.f64 re))
(+.f64 (neg.f64 re) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 1 binary64)))
(+.f64 (neg.f64 re) (.f64 (neg.f64 re) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re))))
(+.f64 (neg.f64 re) (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re)) (neg.f64 re)))
(+.f64 (neg.f64 re) (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))))
(+.f64 (neg.f64 re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))
(+.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 re))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (-.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) re))) (-.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) re))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 re) (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))) (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64)) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64)))) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 re)))) (.f64 #s(literal 2 binary64) (neg.f64 re)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 (neg.f64 re) #s(literal 2 binary64)))) (.f64 (neg.f64 re) #s(literal 2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)))) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 re) #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)))) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (neg.f64 re) (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 re (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))) (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64)) (neg.f64 re)) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 re (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))))
(.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) re))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))
(.f64 (neg.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 2 binary64)))))
(.f64 (.f64 (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) re) #s(literal 2 binary64)) (neg.f64 re))
(.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 2 binary64))) (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 2 binary64))))
(.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 2 binary64))
(.f64 (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) re) (.f64 (neg.f64 re) #s(literal 2 binary64)))
(.f64 (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))) re) (-.f64 (neg.f64 re) re))
(.f64 (neg.f64 re) (.f64 (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) re) #s(literal 2 binary64)))
(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))
(pow.f64 (.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 2 binary64)) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 2 binary64))) #s(literal 2 binary64))
(pow.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 2 binary64)) #s(literal 1 binary64))
(/.f64 (+.f64 (.f64 (.f64 (neg.f64 re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (neg.f64 re)) (.f64 (.f64 (neg.f64 re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (neg.f64 re))) (*.f64 re re))
(/.f64 (+.f64 (.f64 (.f64 (neg.f64 re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (neg.f64 re)) (.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (neg.f64 re)) (neg.f64 re))) (*.f64 re re))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (neg.f64 re)) (neg.f64 re)) (.f64 (.f64 (neg.f64 re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (neg.f64 re))) (*.f64 re re))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (neg.f64 re)) (neg.f64 re)) (.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (neg.f64 re)) (neg.f64 re))) (*.f64 re re))
(/.f64 (-.f64 (.f64 (-.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) re) (-.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) re)) (+.f64 (.f64 re re) (.f64 im im))) (-.f64 (-.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) re) (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (.f64 #s(literal 2 binary64) (neg.f64 re))) (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)))) (-.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (neg.f64 re) #s(literal 2 binary64)) (.f64 (neg.f64 re) #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)))) (-.f64 (.f64 (neg.f64 re) #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) (.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (.f64 #s(literal 2 binary64) (neg.f64 re)))) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 re))))
(/.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) (.f64 (.f64 (neg.f64 re) #s(literal 2 binary64)) (.f64 (neg.f64 re) #s(literal 2 binary64)))) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 (neg.f64 re) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 re re) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))))) (-.f64 (neg.f64 re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))))
(/.f64 (-.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 (-.f64 (neg.f64 re) (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) (-.f64 (neg.f64 re) (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))))) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (-.f64 (neg.f64 re) (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))))))
(/.f64 (-.f64 (.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) (.f64 re re)) (-.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (neg.f64 re)))
(/.f64 (-.f64 (.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) (.f64 re re)) (+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) re))
(/.f64 (-.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (.f64 (.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64)) (neg.f64 re)) (.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64)) (neg.f64 re)))) (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 1 binary64)) (neg.f64 re))))
(/.f64 (-.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))) (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))))
(/.f64 (-.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 (-.f64 re (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (-.f64 re (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (-.f64 re (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))))
(/.f64 (+.f64 (pow.f64 (-.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) re) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) re) (-.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) re)) (-.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 (-.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))))
(/.f64 (+.f64 (pow.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 re) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) (-.f64 (.f64 re re) (.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))) (neg.f64 re)))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64)) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64))) (.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64)) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64)))) (-.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64)) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64)) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64))) (-.f64 (.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64)) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64))) (.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64)) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 1 binary64))))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) #s(literal 3 binary64)) (pow.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (.f64 #s(literal 2 binary64) (neg.f64 re))) (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) (.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (.f64 (.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (-.f64 (.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (-.f64 (.f64 (.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (.f64 (.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))))))
(/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 re) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (neg.f64 re) #s(literal 2 binary64)) (.f64 (neg.f64 re) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) (.f64 (.f64 (neg.f64 re) #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (.f64 #s(literal 2 binary64) (neg.f64 re))) (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (*.f64 #s(literal 2 binary64) (neg.f64 re))))))
(/.f64 (+.f64 (pow.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 re) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) (-.f64 (.f64 (.f64 (neg.f64 re) #s(literal 2 binary64)) (.f64 (neg.f64 re) #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (*.f64 (neg.f64 re) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 (neg.f64 re) #s(literal 3 binary64)) (pow.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) #s(literal 3 binary64))) (+.f64 (.f64 re re) (-.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))) (.f64 (neg.f64 re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))))))))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 3 binary64)) (pow.f64 (-.f64 (neg.f64 re) (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) #s(literal 3 binary64))) (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (-.f64 (.f64 (-.f64 (neg.f64 re) (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) (-.f64 (neg.f64 re) (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (-.f64 (neg.f64 re) (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))))))
(/.f64 (-.f64 (pow.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) (+.f64 (.f64 re re) (.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))) re))))
(/.f64 (-.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64)) (neg.f64 re)) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (+.f64 (.f64 (.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64)) (neg.f64 re)) (.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64)) (neg.f64 re))) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 1 binary64)) (neg.f64 re))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 3 binary64)) (pow.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (+.f64 (.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))))))))
(/.f64 (-.f64 (pow.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 3 binary64)) (pow.f64 (-.f64 re (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #s(literal 3 binary64))) (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (+.f64 (.f64 (-.f64 re (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (-.f64 re (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (-.f64 re (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))))
(/.f64 (+.f64 (.f64 (neg.f64 re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (.f64 (neg.f64 re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (neg.f64 re))
(/.f64 (+.f64 (.f64 (neg.f64 re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (neg.f64 re))) (neg.f64 re))
(/.f64 (+.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (neg.f64 re)) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (neg.f64 re))) (neg.f64 re))
(/.f64 (-.f64 (.f64 (neg.f64 re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) re)) (neg.f64 re))
(/.f64 (-.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (neg.f64 re)) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) re)) (neg.f64 re))
(/.f64 (+.f64 (.f64 (.f64 (neg.f64 re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (neg.f64 re)) (.f64 (neg.f64 re) (.f64 (neg.f64 re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (*.f64 re re))
(/.f64 (+.f64 (.f64 (.f64 (neg.f64 re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (neg.f64 re)) (.f64 (neg.f64 re) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (neg.f64 re)))) (*.f64 re re))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (neg.f64 re)) (neg.f64 re)) (.f64 (neg.f64 re) (.f64 (neg.f64 re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (*.f64 re re))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (neg.f64 re)) (neg.f64 re)) (.f64 (neg.f64 re) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (neg.f64 re)))) (*.f64 re re))
(/.f64 (+.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (neg.f64 re)) (.f64 (neg.f64 re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (neg.f64 re))
(/.f64 (-.f64 (.f64 (.f64 (neg.f64 re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (neg.f64 re)) (.f64 (neg.f64 re) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) re))) (*.f64 re re))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (neg.f64 re)) (neg.f64 re)) (.f64 (neg.f64 re) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) re))) (*.f64 re re))
(/.f64 (-.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (-.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))
(/.f64 (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 3 binary64)) (pow.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (-.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))))
(neg.f64 (-.f64 re (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))))
(neg.f64 (-.f64 (.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64)) (neg.f64 re)) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))
(neg.f64 (-.f64 (-.f64 re (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))
(neg.f64 (.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))) #s(literal 2 binary64)))
(neg.f64 (.f64 #s(literal -2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))
(neg.f64 (.f64 #s(literal 2 binary64) (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))))))
(neg.f64 (.f64 (.f64 (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) re) #s(literal 2 binary64)) re))
(neg.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal -2 binary64)))
(neg.f64 (-.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))
(-.f64 (-.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) re) (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))
(-.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (.f64 (.f64 #s(literal 1 binary64) re) #s(literal 1 binary64)))
(-.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (*.f64 #s(literal -1 binary64) (neg.f64 re)))
(-.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (*.f64 re #s(literal 1 binary64)))
(-.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (*.f64 #s(literal 1 binary64) re))
(-.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) re)
(-.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64)) (.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) #s(literal 1 binary64)))
(-.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64)) (neg.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64))))
(-.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal -2 binary64)))
(-.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) #s(literal 2 binary64)))
(-.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (.f64 #s(literal -2 binary64) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))
(-.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))))
(-.f64 (.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (.f64 #s(literal -1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))
(-.f64 (.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (neg.f64 (.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))
(-.f64 (.f64 (neg.f64 re) #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal -2 binary64)))
(-.f64 (.f64 (neg.f64 re) #s(literal 2 binary64)) (.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) #s(literal 2 binary64)))
(-.f64 (.f64 (neg.f64 re) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))
(-.f64 (.f64 (neg.f64 re) #s(literal 2 binary64)) (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))))
(-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 (*.f64 #s(literal 1 binary64) re) #s(literal 2 binary64)))
(-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (neg.f64 (.f64 (neg.f64 re) #s(literal 2 binary64))))
(-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 re #s(literal 2 binary64)))
(-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (neg.f64 (.f64 #s(literal 2 binary64) (neg.f64 re))))
(-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) (neg.f64 re)))
(-.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (.f64 (/.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) re) (neg.f64 re)))
(-.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (.f64 (.f64 #s(literal 1 binary64) re) (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) re)))
(-.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 1 binary64)) (neg.f64 re)))
(-.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))
(-.f64 (neg.f64 re) (neg.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))))
(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 (-.f64 (neg.f64 re) (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))))
(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (-.f64 re (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))
(sqrt.f64 (.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 2 binary64)) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 2 binary64))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 2 binary64)))) (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 2 binary64)))))
(fabs.f64 (.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 2 binary64))) (neg.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 2 binary64))))))
(fabs.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 2 binary64)))
(+.f64 (-.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))
(+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (neg.f64 re))
(+.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64)) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))
(+.f64 (.f64 (neg.f64 re) #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)))
(+.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 re)))
(+.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 (neg.f64 re) #s(literal 2 binary64)))
(+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (neg.f64 (.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 1 binary64)) (neg.f64 re))))
(+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))
(+.f64 (neg.f64 re) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))))
(+.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 (-.f64 re (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))
(+.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (-.f64 (neg.f64 re) (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))))
(.f64 (sqrt.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 2 binary64)))) (sqrt.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 2 binary64)))))
(.f64 (sqrt.f64 (.f64 #s(literal 2 binary64) (neg.f64 re))) (sqrt.f64 (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) re)))
(.f64 (sqrt.f64 (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) re)) (sqrt.f64 (.f64 (neg.f64 re) #s(literal 2 binary64))))
(.f64 (sqrt.f64 (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))) re)) (sqrt.f64 (-.f64 (neg.f64 re) re)))
(.f64 (pow.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) #s(literal 1/2 binary64)) (pow.f64 (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) re) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) re) #s(literal 1/2 binary64)) (pow.f64 (.f64 (neg.f64 re) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))) re) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (neg.f64 re) re) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (sqrt.f64 (.f64 (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) re) #s(literal 2 binary64))) (sqrt.f64 (neg.f64 re)))
(.f64 (pow.f64 (neg.f64 re) #s(literal 1/2 binary64)) (pow.f64 (.f64 (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) re) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) re) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 re) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 1/2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (neg.f64 re)) (sqrt.f64 (.f64 (/.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) re) #s(literal 2 binary64))))
(.f64 (sqrt.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))
(pow.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 2 binary64)))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 2 binary64))))))
(fabs.f64 (neg.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 2 binary64)))))
(fabs.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 2 binary64))))
(exp.f64 (.f64 (log.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 2 binary64))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64)))) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))) (.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))))
(.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))))
(/.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64))) (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64)))) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64))) (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64))) (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 1 binary64))))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) (.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))) (-.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) (-.f64 (.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) (.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))))))))
(/.f64 (-.f64 (+.f64 (.f64 re re) (.f64 im im)) (+.f64 (.f64 re re) (.f64 im im))) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 3 binary64)) (pow.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 3 binary64))) (+.f64 (+.f64 (.f64 re re) (.f64 im im)) (-.f64 (+.f64 (.f64 re re) (.f64 im im)) (+.f64 (.f64 re re) (.f64 im im)))))
(neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal -2 binary64)))
(neg.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))))
(-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64)) (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64))))
(-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64)) (.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) #s(literal 1 binary64)))
(-.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (.f64 #s(literal -1 binary64) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))
(-.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (neg.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))))
(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))
(+.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))))
(+.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 re) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)))) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 re (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)))) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (neg.f64 re))
(/.f64 (+.f64 (pow.f64 (neg.f64 re) #s(literal 3 binary64)) (pow.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 re re) (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) (.f64 (neg.f64 re) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64))))))
(/.f64 (-.f64 (.f64 re re) (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)))) (-.f64 (neg.f64 re) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64))))
(/.f64 (+.f64 (pow.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (neg.f64 re) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) (-.f64 (.f64 re re) (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) (neg.f64 re)))))
(/.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) (.f64 re re)) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) (neg.f64 re)))
(/.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) (.f64 re re)) (+.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re))
(/.f64 (-.f64 (pow.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) (+.f64 (.f64 re re) (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re))))
(neg.f64 (-.f64 re (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64))))
(-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 (*.f64 #s(literal 1 binary64) re) #s(literal 1 binary64)))
(-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 #s(literal -1 binary64) (neg.f64 re)))
(-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 re #s(literal 1 binary64)))
(-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (.f64 #s(literal 1 binary64) re))
(-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re)
(-.f64 (neg.f64 re) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal -2 binary64)))
(-.f64 (neg.f64 re) (.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))) #s(literal 2 binary64)))
(-.f64 (neg.f64 re) (.f64 #s(literal -2 binary64) (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))))
(-.f64 (neg.f64 re) (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64))))
(+.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) (neg.f64 re))
(+.f64 (neg.f64 re) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 (/.f64 (neg.f64 re) re)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 re re) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)))
(.f64 (/.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) re))
(.f64 (.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) re))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (neg.f64 re) re) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)))
(.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (neg.f64 re)) re) (/.f64 #s(literal -1 binary64) re))
(.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (neg.f64 re)) (.f64 re re)) (/.f64 #s(literal 1 binary64) (*.f64 re re)))
(.f64 (/.f64 #s(literal -1 binary64) re) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re))
(.f64 (-.f64 re (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) re))
(.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal 1 binary64))
(.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) (/.f64 #s(literal -1 binary64) re))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)))) re)
(/.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) re) (neg.f64 re)) re)
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) re) (.f64 (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) re))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (neg.f64 re)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (-.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re))))
(/.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (.f64 (neg.f64 (/.f64 (neg.f64 re) re)) (neg.f64 (/.f64 (neg.f64 re) re)))) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (neg.f64 (/.f64 (neg.f64 re) re))))
(/.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (.f64 (/.f64 re re) (/.f64 re re))) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (/.f64 re re)))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re))))))
(/.f64 (+.f64 (pow.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) #s(literal 3 binary64)) (pow.f64 (neg.f64 (/.f64 (neg.f64 re) re)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (-.f64 (.f64 (neg.f64 (/.f64 (neg.f64 re) re)) (neg.f64 (/.f64 (neg.f64 re) re))) (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (neg.f64 (/.f64 (neg.f64 re) re))))))
(/.f64 (+.f64 (pow.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) #s(literal 3 binary64)) (pow.f64 (/.f64 re re) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (-.f64 (.f64 (/.f64 re re) (/.f64 re re)) (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (/.f64 re re)))))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) re) (.f64 #s(literal 2 binary64) (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) re))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)))) (.f64 #s(literal 2 binary64) (neg.f64 re)))
(/.f64 (+.f64 (.f64 (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) (neg.f64 re)) (.f64 (neg.f64 re) re)) (.f64 (neg.f64 re) re))
(/.f64 (-.f64 (.f64 (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) re) (.f64 (neg.f64 re) re)) (.f64 re re))
(/.f64 (-.f64 (.f64 (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) (neg.f64 re)) (.f64 re re)) (.f64 (neg.f64 re) re))
(/.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) (.f64 re re)) (.f64 (neg.f64 re) re))
(/.f64 (neg.f64 (.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) #s(literal 1 binary64))) re)
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (neg.f64 re)) re)) re)
(/.f64 (neg.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (neg.f64 re)) (.f64 re re))) (.f64 (neg.f64 re) re))
(/.f64 (.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) #s(literal 1 binary64)) (neg.f64 re))
(/.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (neg.f64 re)) re) (neg.f64 re))
(/.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (.f64 (/.f64 (neg.f64 re) re) (/.f64 (neg.f64 re) re))) (+.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (/.f64 (neg.f64 re) re)))
(/.f64 (-.f64 (pow.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) #s(literal 3 binary64)) (pow.f64 (/.f64 (neg.f64 re) re) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (+.f64 (.f64 (/.f64 (neg.f64 re) re) (/.f64 (neg.f64 re) re)) (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (/.f64 (neg.f64 re) re)))))
(/.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (neg.f64 re)) (.f64 re re)) (.f64 re re))
(/.f64 (-.f64 re (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) (.f64 #s(literal 1 binary64) re))
(/.f64 (-.f64 re (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64))) re)
(/.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) (neg.f64 re))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 re) (.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) #s(literal 1 binary64))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 re) (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (neg.f64 re)) re)))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 re re) (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (neg.f64 re)) (.f64 re re))))
(/.f64 #s(literal 1 binary64) (/.f64 re (-.f64 re (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 re) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re)))
(neg.f64 (/.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re))
(-.f64 (/.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (neg.f64 re)) (neg.f64 re)) (/.f64 (neg.f64 re) re))
(-.f64 (/.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (neg.f64 re)) (.f64 re re)) (/.f64 (.f64 (neg.f64 re) re) (*.f64 re re)))
(-.f64 (/.f64 re re) (/.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re))
(-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (neg.f64 (neg.f64 (/.f64 (neg.f64 re) re))))
(-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (/.f64 (neg.f64 re) re))
(-.f64 #s(literal 1 binary64) (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal -2 binary64)) (/.f64 #s(literal -1 binary64) re)))
(-.f64 #s(literal 1 binary64) (.f64 (.f64 #s(literal -2 binary64) (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (/.f64 #s(literal -1 binary64) re)))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) (/.f64 #s(literal -1 binary64) re)))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))) (/.f64 #s(literal -2 binary64) re)))
(-.f64 #s(literal 1 binary64) (.f64 #s(literal -2 binary64) (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (neg.f64 re))))
(-.f64 #s(literal 1 binary64) (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re))))
(-.f64 #s(literal 1 binary64) (/.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re))
(+.f64 (/.f64 re re) (/.f64 (.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im)))) #s(literal 2 binary64)) re))
(+.f64 (/.f64 re re) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)))
(+.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (neg.f64 (/.f64 (neg.f64 re) re)))
(+.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (/.f64 re re))
(+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (/.f64 re re))) (/.f64 re re))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (neg.f64 re) re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))))) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (/.f64 (neg.f64 re) re) #s(literal 1 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))))) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re))))
(.f64 (/.f64 (-.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (neg.f64 re)) (/.f64 re #s(literal 1 binary64)))
(.f64 (/.f64 (-.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) #s(literal 1 binary64)) (/.f64 (neg.f64 re) re))
(.f64 (/.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal -1 binary64)) #s(literal 1 binary64)) (/.f64 re re))
(.f64 (/.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal -1 binary64)) (neg.f64 re)) (/.f64 (neg.f64 re) #s(literal 1 binary64)))
(.f64 (/.f64 (neg.f64 re) #s(literal 1 binary64)) (/.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal -1 binary64)) (neg.f64 re)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))))) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (-.f64 (.f64 #s(literal 1 binary64) re) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re)) (/.f64 #s(literal 1 binary64) re))
(.f64 (/.f64 re re) (/.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(.f64 (-.f64 re (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re)) (/.f64 #s(literal 1 binary64) re))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re) (/.f64 #s(literal -1 binary64) re))
(/.f64 (+.f64 (.f64 (/.f64 re re) (neg.f64 re)) (.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) #s(literal 1 binary64))) (neg.f64 re))
(/.f64 (+.f64 (.f64 (/.f64 re re) (neg.f64 re)) (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (neg.f64 re)) re)) (neg.f64 re))
(/.f64 (+.f64 (.f64 (/.f64 re re) (.f64 re re)) (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (neg.f64 re)) (.f64 re re))) (.f64 re re))
(/.f64 (+.f64 (.f64 (/.f64 re re) re) (-.f64 re (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)))) re)
(/.f64 (+.f64 (.f64 (/.f64 re re) (neg.f64 re)) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re)) (neg.f64 re))
(/.f64 (+.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 2 binary64))
(/.f64 (+.f64 (.f64 re re) (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (neg.f64 re)) (.f64 re re))) (*.f64 re re))
(/.f64 (+.f64 (.f64 re re) (.f64 (.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) #s(literal 1 binary64)) (neg.f64 re))) (*.f64 re re))
(/.f64 (+.f64 (.f64 re re) (.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (neg.f64 re)) re) (neg.f64 re))) (*.f64 re re))
(/.f64 (+.f64 (.f64 (neg.f64 re) (.f64 re re)) (.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (neg.f64 re)) (.f64 re re)) (neg.f64 re))) (.f64 (neg.f64 re) (.f64 re re)))
(/.f64 (+.f64 (.f64 (neg.f64 re) re) (.f64 (-.f64 re (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) (neg.f64 re))) (.f64 (neg.f64 re) re))
(/.f64 (+.f64 (.f64 re re) (.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) (neg.f64 re))) (.f64 re re))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 re))) (*.f64 (neg.f64 re) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (neg.f64 re)) re) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 re))) (*.f64 (neg.f64 re) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (neg.f64 re)) (.f64 re re)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (.f64 re re))) (.f64 (.f64 re re) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (-.f64 re (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) re)) (.f64 re #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (neg.f64 re))) (.f64 (neg.f64 re) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (.f64 (.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) #s(literal 1 binary64)) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (neg.f64 re)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (neg.f64 re)) re) #s(literal 2 binary64))) (*.f64 #s(literal 2 binary64) (neg.f64 re)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 re re)) (.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (neg.f64 re)) (.f64 re re)) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (.f64 re re)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) re) (.f64 (-.f64 re (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) re))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) #s(literal 2 binary64))) (.f64 #s(literal 2 binary64) (neg.f64 re)))
(/.f64 (-.f64 (.f64 (/.f64 re re) (/.f64 re re)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))))) (-.f64 (/.f64 re re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (.f64 (/.f64 (neg.f64 re) re) (/.f64 (neg.f64 re) re))) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (/.f64 (neg.f64 re) re)))
(/.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (.f64 (-.f64 (/.f64 (neg.f64 re) re) #s(literal 1 binary64)) (-.f64 (/.f64 (neg.f64 re) re) #s(literal 1 binary64)))) (+.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (-.f64 (/.f64 (neg.f64 re) re) #s(literal 1 binary64))))
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (.f64 #s(literal -1 binary64) #s(literal -1 binary64))) (+.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal -1 binary64)))
(/.f64 (+.f64 (pow.f64 (/.f64 re re) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 re re) (/.f64 re re)) (-.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (.f64 (/.f64 re re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)))))))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal 3 binary64)) (pow.f64 (/.f64 (neg.f64 re) re) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (+.f64 (.f64 (/.f64 (neg.f64 re) re) (/.f64 (neg.f64 re) re)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (/.f64 (neg.f64 re) re)))))
(/.f64 (-.f64 (pow.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) #s(literal 3 binary64)) (pow.f64 (-.f64 (/.f64 (neg.f64 re) re) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (+.f64 (.f64 (-.f64 (/.f64 (neg.f64 re) re) #s(literal 1 binary64)) (-.f64 (/.f64 (neg.f64 re) re) #s(literal 1 binary64))) (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (-.f64 (/.f64 (neg.f64 re) re) #s(literal 1 binary64))))))
(/.f64 (-.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal 3 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (+.f64 (.f64 #s(literal -1 binary64) #s(literal -1 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal -1 binary64)))))
(/.f64 (+.f64 (.f64 re re) (.f64 (neg.f64 re) (.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) #s(literal 1 binary64)))) (*.f64 re re))
(/.f64 (+.f64 (.f64 re re) (.f64 (neg.f64 re) (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (neg.f64 re)) re))) (*.f64 re re))
(/.f64 (+.f64 (.f64 (neg.f64 re) (.f64 re re)) (.f64 (neg.f64 re) (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (neg.f64 re)) (.f64 re re)))) (.f64 (neg.f64 re) (.f64 re re)))
(/.f64 (+.f64 (.f64 (neg.f64 re) re) (.f64 (neg.f64 re) (-.f64 re (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))))) (.f64 (neg.f64 re) re))
(/.f64 (+.f64 (.f64 re re) (.f64 (neg.f64 re) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re))) (.f64 re re))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 re) #s(literal 2 binary64))) (*.f64 (neg.f64 re) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (neg.f64 re)) re) #s(literal 2 binary64)) (.f64 (neg.f64 re) #s(literal 2 binary64))) (*.f64 (neg.f64 re) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (neg.f64 re)) (.f64 re re)) #s(literal 2 binary64)) (.f64 (.f64 re re) #s(literal 2 binary64))) (.f64 (.f64 re re) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (-.f64 re (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) #s(literal 2 binary64)) (.f64 re #s(literal 2 binary64))) (.f64 re #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) #s(literal 2 binary64)) (.f64 (neg.f64 re) #s(literal 2 binary64))) (.f64 (neg.f64 re) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) #s(literal 1 binary64)))) (*.f64 #s(literal 2 binary64) (neg.f64 re)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (.f64 #s(literal 2 binary64) (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (neg.f64 re)) re))) (*.f64 #s(literal 2 binary64) (neg.f64 re)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 re re)) (.f64 #s(literal 2 binary64) (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) (neg.f64 re)) (.f64 re re)))) (.f64 #s(literal 2 binary64) (.f64 re re)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) re) (.f64 #s(literal 2 binary64) (-.f64 re (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) re))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (.f64 #s(literal 2 binary64) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re))) (.f64 #s(literal 2 binary64) (neg.f64 re)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (neg.f64 re)) (.f64 #s(literal 2 binary64) (-.f64 re (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))))) (.f64 #s(literal 2 binary64) (neg.f64 re)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) re) (.f64 #s(literal 2 binary64) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re))) (.f64 #s(literal 2 binary64) re))
(/.f64 (.f64 (.f64 (neg.f64 re) (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re)) #s(literal -1 binary64)) (.f64 (neg.f64 re) re))
(/.f64 (.f64 (.f64 (neg.f64 re) (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re)) #s(literal 1 binary64)) (.f64 re re))
(/.f64 (.f64 (.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re) (neg.f64 re)) #s(literal -1 binary64)) (.f64 (neg.f64 re) re))
(/.f64 (.f64 (.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re) (neg.f64 re)) #s(literal 1 binary64)) (.f64 re re))
(/.f64 (neg.f64 (-.f64 (.f64 #s(literal 1 binary64) re) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re))) (neg.f64 re))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) re) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re)) re)
(/.f64 (-.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal 1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (/.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re) (/.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re))) (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re)))
(/.f64 (+.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (+.f64 (.f64 (/.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re) (/.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re)) (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re)))))
(/.f64 (-.f64 re (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re)) (.f64 #s(literal 1 binary64) re))
(/.f64 (-.f64 re (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re)) re)
(/.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re) (neg.f64 re))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))))) (-.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (-.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)))))))
(/.f64 #s(literal 1 binary64) (/.f64 re (-.f64 (.f64 #s(literal 1 binary64) re) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re))))
(/.f64 #s(literal 1 binary64) (/.f64 re (-.f64 re (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 re) (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re)))
(neg.f64 (-.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)))))
(-.f64 (/.f64 re re) (.f64 (/.f64 #s(literal 1 binary64) re) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re)))
(-.f64 (/.f64 re re) (.f64 (neg.f64 (/.f64 #s(literal -1 binary64) re)) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re)))
(-.f64 (/.f64 re re) (/.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re))
(-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (-.f64 (/.f64 (neg.f64 re) re) #s(literal 1 binary64)))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal -1 binary64))
(-.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (/.f64 (neg.f64 re) re))
(-.f64 #s(literal 1 binary64) (.f64 (/.f64 #s(literal 1 binary64) re) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re)))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 (/.f64 #s(literal -1 binary64) re)) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re)))
(-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re))
(+.f64 (/.f64 (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (neg.f64 re)) (/.f64 re re))
(+.f64 (/.f64 re re) (/.f64 (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (neg.f64 re)))
(+.f64 (/.f64 re re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re))))
(+.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (neg.f64 (-.f64 (/.f64 (neg.f64 re) re) #s(literal 1 binary64))))
(+.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (neg.f64 (/.f64 (neg.f64 re) re)))
(+.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (/.f64 re re))
(+.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 (-.f64 re (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) (neg.f64 (/.f64 #s(literal -1 binary64) re))))
(+.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (neg.f64 re)))
(+.f64 #s(literal 1 binary64) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 re) (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))))) (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 re) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re))) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 re (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re))) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re))
(.f64 (/.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re) #s(literal 1 binary64)) (/.f64 re re))
(.f64 (/.f64 (neg.f64 re) #s(literal 1 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal -1 binary64)))
(.f64 (.f64 (neg.f64 re) (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re)) (/.f64 #s(literal -1 binary64) re))
(.f64 (.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re) (neg.f64 re)) (/.f64 #s(literal -1 binary64) re))
(.f64 (-.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) re)
(.f64 (/.f64 re re) (/.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re) #s(literal 1 binary64)))
(.f64 (neg.f64 (sqrt.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re))) (neg.f64 (sqrt.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re))))
(.f64 (sqrt.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re)) (sqrt.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re)))
(.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal -1 binary64)) (/.f64 (neg.f64 re) #s(literal 1 binary64)))
(.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal -1 binary64)) (neg.f64 re))
(.f64 (neg.f64 re) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal -1 binary64)))
(pow.f64 (.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re) (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re)) #s(literal 1/2 binary64))
(pow.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re) #s(literal 1 binary64))
(pow.f64 (sqrt.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re)) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))))) (.f64 re re)) (-.f64 (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (neg.f64 re)))
(/.f64 (-.f64 (.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re)) (.f64 re re)) (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) (neg.f64 re)))
(/.f64 (-.f64 (.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re)) (.f64 re re)) (+.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re))
(/.f64 (-.f64 (.f64 re re) (.f64 (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))))) (-.f64 (neg.f64 re) (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))))))
(/.f64 (-.f64 (.f64 re re) (.f64 (-.f64 re (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) (-.f64 re (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))))) (+.f64 (neg.f64 re) (-.f64 re (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) #s(literal 3 binary64)) (pow.f64 (neg.f64 re) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))))) (-.f64 (.f64 re re) (.f64 (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (neg.f64 re)))))
(/.f64 (+.f64 (pow.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) #s(literal 3 binary64)) (pow.f64 (neg.f64 re) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re)) (-.f64 (.f64 re re) (.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) (neg.f64 re)))))
(/.f64 (+.f64 (pow.f64 (neg.f64 re) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) #s(literal 3 binary64))) (+.f64 (.f64 re re) (-.f64 (.f64 (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))))) (.f64 (neg.f64 re) (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re))))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re)) (+.f64 (.f64 re re) (.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re))))
(/.f64 (-.f64 (pow.f64 (neg.f64 re) #s(literal 3 binary64)) (pow.f64 (-.f64 re (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (.f64 re re) (+.f64 (.f64 (-.f64 re (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64))) (-.f64 re (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)))) (.f64 (neg.f64 re) (-.f64 re (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (.f64 (neg.f64 re) (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re))) re)
(/.f64 (neg.f64 (.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re) (neg.f64 re))) re)
(/.f64 (.f64 (neg.f64 re) (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re)) (neg.f64 re))
(/.f64 (.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re) (neg.f64 re)) (neg.f64 re))
(/.f64 (-.f64 (.f64 re re) (.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re))) (-.f64 (neg.f64 re) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re)))
(/.f64 (+.f64 (pow.f64 (neg.f64 re) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) #s(literal 3 binary64))) (+.f64 (.f64 re re) (-.f64 (.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re)) (.f64 (neg.f64 re) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 re) (.f64 (neg.f64 re) (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re))))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 re) (.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re) (neg.f64 re))))
(neg.f64 (-.f64 re (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re)))
(-.f64 (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (.f64 (.f64 #s(literal 1 binary64) re) #s(literal 1 binary64)))
(-.f64 (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (*.f64 #s(literal -1 binary64) (neg.f64 re)))
(-.f64 (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (*.f64 re #s(literal 1 binary64)))
(-.f64 (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (*.f64 #s(literal 1 binary64) re))
(-.f64 (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) re)
(-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) (.f64 (*.f64 #s(literal 1 binary64) re) #s(literal 1 binary64)))
(-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) (.f64 #s(literal -1 binary64) (neg.f64 re)))
(-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) (.f64 re #s(literal 1 binary64)))
(-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) (.f64 #s(literal 1 binary64) re))
(-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re)
(-.f64 (neg.f64 re) (.f64 (.f64 #s(literal 1 binary64) re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re)))))
(-.f64 (neg.f64 re) (.f64 re (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))))
(-.f64 (neg.f64 re) (.f64 (/.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re) (neg.f64 re)))
(-.f64 (neg.f64 re) (neg.f64 (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))))))
(-.f64 (neg.f64 re) (-.f64 re (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64))))
(sqrt.f64 (.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re) (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re)))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re))) (sqrt.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re))))
(fabs.f64 (.f64 (sqrt.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re)) (neg.f64 (sqrt.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re)))))
(fabs.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re))
(+.f64 (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (neg.f64 re))
(+.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) (neg.f64 re))
(+.f64 (neg.f64 re) (.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) #s(literal 1 binary64)))
(+.f64 (neg.f64 re) (.f64 (neg.f64 re) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))))
(+.f64 (neg.f64 re) (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)) (neg.f64 re)) re))
(+.f64 (neg.f64 re) (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re))
(.f64 (sqrt.f64 (sqrt.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re))) (sqrt.f64 (sqrt.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re))))
(.f64 (sqrt.f64 (-.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))))) (sqrt.f64 re))
(.f64 (pow.f64 (-.f64 #s(literal -1 binary64) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) #s(literal 1/2 binary64)) (pow.f64 re #s(literal 1/2 binary64)))
(.f64 (pow.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 re) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (neg.f64 re) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (neg.f64 re)) (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal -1 binary64))))
(.f64 (sqrt.f64 (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal -1 binary64))) (sqrt.f64 (neg.f64 re)))
(pow.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (.f64 (neg.f64 re) (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re))) (sqrt.f64 (neg.f64 re)))
(/.f64 (sqrt.f64 (.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re) (neg.f64 re))) (sqrt.f64 (neg.f64 re)))
(sqrt.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re)))))
(fabs.f64 (neg.f64 (sqrt.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re))))
(fabs.f64 (sqrt.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re)))
(exp.f64 (.f64 (log.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re)) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re)) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (-.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #s(literal 2 binary64)) re) re)))

eval187.0ms (3.8%)

Memory: 16.6MiB live, 443.6MiB allocated; 64ms collecting garbage
Compiler: Compiled 48 658 to 8 828 computations (81.9% saved)

prune72.0ms (1.5%)

Memory

-37.6MiB live, 108.8MiB allocated; 11ms collecting garbage

Pruning

23 alts after pruning (20 fresh and 3 done)

	Pruned	Kept	Total
New	1 344	17	1 361
Fresh	4	3	7
Picked	5	0	5
Done	-2	3	1
Total	1 351	23	1 374

Accuracy

87.6%

Counts

1 374 → 23

Alt Table

Click to see full alt table

Status	Accuracy	Program
	52.2%	(.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im)))) (sqrt.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im))))))
	25.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 (-.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal 1 binary64))) (neg.f64 re))))
	38.7%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re)) (neg.f64 re))))
	38.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (sqrt.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) #s(literal 2 binary64)) re) (neg.f64 re))) (neg.f64 re))))
	27.8%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 re re)) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))))
	43.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 (sqrt.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (sqrt.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))) re))))
✓	43.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))
	33.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 re re) (.f64 im im))) (.f64 im im))) re))))
▶	38.7%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 1 binary64)) re))))
	4.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) #s(approx (/ (sqrt (+ ( im im) (* re re))) (neg re)) #s(literal -1 binary64))) (neg.f64 re)))))
	14.9%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (pow.f64 im #s(literal 2 binary64)) re))))
	9.9%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 2 binary64)))) (pow.f64 im #s(literal 2 binary64))) re))))
▶	4.8%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im (/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))))))))
	52.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im (+.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)))))))
▶	52.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im (.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -1 binary64)))) (-.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -1 binary64)))))))
▶	51.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64))))))
✓	26.9%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))))
▶	53.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (+.f64 (.f64 #s(literal -2 binary64) re) (.f64 #s(literal 2 binary64) im))))))
	48.9%	(.f64 #s(literal 1/2 binary64) (exp.f64 (.f64 (log.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im))) #s(literal 1/2 binary64))))
	50.8%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 im (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) im))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) im)))))))
✓	51.0%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (*.f64 im (sqrt.f64 (/.f64 #s(literal 2 binary64) im)))))
	47.7%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 im (exp.f64 (.f64 (log.f64 (/.f64 #s(literal 2 binary64) im)) #s(literal 1/2 binary64))))))
	51.1%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 im #s(approx (sqrt (/ 2 im)) (/.f64 (sqrt.f64 (.f64 #s(literal 2 binary64) im)) im)))))

Compiler

Compiled 1 282 to 806 computations (37.1% saved)

sample0.0ms (0.0%)

Memory

1.0MiB live, 1.0MiB allocated; 0ms collecting garbage

Calls

Call 1

Inputs
1/2
-2
2
1
-1
(* 1 1)

Outputs
#s(literal 1/2 binary64)
#s(literal -2 binary64)
#s(literal 2 binary64)
#s(literal 1 binary64)
#s(literal -1 binary64)
#s(literal 1 binary64)

Samples

0.0ms

1×

valid

Compiler

Compiled 10 to 8 computations (20.0% saved)

Precisions

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

adjust: 0.0ms (0.0% of total)

series121.0ms (2.5%)

Memory

33.6MiB live, 460.5MiB allocated; 48ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	1312	10328

Stop Event

1×	iter-limit

Counts

51 → 265

Calls

Call 1

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

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

Calls

6 calls:

Time	Variable	Point
12.0ms	re	0
11.0ms	im	0
7.0ms	re	inf
6.0ms	re	-inf
5.0ms	im	inf

rewrite231.0ms (4.7%)

Memory

-39.9MiB live, 646.3MiB allocated; 102ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	61	760
0	100	654
1	413	624
2	1817	624
0	4349	534

Stop Event

1×	iter-limit
1×	node-limit
1×	iter-limit

Counts

51 → 1 117

Calls

Call 1

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

Outputs
#s(literal 1/2 binary64)
re
im
#s(literal -2 binary64)
(*.f64 #s(literal -2 binary64) re)
(*.f64 re #s(literal -2 binary64))
(*.f64 #s(literal 2 binary64) (neg.f64 re))
(neg.f64 (+.f64 re re))
(-.f64 (neg.f64 re) re)
(+.f64 (neg.f64 re) (neg.f64 re))
#s(literal 2 binary64)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 im im)) im)
(*.f64 im #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) im)
(/.f64 (-.f64 (.f64 im im) (.f64 im im)) (-.f64 im im))
(/.f64 (+.f64 (pow.f64 im #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (+.f64 (.f64 im im) (-.f64 (.f64 im im) (*.f64 im im))))
(neg.f64 (*.f64 #s(literal -2 binary64) im))
(-.f64 im (neg.f64 im))
(+.f64 im im)
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -2 binary64) re) (+.f64 im im))) (+.f64 im im))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 #s(literal -2 binary64) im) (.f64 #s(literal -2 binary64) re))) (.f64 #s(literal -2 binary64) re))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (+.f64 im im) (.f64 #s(literal -2 binary64) re))) (*.f64 #s(literal -2 binary64) re))
(*.f64 #s(literal -2 binary64) (-.f64 re im))
(/.f64 (-.f64 (.f64 (+.f64 im im) (+.f64 im im)) (.f64 (.f64 #s(literal -2 binary64) re) (.f64 #s(literal -2 binary64) re))) (-.f64 (+.f64 im im) (*.f64 #s(literal -2 binary64) re)))
(/.f64 (-.f64 (.f64 (.f64 #s(literal -2 binary64) re) (.f64 #s(literal -2 binary64) re)) (.f64 (.f64 #s(literal -2 binary64) im) (.f64 #s(literal -2 binary64) im))) (+.f64 (.f64 #s(literal -2 binary64) re) (.f64 #s(literal -2 binary64) im)))
(/.f64 (+.f64 (pow.f64 (+.f64 im im) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -2 binary64) re) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 im im) (+.f64 im im)) (-.f64 (.f64 (.f64 #s(literal -2 binary64) re) (.f64 #s(literal -2 binary64) re)) (.f64 (+.f64 im im) (*.f64 #s(literal -2 binary64) re)))))
(/.f64 (-.f64 (pow.f64 (.f64 #s(literal -2 binary64) re) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -2 binary64) im) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(literal -2 binary64) re) (.f64 #s(literal -2 binary64) re)) (+.f64 (.f64 (.f64 #s(literal -2 binary64) im) (.f64 #s(literal -2 binary64) im)) (.f64 (.f64 #s(literal -2 binary64) re) (*.f64 #s(literal -2 binary64) im)))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal -2 binary64) re) (.f64 #s(literal -2 binary64) re)) (.f64 (+.f64 im im) (+.f64 im im))) (-.f64 (*.f64 #s(literal -2 binary64) re) (+.f64 im im)))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal -2 binary64) re) #s(literal 3 binary64)) (pow.f64 (+.f64 im im) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 #s(literal -2 binary64) re) (.f64 #s(literal -2 binary64) re)) (-.f64 (.f64 (+.f64 im im) (+.f64 im im)) (.f64 (*.f64 #s(literal -2 binary64) re) (+.f64 im im)))))
(neg.f64 (-.f64 (.f64 #s(literal -2 binary64) im) (.f64 #s(literal -2 binary64) re)))
(-.f64 (+.f64 im im) (*.f64 (neg.f64 re) #s(literal -2 binary64)))
(-.f64 (+.f64 im im) (+.f64 re re))
(-.f64 (.f64 #s(literal -2 binary64) re) (.f64 #s(literal -2 binary64) im))
(+.f64 (+.f64 (*.f64 #s(literal -2 binary64) re) im) im)
(+.f64 (+.f64 im im) (*.f64 #s(literal -2 binary64) re))
(+.f64 (*.f64 #s(literal -2 binary64) re) (+.f64 im im))
(+.f64 im (-.f64 im (+.f64 re re)))
#s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 #s(literal -2 binary64) (-.f64 re im)))
(.f64 (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (.f64 #s(literal -2 binary64) (-.f64 re im)))))) (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 #s(literal -2 binary64) (-.f64 re im)))))))
(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (.f64 #s(literal -2 binary64) (-.f64 re im))))) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 #s(literal -2 binary64) (-.f64 re im))))))
(pow.f64 (.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (.f64 #s(literal -2 binary64) (-.f64 re im)))) #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 #s(literal -2 binary64) (-.f64 re im))))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 #s(literal -2 binary64) (-.f64 re im))))) #s(literal 2 binary64))
(pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 #s(literal -2 binary64) (-.f64 re im)))) #s(literal 1 binary64))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 #s(literal -2 binary64) (-.f64 re im))))
(sqrt.f64 (.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (.f64 #s(literal -2 binary64) (-.f64 re im)))) #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 #s(literal -2 binary64) (-.f64 re im))))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (.f64 #s(literal -2 binary64) (-.f64 re im)))))) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 #s(literal -2 binary64) (-.f64 re im)))))))
(fabs.f64 (.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (.f64 #s(literal -2 binary64) (-.f64 re im))))) (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 #s(literal -2 binary64) (-.f64 re im))))))))
(fabs.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 #s(literal -2 binary64) (-.f64 re im)))))
(.f64 (sqrt.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (.f64 #s(literal -2 binary64) (-.f64 re im)))))) (sqrt.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 #s(literal -2 binary64) (-.f64 re im)))))))
(.f64 (pow.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (.f64 #s(literal -2 binary64) (-.f64 re im)))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 #s(literal -2 binary64) (-.f64 re im)))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 #s(literal -2 binary64) (-.f64 re im)))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 #s(literal -2 binary64) (-.f64 re im)))))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 #s(literal -2 binary64) (-.f64 re im))))))))
(fabs.f64 (neg.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 #s(literal -2 binary64) (-.f64 re im)))))))
(fabs.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 #s(literal -2 binary64) (-.f64 re im))))))
(exp.f64 (.f64 (log.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 #s(literal -2 binary64) (-.f64 re im))))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 #s(literal -2 binary64) (-.f64 re im))))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 #s(literal -2 binary64) (-.f64 re im))))))
#s(approx (+ 2 (* -2 (/ re im))) #s(literal 2 binary64))
(.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im)
(.f64 im #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)))
(.f64 (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im)))) (neg.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im)))))
(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im))) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im))))
(pow.f64 (.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im)) #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im))) #s(literal 2 binary64))
(pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im)) #s(literal 1 binary64))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im))
(sqrt.f64 (.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im)) #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im)))) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im)))))
(fabs.f64 (.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im))) (neg.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im))))))
(fabs.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im)))
(.f64 (sqrt.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im)))) (sqrt.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im)))))
(.f64 (pow.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im)) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im)))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im))))))
(fabs.f64 (neg.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im)))))
(fabs.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im))))
(exp.f64 (.f64 (log.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im))))
(*.f64 (neg.f64 (neg.f64 (fabs.f64 re))) (neg.f64 (neg.f64 (fabs.f64 re))))
(*.f64 (neg.f64 (neg.f64 (neg.f64 re))) (neg.f64 (neg.f64 (neg.f64 re))))
(*.f64 (pow.f64 (fabs.f64 re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 re) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 re) #s(literal 1 binary64)) (fabs.f64 re))
(*.f64 (pow.f64 (neg.f64 re) #s(literal 1 binary64)) (pow.f64 (neg.f64 re) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 re) #s(literal 1 binary64)) (neg.f64 re))
(*.f64 (pow.f64 re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 re)))
(*.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 re)))
(*.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)))
(*.f64 (pow.f64 re #s(literal 1 binary64)) re)
(*.f64 (fabs.f64 re) (fabs.f64 re))
(*.f64 (neg.f64 re) (neg.f64 re))
(*.f64 re re)
(pow.f64 (neg.f64 (fabs.f64 re)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 re)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 re) #s(literal 2 binary64))
(pow.f64 (neg.f64 re) #s(literal 2 binary64))
(pow.f64 (*.f64 re re) #s(literal 1 binary64))
(pow.f64 re #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 re) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 re) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) re))
(/.f64 (pow.f64 re #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) re))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 re) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 re) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal -2 binary64)))
(neg.f64 (*.f64 re (neg.f64 re)))
(neg.f64 (*.f64 (neg.f64 re) re))
(sqrt.f64 (.f64 (.f64 re re) (*.f64 re re)))
(fabs.f64 (*.f64 re (neg.f64 re)))
(fabs.f64 (*.f64 (neg.f64 re) re))
(fabs.f64 (neg.f64 (*.f64 re re)))
(fabs.f64 (*.f64 re re))
(exp.f64 (*.f64 (log.f64 (fabs.f64 re)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 re)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 re) #s(literal 2 binary64)))
(*.f64 (neg.f64 (neg.f64 (fabs.f64 im))) (neg.f64 (neg.f64 (fabs.f64 im))))
(*.f64 (neg.f64 (neg.f64 (neg.f64 im))) (neg.f64 (neg.f64 (neg.f64 im))))
(*.f64 (pow.f64 (fabs.f64 im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 im) #s(literal 1 binary64)) (fabs.f64 im))
(*.f64 (pow.f64 (neg.f64 im) #s(literal 1 binary64)) (pow.f64 (neg.f64 im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 im) #s(literal 1 binary64)) (neg.f64 im))
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (.f64 im im))
(.f64 (.f64 #s(literal -1 binary64) im) (*.f64 #s(literal -1 binary64) im))
(*.f64 (pow.f64 im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 im)))
(*.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 im)))
(*.f64 (pow.f64 im #s(literal 1 binary64)) (pow.f64 im #s(literal 1 binary64)))
(*.f64 (pow.f64 im #s(literal 1 binary64)) im)
(*.f64 (fabs.f64 im) (fabs.f64 im))
(*.f64 (neg.f64 im) (neg.f64 im))
(.f64 (.f64 im im) (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(*.f64 im im)
(pow.f64 (neg.f64 (fabs.f64 im)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 im)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 im) #s(literal 2 binary64))
(pow.f64 (neg.f64 im) #s(literal 2 binary64))
(pow.f64 (*.f64 im im) #s(literal 1 binary64))
(pow.f64 im #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 im) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 im) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) im))
(/.f64 (pow.f64 im #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) im))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 im) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 im) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal -2 binary64)))
(neg.f64 (*.f64 (neg.f64 im) im))
(sqrt.f64 (.f64 (.f64 im im) (*.f64 im im)))
(fabs.f64 (*.f64 (neg.f64 im) im))
(fabs.f64 (*.f64 im im))
(exp.f64 (*.f64 (log.f64 (fabs.f64 im)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 im)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 im) #s(literal 2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 re re) (.f64 im im))) (.f64 im im))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 im) im) (.f64 re re))) (.f64 re re))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 im im) (.f64 re re))) (.f64 re re))
(.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))
(.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))
(pow.f64 (.f64 (+.f64 (.f64 im im) (.f64 re re)) (+.f64 (.f64 im im) (*.f64 re re))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal 2 binary64))
(pow.f64 (+.f64 (.f64 im im) (.f64 re re)) #s(literal 1 binary64))
(/.f64 (-.f64 (.f64 (.f64 im im) (.f64 im im)) (.f64 (.f64 re re) (.f64 re re))) (-.f64 (.f64 im im) (.f64 re re)))
(/.f64 (-.f64 (.f64 (.f64 re re) (.f64 re re)) (.f64 (.f64 (neg.f64 im) im) (.f64 (neg.f64 im) im))) (+.f64 (.f64 re re) (.f64 (neg.f64 im) im)))
(/.f64 (+.f64 (pow.f64 (.f64 im im) #s(literal 3 binary64)) (pow.f64 (.f64 re re) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 im im) (.f64 im im)) (-.f64 (.f64 (.f64 re re) (.f64 re re)) (.f64 (.f64 im im) (*.f64 re re)))))
(/.f64 (-.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 im) im) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 re re) (.f64 re re)) (+.f64 (.f64 (.f64 (neg.f64 im) im) (.f64 (neg.f64 im) im)) (.f64 (.f64 re re) (*.f64 (neg.f64 im) im)))))
(/.f64 (-.f64 (.f64 (.f64 re re) (.f64 re re)) (.f64 (.f64 im im) (.f64 im im))) (-.f64 (.f64 re re) (.f64 im im)))
(/.f64 (+.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) (pow.f64 (.f64 im im) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 re re) (.f64 re re)) (-.f64 (.f64 (.f64 im im) (.f64 im im)) (.f64 (.f64 re re) (*.f64 im im)))))
(neg.f64 (-.f64 (.f64 (neg.f64 im) im) (.f64 re re)))
(-.f64 (.f64 im im) (.f64 re (neg.f64 re)))
(-.f64 (.f64 im im) (.f64 (neg.f64 (fabs.f64 re)) (fabs.f64 re)))
(-.f64 (.f64 im im) (.f64 (neg.f64 (neg.f64 re)) (neg.f64 re)))
(-.f64 (.f64 im im) (.f64 (neg.f64 re) re))
(-.f64 (.f64 im im) (neg.f64 (.f64 re re)))
(-.f64 (.f64 re re) (.f64 (neg.f64 im) im))
(sqrt.f64 (.f64 (+.f64 (.f64 im im) (.f64 re re)) (+.f64 (.f64 im im) (*.f64 re re))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))
(fabs.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))))
(fabs.f64 (+.f64 (.f64 im im) (.f64 re re)))
(+.f64 (.f64 im im) (.f64 re re))
(+.f64 (.f64 re re) (.f64 (neg.f64 (neg.f64 im)) im))
(+.f64 (.f64 re re) (.f64 im im))
(.f64 (sqrt.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (sqrt.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))
(.f64 (pow.f64 (+.f64 (.f64 im im) (.f64 re re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (.f64 im im) (*.f64 re re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 (+.f64 (.f64 im im) (.f64 re re)) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))))
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))
(fabs.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))
(exp.f64 (.f64 (log.f64 (+.f64 (.f64 im im) (*.f64 re re))) #s(literal 1/2 binary64)))
(.f64 (/.f64 #s(literal 1 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))
(.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) (/.f64 #s(literal -1 binary64) re))
(.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) (/.f64 #s(literal 1 binary64) re))
(/.f64 (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) #s(literal 1 binary64))) (neg.f64 re))
(/.f64 (neg.f64 (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) (neg.f64 (neg.f64 (neg.f64 re))))
(/.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) #s(literal 1 binary64)) re)
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) (neg.f64 (neg.f64 re)))
(/.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (neg.f64 re))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 re) (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))))
(/.f64 #s(literal 1 binary64) (/.f64 re (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))
(/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re)
(neg.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) (neg.f64 re)))
(neg.f64 (/.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) re))
#s(literal 1 binary64)
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re))) (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re))) (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re))
(/.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal 1 binary64)) (E.f64)) (.f64 re (E.f64))) (.f64 re (E.f64)))
(/.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal 1 binary64)) #s(literal 2 binary64)) (+.f64 re re)) (+.f64 re re))
(/.f64 (-.f64 (.f64 (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) (E.f64)) (.f64 (neg.f64 (neg.f64 re)) (E.f64))) (*.f64 (neg.f64 (neg.f64 re)) (E.f64)))
(/.f64 (-.f64 (.f64 (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) #s(literal 2 binary64)) (.f64 (neg.f64 (neg.f64 re)) #s(literal 2 binary64))) (*.f64 (neg.f64 (neg.f64 re)) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (E.f64)) (.f64 (neg.f64 re) (E.f64))) (*.f64 (neg.f64 re) (E.f64)))
(/.f64 (-.f64 (.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (.f64 (neg.f64 re) #s(literal 2 binary64))) (*.f64 (neg.f64 re) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) (E.f64)) (.f64 re (E.f64))) (*.f64 re (E.f64)))
(/.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) #s(literal 2 binary64)) (+.f64 re re)) (+.f64 re re))
(/.f64 (-.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re)) (.f64 #s(literal -1 binary64) #s(literal -1 binary64))) (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal -1 binary64)))
(/.f64 (+.f64 (pow.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 3 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re)) (-.f64 (.f64 #s(literal -1 binary64) #s(literal -1 binary64)) (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal -1 binary64)))))
(/.f64 (-.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re)) #s(literal 1 binary64)) (+.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re)) (+.f64 #s(literal 1 binary64) (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 1 binary64)))))
(neg.f64 (-.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re)))
(-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 1 binary64))
(+.f64 #s(literal -1 binary64) (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re))
(+.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal -1 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 re (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))
(.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 1 binary64)) re)
(.f64 re (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 1 binary64)))
(/.f64 (-.f64 (+.f64 (.f64 im im) (.f64 re re)) (.f64 re re)) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) (neg.f64 re)))
(/.f64 (-.f64 (+.f64 (.f64 im im) (.f64 re re)) (.f64 re re)) (+.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal 3 binary64)) (pow.f64 (neg.f64 re) #s(literal 3 binary64))) (+.f64 (+.f64 (.f64 im im) (.f64 re re)) (-.f64 (.f64 re re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) (neg.f64 re)))))
(/.f64 (-.f64 (pow.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (+.f64 (+.f64 (.f64 im im) (.f64 re re)) (+.f64 (.f64 re re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re))))
(neg.f64 (.f64 re (-.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re))))
(neg.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))
(-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) (neg.f64 (neg.f64 re)))
(-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re)
(+.f64 (.f64 re (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re)) (.f64 re #s(literal -1 binary64)))
(+.f64 (.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) re) (.f64 #s(literal -1 binary64) re))
(+.f64 (neg.f64 re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))
(+.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) (neg.f64 re))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re))) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re))
(.f64 (neg.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64)))))
(.f64 (.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 1 binary64)) #s(literal 2 binary64)) re)
(.f64 (+.f64 re re) (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 1 binary64)))
(.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 2 binary64))) (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64))))
(.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64))
(.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 1 binary64)) (+.f64 re re))
(.f64 re (.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 1 binary64)) #s(literal 2 binary64)))
(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re))
(pow.f64 (.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 2 binary64)) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64))) #s(literal 2 binary64))
(pow.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64)) #s(literal 1 binary64))
(/.f64 (-.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re)) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re))) (-.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re)))
(/.f64 (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 3 binary64)) (pow.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re)) (-.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re)) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re)))))
(neg.f64 (.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 2 binary64)))
(neg.f64 (.f64 #s(literal -2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re)))
(neg.f64 (.f64 #s(literal 2 binary64) (-.f64 re (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))))
(neg.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal -2 binary64)))
(neg.f64 (+.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (-.f64 re (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))))
(-.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) re)
(-.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (.f64 (neg.f64 re) (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 1 binary64))))
(-.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (-.f64 re (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))
(-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) (-.f64 re (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re)))
(sqrt.f64 (.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 2 binary64)) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 2 binary64)))) (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64)))))
(fabs.f64 (.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 2 binary64))) (neg.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64))))))
(fabs.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64)))
(+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (neg.f64 re))
(+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (.f64 #s(literal -2 binary64) re))
(+.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 1 binary64)) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 1 binary64)))
(+.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal 2 binary64)) (.f64 (neg.f64 re) #s(literal 2 binary64)))
(+.f64 (.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re)) (.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re)))
(+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re))
(+.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) (+.f64 (neg.f64 re) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re)))
(.f64 (sqrt.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 2 binary64)))) (sqrt.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64)))))
(.f64 (sqrt.f64 (+.f64 re re)) (sqrt.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 1 binary64))))
(.f64 (sqrt.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 1 binary64))) (sqrt.f64 (+.f64 re re)))
(.f64 (pow.f64 (+.f64 re re) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 1 binary64)) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 1 binary64)) #s(literal 1/2 binary64)) (pow.f64 (+.f64 re re) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (sqrt.f64 re) (sqrt.f64 (.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 1 binary64)) #s(literal 2 binary64))))
(.f64 (sqrt.f64 (.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 1 binary64)) #s(literal 2 binary64))) (sqrt.f64 re))
(.f64 (pow.f64 re #s(literal 1/2 binary64)) (pow.f64 (.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 1 binary64)) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 re #s(literal 1/2 binary64)))
(.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 1/2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re)) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re)))
(pow.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64)))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64))))))
(fabs.f64 (neg.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64)))))
(fabs.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64))))
(exp.f64 (.f64 (log.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) im) re)
(*.f64 (neg.f64 re) (/.f64 #s(literal -1 binary64) im))
(*.f64 re (/.f64 #s(literal 1 binary64) im))
(/.f64 (neg.f64 (*.f64 re #s(literal 1 binary64))) (neg.f64 im))
(/.f64 (neg.f64 (neg.f64 (neg.f64 re))) (neg.f64 (neg.f64 (neg.f64 im))))
(/.f64 (*.f64 re #s(literal 1 binary64)) im)
(/.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 im)))
(/.f64 (neg.f64 re) (neg.f64 im))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 im) (neg.f64 re)))
(/.f64 #s(literal 1 binary64) (/.f64 im re))
(/.f64 re im)
(neg.f64 (/.f64 re (neg.f64 im)))
(neg.f64 (/.f64 (neg.f64 re) im))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im))) (/.f64 (-.f64 im (+.f64 re re)) im))
(*.f64 (+.f64 re re) (neg.f64 (/.f64 #s(literal 1 binary64) im)))
(*.f64 (/.f64 re im) #s(literal -2 binary64))
(.f64 (.f64 #s(literal -2 binary64) re) (/.f64 #s(literal 1 binary64) im))
(*.f64 #s(literal -2 binary64) (/.f64 re im))
(.f64 re (.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -2 binary64)))
(*.f64 re (/.f64 #s(literal -2 binary64) im))
(/.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)) (E.f64)) (.f64 (neg.f64 im) (E.f64))) (*.f64 (neg.f64 im) (E.f64)))
(/.f64 (-.f64 (.f64 (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) im)) (*.f64 #s(literal -2 binary64) im))
(/.f64 (-.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (E.f64)) (.f64 (neg.f64 im) (E.f64))) (*.f64 (neg.f64 im) (E.f64)))
(/.f64 (-.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) im)) (*.f64 #s(literal -2 binary64) im))
(/.f64 (-.f64 (.f64 (-.f64 im (+.f64 re re)) (E.f64)) (.f64 im (E.f64))) (*.f64 im (E.f64)))
(/.f64 (-.f64 (*.f64 (-.f64 im (+.f64 re re)) #s(literal 2 binary64)) (+.f64 im im)) (+.f64 im im))
(/.f64 (neg.f64 (*.f64 #s(literal -2 binary64) (neg.f64 re))) (neg.f64 (neg.f64 im)))
(/.f64 (neg.f64 (*.f64 (neg.f64 re) #s(literal -2 binary64))) (neg.f64 (neg.f64 im)))
(/.f64 (*.f64 #s(literal -2 binary64) (neg.f64 re)) (neg.f64 im))
(/.f64 (*.f64 (neg.f64 re) #s(literal -2 binary64)) (neg.f64 im))
(/.f64 (-.f64 (pow.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im)) (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im))))
(/.f64 (/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) (+.f64 re re)) (*.f64 (neg.f64 im) im)) (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)))
(/.f64 (+.f64 re re) (neg.f64 (neg.f64 (neg.f64 im))))
(/.f64 (+.f64 re re) (*.f64 #s(literal -1 binary64) im))
(/.f64 (+.f64 re re) (neg.f64 im))
(/.f64 #s(literal 1 binary64) (/.f64 im (*.f64 #s(literal -2 binary64) re)))
(/.f64 (*.f64 #s(literal -2 binary64) re) (neg.f64 (neg.f64 im)))
(/.f64 (*.f64 #s(literal -2 binary64) re) im)
(neg.f64 (/.f64 (+.f64 re re) im))
(-.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (+.f64 (/.f64 (+.f64 re re) im) #s(literal 1 binary64)))
(+.f64 (neg.f64 (/.f64 re im)) (neg.f64 (/.f64 re im)))
(+.f64 #s(literal 0 binary64) (*.f64 (/.f64 re im) #s(literal -2 binary64)))
(+.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal -1 binary64))
(+.f64 #s(literal -1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im))
(+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 1 binary64)))
#s(literal -1 binary64)
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (/.f64 (+.f64 re re) im))) (.f64 (/.f64 re im) #s(literal -2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))) (.f64 (/.f64 re im) #s(literal -2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 re re) im) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (-.f64 im (+.f64 re re)) (/.f64 #s(literal 1 binary64) im))
(*.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im))
(/.f64 (-.f64 (.f64 im im) (.f64 im (.f64 (+.f64 re re) #s(literal 1 binary64)))) (.f64 im im))
(/.f64 (-.f64 (.f64 (neg.f64 im) im) (.f64 im (+.f64 (.f64 (/.f64 re im) (neg.f64 im)) (neg.f64 re)))) (.f64 (neg.f64 im) im))
(/.f64 (-.f64 (.f64 im im) (.f64 im (+.f64 (.f64 (/.f64 re im) im) re))) (.f64 im im))
(/.f64 (-.f64 (.f64 (neg.f64 im) im) (.f64 im (+.f64 (.f64 #s(literal 0 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)))) (*.f64 (neg.f64 im) im))
(/.f64 (-.f64 (.f64 im im) (.f64 im (+.f64 (.f64 #s(literal 0 binary64) im) (+.f64 re re)))) (.f64 im im))
(/.f64 (-.f64 (.f64 im im) (.f64 im (-.f64 im (-.f64 im (+.f64 re re))))) (*.f64 im im))
(/.f64 (-.f64 (.f64 im (.f64 im im)) (.f64 im (+.f64 (.f64 (neg.f64 re) (neg.f64 im)) (.f64 (neg.f64 re) (neg.f64 im))))) (.f64 im (*.f64 im im)))
(/.f64 (-.f64 (.f64 im (.f64 (neg.f64 im) im)) (.f64 im (+.f64 (.f64 (neg.f64 re) im) (.f64 re (neg.f64 im))))) (.f64 im (*.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (.f64 im (.f64 (neg.f64 im) im)) (.f64 im (+.f64 (.f64 re (neg.f64 im)) (.f64 (neg.f64 re) im)))) (.f64 im (*.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (.f64 im (.f64 im im)) (.f64 im (+.f64 (.f64 re im) (.f64 re im)))) (.f64 im (*.f64 im im)))
(/.f64 (-.f64 (.f64 im (.f64 im im)) (.f64 im (+.f64 (.f64 (neg.f64 re) (neg.f64 im)) (.f64 (neg.f64 im) (neg.f64 re))))) (.f64 im (*.f64 im im)))
(/.f64 (-.f64 (.f64 im (.f64 (neg.f64 im) im)) (.f64 im (+.f64 (.f64 (neg.f64 re) im) (.f64 (neg.f64 im) re)))) (.f64 im (*.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (.f64 im (.f64 (neg.f64 im) im)) (.f64 im (+.f64 (.f64 re (neg.f64 im)) (.f64 im (neg.f64 re))))) (.f64 im (*.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (.f64 im (.f64 im im)) (.f64 im (+.f64 (.f64 re im) (.f64 im re)))) (.f64 im (*.f64 im im)))
(/.f64 (-.f64 (.f64 im (neg.f64 (neg.f64 im))) (.f64 im (+.f64 re re))) (*.f64 im (neg.f64 (neg.f64 im))))
(/.f64 (-.f64 (.f64 im im) (.f64 im (+.f64 re re))) (*.f64 im im))
(/.f64 (-.f64 (.f64 (neg.f64 im) im) (.f64 im (.f64 #s(literal -2 binary64) re))) (.f64 (neg.f64 im) im))
(/.f64 (-.f64 (.f64 (E.f64) im) (.f64 (E.f64) (.f64 (+.f64 re re) #s(literal 1 binary64)))) (.f64 (E.f64) im))
(/.f64 (-.f64 (.f64 (E.f64) (neg.f64 im)) (.f64 (E.f64) (+.f64 (.f64 (/.f64 re im) (neg.f64 im)) (neg.f64 re)))) (.f64 (E.f64) (neg.f64 im)))
(/.f64 (-.f64 (.f64 (E.f64) im) (.f64 (E.f64) (+.f64 (.f64 (/.f64 re im) im) re))) (.f64 (E.f64) im))
(/.f64 (-.f64 (.f64 (E.f64) (neg.f64 im)) (.f64 (E.f64) (+.f64 (.f64 #s(literal 0 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)))) (*.f64 (E.f64) (neg.f64 im)))
(/.f64 (-.f64 (.f64 (E.f64) im) (.f64 (E.f64) (+.f64 (.f64 #s(literal 0 binary64) im) (+.f64 re re)))) (.f64 (E.f64) im))
(/.f64 (-.f64 (.f64 (E.f64) im) (.f64 (E.f64) (-.f64 im (-.f64 im (+.f64 re re))))) (*.f64 (E.f64) im))
(/.f64 (-.f64 (.f64 (E.f64) (.f64 im im)) (.f64 (E.f64) (+.f64 (.f64 (neg.f64 re) (neg.f64 im)) (.f64 (neg.f64 re) (neg.f64 im))))) (.f64 (E.f64) (*.f64 im im)))
(/.f64 (-.f64 (.f64 (E.f64) (.f64 (neg.f64 im) im)) (.f64 (E.f64) (+.f64 (.f64 (neg.f64 re) im) (.f64 re (neg.f64 im))))) (.f64 (E.f64) (*.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (.f64 (E.f64) (.f64 (neg.f64 im) im)) (.f64 (E.f64) (+.f64 (.f64 re (neg.f64 im)) (.f64 (neg.f64 re) im)))) (.f64 (E.f64) (*.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (.f64 (E.f64) (.f64 im im)) (.f64 (E.f64) (+.f64 (.f64 re im) (.f64 re im)))) (.f64 (E.f64) (*.f64 im im)))
(/.f64 (-.f64 (.f64 (E.f64) (.f64 im im)) (.f64 (E.f64) (+.f64 (.f64 (neg.f64 re) (neg.f64 im)) (.f64 (neg.f64 im) (neg.f64 re))))) (.f64 (E.f64) (*.f64 im im)))
(/.f64 (-.f64 (.f64 (E.f64) (.f64 (neg.f64 im) im)) (.f64 (E.f64) (+.f64 (.f64 (neg.f64 re) im) (.f64 (neg.f64 im) re)))) (.f64 (E.f64) (*.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (.f64 (E.f64) (.f64 (neg.f64 im) im)) (.f64 (E.f64) (+.f64 (.f64 re (neg.f64 im)) (.f64 im (neg.f64 re))))) (.f64 (E.f64) (*.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (.f64 (E.f64) (.f64 im im)) (.f64 (E.f64) (+.f64 (.f64 re im) (.f64 im re)))) (.f64 (E.f64) (*.f64 im im)))
(/.f64 (-.f64 (.f64 (E.f64) (neg.f64 (neg.f64 im))) (.f64 (E.f64) (+.f64 re re))) (*.f64 (E.f64) (neg.f64 (neg.f64 im))))
(/.f64 (-.f64 (.f64 (E.f64) im) (.f64 (E.f64) (+.f64 re re))) (*.f64 (E.f64) im))
(/.f64 (-.f64 (.f64 (E.f64) (neg.f64 im)) (.f64 (E.f64) (.f64 #s(literal -2 binary64) re))) (.f64 (E.f64) (neg.f64 im)))
(/.f64 (-.f64 (+.f64 im im) (.f64 #s(literal 2 binary64) (.f64 (+.f64 re re) #s(literal 1 binary64)))) (+.f64 im im))
(/.f64 (-.f64 (.f64 #s(literal -2 binary64) im) (.f64 #s(literal 2 binary64) (+.f64 (.f64 (/.f64 re im) (neg.f64 im)) (neg.f64 re)))) (.f64 #s(literal -2 binary64) im))
(/.f64 (-.f64 (+.f64 im im) (.f64 #s(literal 2 binary64) (+.f64 (.f64 (/.f64 re im) im) re))) (+.f64 im im))
(/.f64 (-.f64 (.f64 #s(literal -2 binary64) im) (.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 0 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)))) (*.f64 #s(literal -2 binary64) im))
(/.f64 (-.f64 (+.f64 im im) (.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 0 binary64) im) (+.f64 re re)))) (+.f64 im im))
(/.f64 (-.f64 (+.f64 im im) (*.f64 #s(literal 2 binary64) (-.f64 im (-.f64 im (+.f64 re re))))) (+.f64 im im))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 im im)) (.f64 #s(literal 2 binary64) (+.f64 (.f64 (neg.f64 re) (neg.f64 im)) (.f64 (neg.f64 re) (neg.f64 im))))) (.f64 #s(literal 2 binary64) (*.f64 im im)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 (neg.f64 im) im)) (.f64 #s(literal 2 binary64) (+.f64 (.f64 (neg.f64 re) im) (.f64 re (neg.f64 im))))) (.f64 #s(literal 2 binary64) (*.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 (neg.f64 im) im)) (.f64 #s(literal 2 binary64) (+.f64 (.f64 re (neg.f64 im)) (.f64 (neg.f64 re) im)))) (.f64 #s(literal 2 binary64) (*.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 im im)) (.f64 #s(literal 2 binary64) (+.f64 (.f64 re im) (.f64 re im)))) (.f64 #s(literal 2 binary64) (*.f64 im im)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 im im)) (.f64 #s(literal 2 binary64) (+.f64 (.f64 (neg.f64 re) (neg.f64 im)) (.f64 (neg.f64 im) (neg.f64 re))))) (.f64 #s(literal 2 binary64) (*.f64 im im)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 (neg.f64 im) im)) (.f64 #s(literal 2 binary64) (+.f64 (.f64 (neg.f64 re) im) (.f64 (neg.f64 im) re)))) (.f64 #s(literal 2 binary64) (*.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 (neg.f64 im) im)) (.f64 #s(literal 2 binary64) (+.f64 (.f64 re (neg.f64 im)) (.f64 im (neg.f64 re))))) (.f64 #s(literal 2 binary64) (*.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 im im)) (.f64 #s(literal 2 binary64) (+.f64 (.f64 re im) (.f64 im re)))) (.f64 #s(literal 2 binary64) (*.f64 im im)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 im))) (.f64 #s(literal 2 binary64) (+.f64 re re))) (*.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 im))))
(/.f64 (-.f64 (+.f64 im im) (*.f64 #s(literal 2 binary64) (+.f64 re re))) (+.f64 im im))
(/.f64 (-.f64 (.f64 #s(literal -2 binary64) im) (.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) re))) (.f64 #s(literal -2 binary64) im))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)) (E.f64)) (.f64 (neg.f64 im) (E.f64)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) im))
(/.f64 (.f64 (E.f64) (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re))) (.f64 (E.f64) (neg.f64 im)))
(/.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re))) (.f64 #s(literal -2 binary64) im))
(/.f64 (.f64 (E.f64) (neg.f64 (-.f64 im (+.f64 re re)))) (.f64 (E.f64) (neg.f64 im)))
(/.f64 (.f64 (E.f64) (-.f64 im (+.f64 re re))) (.f64 (E.f64) im))
(/.f64 (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 im (+.f64 re re)))) (.f64 #s(literal -2 binary64) im))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 im (+.f64 re re))) (+.f64 im im))
(/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (E.f64)) (.f64 (neg.f64 im) (E.f64)))
(/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) im))
(/.f64 (.f64 (-.f64 im (+.f64 re re)) (E.f64)) (.f64 im (E.f64)))
(/.f64 (*.f64 (-.f64 im (+.f64 re re)) #s(literal 2 binary64)) (+.f64 im im))
(/.f64 (neg.f64 (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re))) (neg.f64 (neg.f64 im)))
(/.f64 (neg.f64 (neg.f64 (-.f64 im (+.f64 re re)))) (neg.f64 (neg.f64 im)))
(/.f64 (-.f64 (+.f64 re re) im) (*.f64 #s(literal -1 binary64) im))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)) (neg.f64 im))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) #s(literal -2 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im))) (+.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)))
(/.f64 (-.f64 (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im)) #s(literal 1 binary64)) (-.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im)) (-.f64 #s(literal 1 binary64) (.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 1 binary64)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im)) (.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) #s(literal -2 binary64))))))
(/.f64 (neg.f64 (-.f64 im (+.f64 re re))) (neg.f64 im))
(/.f64 (-.f64 im (+.f64 re re)) im)
(/.f64 (-.f64 (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im)) (.f64 #s(literal -1 binary64) #s(literal -1 binary64))) (+.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -1 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im)) (+.f64 (.f64 #s(literal -1 binary64) #s(literal -1 binary64)) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -1 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 re re) im) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im)) (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)))))
(/.f64 #s(literal 1 binary64) (/.f64 im (-.f64 im (+.f64 re re))))
(neg.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)))
(neg.f64 (/.f64 (-.f64 (+.f64 re re) im) im))
(-.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 re im))
(-.f64 (/.f64 im im) (/.f64 (+.f64 re re) im))
(-.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))
(+.f64 (.f64 #s(literal 1 binary64) (.f64 (/.f64 re im) #s(literal -2 binary64))) #s(literal 1 binary64))
(+.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))
(+.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) #s(literal -2 binary64)))
(*.f64 (pow.f64 (-.f64 im (+.f64 re re)) #s(literal -1 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -1 binary64)))
(*.f64 (pow.f64 #s(literal 1 binary64) #s(literal -1 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(*.f64 (pow.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) (pow.f64 #s(literal 1 binary64) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal 1 binary64))
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(*.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(pow.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal -1 binary64))
(/.f64 (.f64 #s(literal -1 binary64) (E.f64)) (.f64 (/.f64 (-.f64 (+.f64 re re) im) im) (E.f64)))
(/.f64 (.f64 #s(literal 1 binary64) (E.f64)) (.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (E.f64)))
(/.f64 (.f64 (E.f64) #s(literal -1 binary64)) (.f64 (E.f64) (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (E.f64) (*.f64 (E.f64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 #s(literal -1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 #s(literal -1 binary64) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 (+.f64 re re) im) im) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 #s(literal -2 binary64) (*.f64 (/.f64 (-.f64 (+.f64 re re) im) im) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(exp.f64 (*.f64 (log.f64 (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64)))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 (-.f64 (.f64 (E.f64) (/.f64 (-.f64 im (+.f64 re re)) im)) (.f64 (E.f64) #s(literal -1 binary64))) (*.f64 (E.f64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 (-.f64 (.f64 (E.f64) (/.f64 (-.f64 (+.f64 re re) im) im)) (E.f64)) (.f64 (E.f64) (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (.f64 (/.f64 (.f64 (-.f64 im (+.f64 re re)) (.f64 #s(literal -2 binary64) (-.f64 re im))) (.f64 im im)) #s(literal -1 binary64)) (/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (-.f64 im (+.f64 re re))) (.f64 im im)))
(/.f64 (.f64 (/.f64 (.f64 (-.f64 im (+.f64 re re)) (.f64 #s(literal -2 binary64) (-.f64 re im))) (.f64 im im)) #s(literal 1 binary64)) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im)))
(/.f64 (.f64 (/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) (-.f64 im (+.f64 re re))) (.f64 im im)) #s(literal -1 binary64)) (/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (-.f64 im (+.f64 re re))) (.f64 im im)))
(/.f64 (.f64 (/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) (-.f64 im (+.f64 re re))) (.f64 im im)) #s(literal 1 binary64)) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im)))
(/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) #s(literal -1 binary64)) (*.f64 im (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) #s(literal 1 binary64)) (*.f64 im (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 (neg.f64 (+.f64 (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)) #s(literal -1 binary64))) (/.f64 (-.f64 im (+.f64 re re)) im))
(/.f64 (neg.f64 (neg.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)))) (/.f64 (-.f64 im (+.f64 re re)) im))
(/.f64 (.f64 (/.f64 (-.f64 (+.f64 re re) im) im) (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 (.f64 (/.f64 (-.f64 (+.f64 re re) im) im) (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64))) (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (*.f64 (/.f64 (-.f64 (+.f64 re re) im) im) (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64))) (/.f64 (-.f64 (+.f64 re re) im) im))
(/.f64 (/.f64 (.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) (neg.f64 (-.f64 im (+.f64 re re)))) (-.f64 im (+.f64 re re))) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 (/.f64 (.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) (neg.f64 (-.f64 im (+.f64 re re)))) (-.f64 im (+.f64 re re))) (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) (neg.f64 (-.f64 im (+.f64 re re)))) (-.f64 im (+.f64 re re))) (/.f64 (-.f64 (+.f64 re re) im) im))
(/.f64 (+.f64 (/.f64 (-.f64 (+.f64 re re) im) im) #s(literal -1 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 (+.f64 (/.f64 (-.f64 (+.f64 re re) im) im) #s(literal -1 binary64)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (+.f64 (/.f64 (-.f64 (+.f64 re re) im) im) #s(literal -1 binary64)) (/.f64 (-.f64 (+.f64 re re) im) im))
(/.f64 (-.f64 (/.f64 (+.f64 re re) im) #s(literal 2 binary64)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 (-.f64 (/.f64 (+.f64 re re) im) #s(literal 2 binary64)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (-.f64 (/.f64 (+.f64 re re) im) #s(literal 2 binary64)) (/.f64 (-.f64 (+.f64 re re) im) im))
(/.f64 (+.f64 (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)) #s(literal -1 binary64)) (/.f64 (-.f64 (+.f64 re re) im) im))
(/.f64 (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im))) #s(literal 1 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal -1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) (/.f64 #s(literal -1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))) (+.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im))))
(/.f64 (+.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (*.f64 (/.f64 #s(literal -1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) (/.f64 #s(literal -1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im))) (/.f64 #s(literal -1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))))
(/.f64 (neg.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im))) (/.f64 (-.f64 (+.f64 re re) im) im))
(/.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) (/.f64 (-.f64 im (+.f64 re re)) im))
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))) (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (*.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im))) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im))))
(neg.f64 (/.f64 (-.f64 (/.f64 (+.f64 re re) im) #s(literal 2 binary64)) (/.f64 (-.f64 im (+.f64 re re)) im)))
(neg.f64 (-.f64 (/.f64 #s(literal -1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal 1 binary64)))
(-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(+.f64 (/.f64 (/.f64 (-.f64 (+.f64 re re) im) im) (/.f64 (-.f64 (+.f64 re re) im) im)) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(+.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (.f64 (/.f64 re im) #s(literal -2 binary64)))) (*.f64 (/.f64 re im) #s(literal -2 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) #s(literal 1 binary64)) (.f64 (*.f64 im im) (/.f64 (+.f64 re re) im))) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)))) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 re re) im) #s(literal 2 binary64))) #s(literal 2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 2 binary64))) #s(literal 2 binary64))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (*.f64 im im))))
(.f64 (/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) (+.f64 re re)) (.f64 (neg.f64 im) im)) (/.f64 #s(literal -1 binary64) (/.f64 (+.f64 re re) im)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (*.f64 im im))) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)))
(*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64)) (/.f64 (-.f64 im (+.f64 re re)) im))
(*.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) (/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (-.f64 im (+.f64 re re))) (.f64 im im)))) (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im)))
(/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 re re) im)) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im)))) (.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) (/.f64 (+.f64 re re) im)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) (.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 (/.f64 (+.f64 re re) im) (/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (-.f64 im (+.f64 re re))) (.f64 im im)))) (.f64 (/.f64 (+.f64 re re) im) (*.f64 (/.f64 re im) #s(literal -2 binary64))))
(/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re))) (*.f64 (/.f64 (-.f64 (+.f64 re re) im) im) (neg.f64 im)))
(/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)) #s(literal -1 binary64)) (neg.f64 (-.f64 im (+.f64 re re)))) (*.f64 (/.f64 (-.f64 (+.f64 re re) im) im) (neg.f64 im)))
(/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)) #s(literal -1 binary64)) (-.f64 im (+.f64 re re))) (*.f64 (/.f64 (-.f64 (+.f64 re re) im) im) im))
(/.f64 (.f64 (neg.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im))) (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re))) (.f64 (/.f64 (-.f64 (+.f64 re re) im) im) (neg.f64 im)))
(/.f64 (.f64 (neg.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im))) (neg.f64 (-.f64 im (+.f64 re re)))) (.f64 (/.f64 (-.f64 (+.f64 re re) im) im) (neg.f64 im)))
(/.f64 (.f64 (neg.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im))) (-.f64 im (+.f64 re re))) (.f64 (/.f64 (-.f64 (+.f64 re re) im) im) im))
(/.f64 (.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re))) (.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (neg.f64 im)))
(/.f64 (.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) (neg.f64 (-.f64 im (+.f64 re re)))) (.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (neg.f64 im)))
(/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) (-.f64 im (+.f64 re re))) (-.f64 im (+.f64 re re)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)) (+.f64 (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)) #s(literal -1 binary64))) (*.f64 (neg.f64 im) (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)) (neg.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)))) (.f64 (neg.f64 im) (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)) (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im))) (.f64 (neg.f64 im) (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (+.f64 (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)) #s(literal -1 binary64))) (*.f64 (neg.f64 im) (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (neg.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)))) (.f64 (neg.f64 im) (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im))) (.f64 (neg.f64 im) (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 (.f64 (-.f64 im (+.f64 re re)) (+.f64 (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)) #s(literal -1 binary64))) (*.f64 im (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (.f64 (-.f64 im (+.f64 re re)) (neg.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)))) (.f64 im (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (.f64 (-.f64 im (+.f64 re re)) (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im))) (.f64 im (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 (neg.f64 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im))) #s(literal 1 binary64))) (.f64 (/.f64 re im) #s(literal -2 binary64)))
(/.f64 (neg.f64 (-.f64 (.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) (/.f64 (.f64 (+.f64 re re) (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im))) (.f64 im (.f64 im im))))) (neg.f64 (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (*.f64 im im))))
(/.f64 (neg.f64 (/.f64 (.f64 (-.f64 im (+.f64 re re)) (.f64 #s(literal -2 binary64) (-.f64 re im))) (*.f64 im im))) (/.f64 (-.f64 (+.f64 re re) im) im))
(/.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) (-.f64 im (+.f64 re re))) (*.f64 im im))) (/.f64 (-.f64 (+.f64 re re) im) im))
(/.f64 (neg.f64 (*.f64 #s(literal -2 binary64) (-.f64 re im))) (neg.f64 im))
(/.f64 (/.f64 (.f64 (-.f64 im (+.f64 re re)) (.f64 #s(literal -2 binary64) (-.f64 re im))) (*.f64 im im)) (/.f64 (-.f64 im (+.f64 re re)) im))
(/.f64 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (*.f64 im im))) #s(literal 1 binary64)) (/.f64 (+.f64 re re) im))
(/.f64 (/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) (-.f64 im (+.f64 re re))) (*.f64 im im)) (/.f64 (-.f64 im (+.f64 re re)) im))
(/.f64 (-.f64 (.f64 #s(literal -2 binary64) im) (.f64 #s(literal -2 binary64) re)) (*.f64 #s(literal -1 binary64) im))
(/.f64 (-.f64 (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))) (.f64 (/.f64 (.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) #s(literal 1 binary64)) (.f64 (.f64 im im) (/.f64 (+.f64 re re) im))) (/.f64 (.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) #s(literal 1 binary64)) (.f64 (.f64 im im) (/.f64 (+.f64 re re) im))))) (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) (/.f64 (.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) #s(literal 1 binary64)) (.f64 (.f64 im im) (/.f64 (+.f64 re re) im)))))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (*.f64 im im))) (+.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im))) (-.f64 #s(literal 2 binary64) (.f64 (/.f64 re im) #s(literal -2 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im)) (/.f64 (+.f64 re re) im)))
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im)) (-.f64 (.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) #s(literal 1 binary64)) (.f64 (.f64 im im) (/.f64 (+.f64 re re) im))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))) (+.f64 (.f64 (/.f64 (.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) #s(literal 1 binary64)) (.f64 (.f64 im im) (/.f64 (+.f64 re re) im))) (/.f64 (.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) #s(literal 1 binary64)) (.f64 (.f64 im im) (/.f64 (+.f64 re re) im)))) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) (/.f64 (.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) #s(literal 1 binary64)) (.f64 (*.f64 im im) (/.f64 (+.f64 re re) im)))))))
(/.f64 (-.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 re re) im) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im)) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) (/.f64 (.f64 (+.f64 re re) (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im))) (.f64 im (.f64 im im)))) (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (*.f64 im im)))
(/.f64 (+.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im)) (.f64 #s(literal 2 binary64) (.f64 (/.f64 re im) #s(literal -2 binary64))))))
(/.f64 (/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) (+.f64 re re)) (.f64 (neg.f64 im) im)) (.f64 (/.f64 re im) #s(literal -2 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im))) (/.f64 (+.f64 re re) im))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) (/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) (+.f64 re re)) (.f64 (neg.f64 im) im))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 re re) im) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im)))))
(/.f64 (*.f64 #s(literal -2 binary64) (-.f64 re im)) im)
(neg.f64 (*.f64 (/.f64 (-.f64 (+.f64 re re) im) im) (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64))))
(neg.f64 (.f64 (/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) (+.f64 re re)) (.f64 (neg.f64 im) im)) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))))
(neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) (neg.f64 (-.f64 im (+.f64 re re)))) (-.f64 im (+.f64 re re))))
(neg.f64 (+.f64 (/.f64 (-.f64 (+.f64 re re) im) im) #s(literal -1 binary64)))
(neg.f64 (/.f64 (/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) (+.f64 re re)) (*.f64 (neg.f64 im) im)) (/.f64 (+.f64 re re) im)))
(neg.f64 (-.f64 (/.f64 (.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) #s(literal 1 binary64)) (.f64 (.f64 im im) (/.f64 (+.f64 re re) im))) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))))
(neg.f64 (-.f64 (/.f64 (+.f64 re re) im) #s(literal 2 binary64)))
(-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) (/.f64 (.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) #s(literal 1 binary64)) (.f64 (.f64 im im) (/.f64 (+.f64 re re) im))))
(-.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal -1 binary64))
(-.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -2 binary64))
(-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im))
(+.f64 (/.f64 (.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) (.f64 #s(literal -2 binary64) re)) (-.f64 im (+.f64 re re))) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64)) #s(literal 1 binary64)))
(+.f64 (/.f64 (.f64 (-.f64 im (+.f64 re re)) #s(literal -1 binary64)) (.f64 im (/.f64 (-.f64 (+.f64 re re) im) im))) (/.f64 (-.f64 im (+.f64 re re)) im))
(+.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64))) (*.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64))))
(+.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) (neg.f64 (/.f64 (.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) #s(literal 1 binary64)) (.f64 (.f64 im im) (/.f64 (+.f64 re re) im)))))
(+.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) (/.f64 (/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (-.f64 im (+.f64 re re))) (.f64 im im)) (/.f64 (+.f64 re re) im)))
(+.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (/.f64 (.f64 (-.f64 im (+.f64 re re)) #s(literal -1 binary64)) (.f64 im (/.f64 (-.f64 (+.f64 re re) im) im))))
(+.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal 1 binary64))
(+.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 2 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im))
(+.f64 #s(literal 2 binary64) (*.f64 (/.f64 re im) #s(literal -2 binary64)))
(.f64 (.f64 im (/.f64 (-.f64 im (+.f64 re re)) im)) (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) im) (+.f64 im im))) (+.f64 im im))
(.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64)) im) (/.f64 (-.f64 im (+.f64 re re)) im))
(.f64 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im))) im) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)))
(*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im)
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im))) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) im))
(*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64)) (-.f64 im (+.f64 re re)))
(.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64)) im))
(*.f64 im (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)))
(/.f64 (.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re))) (.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (neg.f64 im)))
(/.f64 (.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (neg.f64 (-.f64 im (+.f64 re re)))) (.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (neg.f64 im)))
(/.f64 (*.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (-.f64 im (+.f64 re re))) (-.f64 im (+.f64 re re)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)) (+.f64 (-.f64 im (+.f64 re re)) im)) (.f64 (neg.f64 im) (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (+.f64 (-.f64 im (+.f64 re re)) im)) (.f64 (neg.f64 im) (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 (.f64 (-.f64 im (+.f64 re re)) (+.f64 (-.f64 im (+.f64 re re)) im)) (.f64 im (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 (neg.f64 (.f64 (/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) (+.f64 re re)) (.f64 (neg.f64 im) im)) im)) (/.f64 (+.f64 re re) im))
(/.f64 (neg.f64 (neg.f64 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (*.f64 im im))) im))) (/.f64 (+.f64 re re) im))
(/.f64 (.f64 (/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) (+.f64 re re)) (.f64 (neg.f64 im) im)) im) (*.f64 (/.f64 re im) #s(literal -2 binary64)))
(/.f64 (.f64 im (/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) (+.f64 re re)) (.f64 (neg.f64 im) im))) (*.f64 (/.f64 re im) #s(literal -2 binary64)))
(/.f64 (-.f64 (.f64 (+.f64 im im) (+.f64 im im)) (.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im))) (-.f64 (+.f64 im im) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im)))
(/.f64 (+.f64 (pow.f64 (+.f64 im im) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 im im) (+.f64 im im)) (-.f64 (.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im)) (.f64 (+.f64 im im) (.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) im)))))
(/.f64 (neg.f64 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im))) im)) (.f64 (/.f64 re im) #s(literal -2 binary64)))
(/.f64 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (*.f64 im im))) im) (/.f64 (+.f64 re re) im))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 re re) im) (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (*.f64 im im))) im)))
(neg.f64 (/.f64 (*.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (neg.f64 (-.f64 im (+.f64 re re)))) (-.f64 im (+.f64 re re))))
(neg.f64 (/.f64 (.f64 im (/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) (+.f64 re re)) (.f64 (neg.f64 im) im))) (/.f64 (+.f64 re re) im)))
(-.f64 (+.f64 im im) (.f64 (neg.f64 im) (.f64 (/.f64 re im) #s(literal -2 binary64))))
(-.f64 (+.f64 im im) (*.f64 (/.f64 (+.f64 re re) im) im))
(-.f64 (+.f64 im im) (neg.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im)))
(+.f64 (/.f64 (.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (.f64 #s(literal -2 binary64) re)) (-.f64 im (+.f64 re re))) (.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64)) im) #s(literal 1 binary64)))
(+.f64 (*.f64 im (/.f64 (-.f64 im (+.f64 re re)) im)) im)
(+.f64 (/.f64 (.f64 (+.f64 re re) (+.f64 (-.f64 im (+.f64 re re)) im)) (.f64 (neg.f64 im) (/.f64 (-.f64 im (+.f64 re re)) im))) (.f64 #s(literal 1 binary64) (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64)) im)))
(+.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im) (+.f64 im im))
(+.f64 (-.f64 im (+.f64 re re)) im)
(+.f64 (+.f64 im im) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im))
(+.f64 im (+.f64 im (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im)))
(.f64 (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))) (neg.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))))
(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))))
(pow.f64 (.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)) #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))) #s(literal 2 binary64))
(pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)) #s(literal 1 binary64))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))
(sqrt.f64 (.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)) #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))))
(fabs.f64 (.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))) (neg.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))))))
(fabs.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))
(.f64 (sqrt.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))) (sqrt.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))))
(.f64 (pow.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))))))
(fabs.f64 (neg.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))))
(fabs.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))))
(exp.f64 (.f64 (log.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))))
#s(literal 1 binary64)
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 re) re)) re)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 re re)) re)
(*.f64 re #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) re)
(/.f64 (-.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 (neg.f64 re) #s(literal 3 binary64))) (+.f64 (.f64 re re) (+.f64 (.f64 re re) (*.f64 re (neg.f64 re)))))
(/.f64 (-.f64 (.f64 re re) (.f64 re re)) (+.f64 re (neg.f64 re)))
(/.f64 (-.f64 (.f64 re re) (.f64 re re)) (-.f64 re re))
(/.f64 (+.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (+.f64 (.f64 re re) (-.f64 (.f64 re re) (*.f64 re re))))
(neg.f64 (*.f64 #s(literal -2 binary64) re))
(-.f64 re (neg.f64 re))
(+.f64 re (neg.f64 (neg.f64 re)))
(+.f64 re re)
(*.f64 (neg.f64 (/.f64 re im)) #s(literal -2 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 re im) (/.f64 re im))) (/.f64 re im))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 re re) im) #s(literal 0 binary64))) #s(literal 0 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 (+.f64 re re) im) im) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (/.f64 #s(literal 1 binary64) im) (+.f64 re re))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (+.f64 re re) (/.f64 #s(literal 1 binary64) im))
(*.f64 (/.f64 re im) #s(literal 2 binary64))
(.f64 (.f64 #s(literal -2 binary64) re) (/.f64 #s(literal -1 binary64) im))
(*.f64 #s(literal -2 binary64) (neg.f64 (/.f64 re im)))
(*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) im)))
(*.f64 #s(literal 2 binary64) (/.f64 re im))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 im)) (.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (neg.f64 re)))) (.f64 #s(literal -2 binary64) im))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 im)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 re) #s(literal -2 binary64)))) (.f64 #s(literal -2 binary64) im))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 im)) (.f64 #s(literal 2 binary64) (+.f64 re re))) (*.f64 #s(literal -2 binary64) im))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (neg.f64 im))) (.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) re))) (.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 im))))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) im) (.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) re))) (+.f64 im im))
(/.f64 (-.f64 (.f64 (.f64 re #s(literal 1 binary64)) im) (.f64 im (neg.f64 re))) (.f64 im im))
(/.f64 (-.f64 (.f64 (neg.f64 (neg.f64 re)) im) (.f64 (neg.f64 (neg.f64 im)) (neg.f64 re))) (*.f64 (neg.f64 (neg.f64 im)) im))
(/.f64 (-.f64 (.f64 (neg.f64 re) im) (.f64 (neg.f64 im) (neg.f64 re))) (*.f64 (neg.f64 im) im))
(/.f64 (-.f64 (.f64 re im) (.f64 im (neg.f64 re))) (*.f64 im im))
(/.f64 (-.f64 (.f64 (E.f64) (neg.f64 im)) (.f64 (E.f64) (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)))) (*.f64 (E.f64) (neg.f64 im)))
(/.f64 (-.f64 (.f64 (E.f64) (neg.f64 im)) (.f64 (E.f64) (neg.f64 (-.f64 im (+.f64 re re))))) (*.f64 (E.f64) (neg.f64 im)))
(/.f64 (-.f64 (.f64 (E.f64) im) (.f64 (E.f64) (-.f64 im (+.f64 re re)))) (*.f64 (E.f64) im))
(/.f64 (-.f64 (.f64 #s(literal -2 binary64) im) (.f64 #s(literal 2 binary64) (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)))) (*.f64 #s(literal -2 binary64) im))
(/.f64 (-.f64 (.f64 #s(literal -2 binary64) im) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 im (+.f64 re re))))) (*.f64 #s(literal -2 binary64) im))
(/.f64 (-.f64 (+.f64 im im) (*.f64 #s(literal 2 binary64) (-.f64 im (+.f64 re re)))) (+.f64 im im))
(/.f64 (neg.f64 (*.f64 (+.f64 re re) #s(literal 1 binary64))) (neg.f64 im))
(/.f64 (neg.f64 (+.f64 (*.f64 (/.f64 re im) (neg.f64 im)) (neg.f64 re))) (neg.f64 (neg.f64 im)))
(/.f64 (neg.f64 (+.f64 (*.f64 (/.f64 re im) im) re)) (neg.f64 im))
(/.f64 (neg.f64 (+.f64 (.f64 #s(literal 0 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re))) (neg.f64 (neg.f64 im)))
(/.f64 (neg.f64 (+.f64 (*.f64 #s(literal 0 binary64) im) (+.f64 re re))) (neg.f64 im))
(/.f64 (neg.f64 (-.f64 im (-.f64 im (+.f64 re re)))) (neg.f64 im))
(/.f64 (neg.f64 (+.f64 (.f64 (neg.f64 re) (neg.f64 im)) (.f64 (neg.f64 re) (neg.f64 im)))) (*.f64 (neg.f64 im) im))
(/.f64 (neg.f64 (+.f64 (.f64 (neg.f64 re) im) (.f64 re (neg.f64 im)))) (*.f64 im im))
(/.f64 (neg.f64 (+.f64 (.f64 re (neg.f64 im)) (.f64 (neg.f64 re) im))) (*.f64 im im))
(/.f64 (neg.f64 (+.f64 (.f64 re im) (.f64 re im))) (*.f64 (neg.f64 im) im))
(/.f64 (neg.f64 (+.f64 (.f64 (neg.f64 re) (neg.f64 im)) (.f64 (neg.f64 im) (neg.f64 re)))) (*.f64 (neg.f64 im) im))
(/.f64 (neg.f64 (+.f64 (.f64 (neg.f64 re) im) (.f64 (neg.f64 im) re))) (*.f64 im im))
(/.f64 (neg.f64 (+.f64 (.f64 re (neg.f64 im)) (.f64 im (neg.f64 re)))) (*.f64 im im))
(/.f64 (neg.f64 (+.f64 (.f64 re im) (.f64 im re))) (*.f64 (neg.f64 im) im))
(/.f64 (*.f64 (+.f64 re re) #s(literal 1 binary64)) im)
(/.f64 (+.f64 (*.f64 (/.f64 re im) (neg.f64 im)) (neg.f64 re)) (neg.f64 im))
(/.f64 (+.f64 (*.f64 (/.f64 re im) im) re) im)
(/.f64 (+.f64 (.f64 #s(literal 0 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)) (neg.f64 im))
(/.f64 (+.f64 (*.f64 #s(literal 0 binary64) im) (+.f64 re re)) im)
(/.f64 (-.f64 im (-.f64 im (+.f64 re re))) im)
(/.f64 (+.f64 (.f64 (neg.f64 re) (neg.f64 im)) (.f64 (neg.f64 re) (neg.f64 im))) (*.f64 im im))
(/.f64 (+.f64 (.f64 (neg.f64 re) im) (.f64 re (neg.f64 im))) (*.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 re (neg.f64 im)) (.f64 (neg.f64 re) im)) (*.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 re im) (.f64 re im)) (*.f64 im im))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (*.f64 im im))) (-.f64 #s(literal 0 binary64) (/.f64 (+.f64 re re) im)))
(/.f64 (-.f64 (.f64 (/.f64 re im) (/.f64 re im)) (.f64 (/.f64 re im) (/.f64 re im))) (-.f64 (/.f64 re im) (/.f64 re im)))
(/.f64 (+.f64 (pow.f64 (/.f64 re im) #s(literal 3 binary64)) (pow.f64 (/.f64 re im) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 re im) (/.f64 re im)) (-.f64 (.f64 (/.f64 re im) (/.f64 re im)) (*.f64 (/.f64 re im) (/.f64 re im)))))
(/.f64 (+.f64 (pow.f64 #s(literal 0 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 re re) im) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (-.f64 (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im)) (.f64 #s(literal 0 binary64) (/.f64 (+.f64 re re) im)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 (-.f64 (+.f64 re re) im) im) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)))))
(/.f64 (+.f64 (.f64 (neg.f64 re) (neg.f64 im)) (.f64 (neg.f64 im) (neg.f64 re))) (*.f64 im im))
(/.f64 (+.f64 (.f64 (neg.f64 re) im) (.f64 (neg.f64 im) re)) (*.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 re (neg.f64 im)) (.f64 im (neg.f64 re))) (*.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 re im) (.f64 im re)) (*.f64 im im))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im)) (/.f64 (-.f64 im (+.f64 re re)) im))))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im))) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im))) (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)))
(/.f64 (+.f64 re re) (neg.f64 (neg.f64 im)))
(/.f64 (+.f64 re re) im)
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 im) (*.f64 #s(literal -2 binary64) re)))
(/.f64 #s(literal 1 binary64) (/.f64 im (+.f64 re re)))
(/.f64 (*.f64 #s(literal -2 binary64) re) (neg.f64 (neg.f64 (neg.f64 im))))
(/.f64 (.f64 #s(literal -2 binary64) re) (.f64 #s(literal -1 binary64) im))
(/.f64 (*.f64 #s(literal -2 binary64) re) (neg.f64 im))
(neg.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 re im) #s(literal -2 binary64)))
(-.f64 (/.f64 re im) (*.f64 (neg.f64 re) (/.f64 #s(literal 1 binary64) im)))
(-.f64 (/.f64 re im) (neg.f64 (/.f64 re im)))
(-.f64 (/.f64 re im) (/.f64 (neg.f64 re) im))
(-.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im))
(+.f64 (+.f64 #s(literal 0 binary64) (/.f64 re im)) (/.f64 re im))
(+.f64 (/.f64 (+.f64 re re) im) #s(literal 0 binary64))
(+.f64 (/.f64 (-.f64 (+.f64 re re) im) im) #s(literal 1 binary64))
(+.f64 #s(literal 0 binary64) (/.f64 (+.f64 re re) im))
(+.f64 (/.f64 re im) (/.f64 re im))
(+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (/.f64 (+.f64 re re) im))) (.f64 (/.f64 re im) #s(literal -2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))) (.f64 (/.f64 re im) #s(literal -2 binary64)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 re re) im) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (-.f64 im (+.f64 re re)) (/.f64 #s(literal 1 binary64) im))
(*.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im))
(/.f64 (-.f64 (.f64 im im) (.f64 im (.f64 (+.f64 re re) #s(literal 1 binary64)))) (.f64 im im))
(/.f64 (-.f64 (.f64 (neg.f64 im) im) (.f64 im (+.f64 (.f64 (/.f64 re im) (neg.f64 im)) (neg.f64 re)))) (.f64 (neg.f64 im) im))
(/.f64 (-.f64 (.f64 im im) (.f64 im (+.f64 (.f64 (/.f64 re im) im) re))) (.f64 im im))
(/.f64 (-.f64 (.f64 (neg.f64 im) im) (.f64 im (+.f64 (.f64 #s(literal 0 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)))) (*.f64 (neg.f64 im) im))
(/.f64 (-.f64 (.f64 im im) (.f64 im (+.f64 (.f64 #s(literal 0 binary64) im) (+.f64 re re)))) (.f64 im im))
(/.f64 (-.f64 (.f64 im im) (.f64 im (-.f64 im (-.f64 im (+.f64 re re))))) (*.f64 im im))
(/.f64 (-.f64 (.f64 im (.f64 im im)) (.f64 im (+.f64 (.f64 (neg.f64 re) (neg.f64 im)) (.f64 (neg.f64 re) (neg.f64 im))))) (.f64 im (*.f64 im im)))
(/.f64 (-.f64 (.f64 im (.f64 (neg.f64 im) im)) (.f64 im (+.f64 (.f64 (neg.f64 re) im) (.f64 re (neg.f64 im))))) (.f64 im (*.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (.f64 im (.f64 (neg.f64 im) im)) (.f64 im (+.f64 (.f64 re (neg.f64 im)) (.f64 (neg.f64 re) im)))) (.f64 im (*.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (.f64 im (.f64 im im)) (.f64 im (+.f64 (.f64 re im) (.f64 re im)))) (.f64 im (*.f64 im im)))
(/.f64 (-.f64 (.f64 im (.f64 im im)) (.f64 im (+.f64 (.f64 (neg.f64 re) (neg.f64 im)) (.f64 (neg.f64 im) (neg.f64 re))))) (.f64 im (*.f64 im im)))
(/.f64 (-.f64 (.f64 im (.f64 (neg.f64 im) im)) (.f64 im (+.f64 (.f64 (neg.f64 re) im) (.f64 (neg.f64 im) re)))) (.f64 im (*.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (.f64 im (.f64 (neg.f64 im) im)) (.f64 im (+.f64 (.f64 re (neg.f64 im)) (.f64 im (neg.f64 re))))) (.f64 im (*.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (.f64 im (.f64 im im)) (.f64 im (+.f64 (.f64 re im) (.f64 im re)))) (.f64 im (*.f64 im im)))
(/.f64 (-.f64 (.f64 im (neg.f64 (neg.f64 im))) (.f64 im (+.f64 re re))) (*.f64 im (neg.f64 (neg.f64 im))))
(/.f64 (-.f64 (.f64 im im) (.f64 im (+.f64 re re))) (*.f64 im im))
(/.f64 (-.f64 (.f64 (neg.f64 im) im) (.f64 im (.f64 #s(literal -2 binary64) re))) (.f64 (neg.f64 im) im))
(/.f64 (-.f64 (.f64 (E.f64) im) (.f64 (E.f64) (.f64 (+.f64 re re) #s(literal 1 binary64)))) (.f64 (E.f64) im))
(/.f64 (-.f64 (.f64 (E.f64) (neg.f64 im)) (.f64 (E.f64) (+.f64 (.f64 (/.f64 re im) (neg.f64 im)) (neg.f64 re)))) (.f64 (E.f64) (neg.f64 im)))
(/.f64 (-.f64 (.f64 (E.f64) im) (.f64 (E.f64) (+.f64 (.f64 (/.f64 re im) im) re))) (.f64 (E.f64) im))
(/.f64 (-.f64 (.f64 (E.f64) (neg.f64 im)) (.f64 (E.f64) (+.f64 (.f64 #s(literal 0 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)))) (*.f64 (E.f64) (neg.f64 im)))
(/.f64 (-.f64 (.f64 (E.f64) im) (.f64 (E.f64) (+.f64 (.f64 #s(literal 0 binary64) im) (+.f64 re re)))) (.f64 (E.f64) im))
(/.f64 (-.f64 (.f64 (E.f64) im) (.f64 (E.f64) (-.f64 im (-.f64 im (+.f64 re re))))) (*.f64 (E.f64) im))
(/.f64 (-.f64 (.f64 (E.f64) (.f64 im im)) (.f64 (E.f64) (+.f64 (.f64 (neg.f64 re) (neg.f64 im)) (.f64 (neg.f64 re) (neg.f64 im))))) (.f64 (E.f64) (*.f64 im im)))
(/.f64 (-.f64 (.f64 (E.f64) (.f64 (neg.f64 im) im)) (.f64 (E.f64) (+.f64 (.f64 (neg.f64 re) im) (.f64 re (neg.f64 im))))) (.f64 (E.f64) (*.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (.f64 (E.f64) (.f64 (neg.f64 im) im)) (.f64 (E.f64) (+.f64 (.f64 re (neg.f64 im)) (.f64 (neg.f64 re) im)))) (.f64 (E.f64) (*.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (.f64 (E.f64) (.f64 im im)) (.f64 (E.f64) (+.f64 (.f64 re im) (.f64 re im)))) (.f64 (E.f64) (*.f64 im im)))
(/.f64 (-.f64 (.f64 (E.f64) (.f64 im im)) (.f64 (E.f64) (+.f64 (.f64 (neg.f64 re) (neg.f64 im)) (.f64 (neg.f64 im) (neg.f64 re))))) (.f64 (E.f64) (*.f64 im im)))
(/.f64 (-.f64 (.f64 (E.f64) (.f64 (neg.f64 im) im)) (.f64 (E.f64) (+.f64 (.f64 (neg.f64 re) im) (.f64 (neg.f64 im) re)))) (.f64 (E.f64) (*.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (.f64 (E.f64) (.f64 (neg.f64 im) im)) (.f64 (E.f64) (+.f64 (.f64 re (neg.f64 im)) (.f64 im (neg.f64 re))))) (.f64 (E.f64) (*.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (.f64 (E.f64) (.f64 im im)) (.f64 (E.f64) (+.f64 (.f64 re im) (.f64 im re)))) (.f64 (E.f64) (*.f64 im im)))
(/.f64 (-.f64 (.f64 (E.f64) (neg.f64 (neg.f64 im))) (.f64 (E.f64) (+.f64 re re))) (*.f64 (E.f64) (neg.f64 (neg.f64 im))))
(/.f64 (-.f64 (.f64 (E.f64) im) (.f64 (E.f64) (+.f64 re re))) (*.f64 (E.f64) im))
(/.f64 (-.f64 (.f64 (E.f64) (neg.f64 im)) (.f64 (E.f64) (.f64 #s(literal -2 binary64) re))) (.f64 (E.f64) (neg.f64 im)))
(/.f64 (-.f64 (+.f64 im im) (.f64 #s(literal 2 binary64) (.f64 (+.f64 re re) #s(literal 1 binary64)))) (+.f64 im im))
(/.f64 (-.f64 (.f64 #s(literal -2 binary64) im) (.f64 #s(literal 2 binary64) (+.f64 (.f64 (/.f64 re im) (neg.f64 im)) (neg.f64 re)))) (.f64 #s(literal -2 binary64) im))
(/.f64 (-.f64 (+.f64 im im) (.f64 #s(literal 2 binary64) (+.f64 (.f64 (/.f64 re im) im) re))) (+.f64 im im))
(/.f64 (-.f64 (.f64 #s(literal -2 binary64) im) (.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 0 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)))) (*.f64 #s(literal -2 binary64) im))
(/.f64 (-.f64 (+.f64 im im) (.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 0 binary64) im) (+.f64 re re)))) (+.f64 im im))
(/.f64 (-.f64 (+.f64 im im) (*.f64 #s(literal 2 binary64) (-.f64 im (-.f64 im (+.f64 re re))))) (+.f64 im im))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 im im)) (.f64 #s(literal 2 binary64) (+.f64 (.f64 (neg.f64 re) (neg.f64 im)) (.f64 (neg.f64 re) (neg.f64 im))))) (.f64 #s(literal 2 binary64) (*.f64 im im)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 (neg.f64 im) im)) (.f64 #s(literal 2 binary64) (+.f64 (.f64 (neg.f64 re) im) (.f64 re (neg.f64 im))))) (.f64 #s(literal 2 binary64) (*.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 (neg.f64 im) im)) (.f64 #s(literal 2 binary64) (+.f64 (.f64 re (neg.f64 im)) (.f64 (neg.f64 re) im)))) (.f64 #s(literal 2 binary64) (*.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 im im)) (.f64 #s(literal 2 binary64) (+.f64 (.f64 re im) (.f64 re im)))) (.f64 #s(literal 2 binary64) (*.f64 im im)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 im im)) (.f64 #s(literal 2 binary64) (+.f64 (.f64 (neg.f64 re) (neg.f64 im)) (.f64 (neg.f64 im) (neg.f64 re))))) (.f64 #s(literal 2 binary64) (*.f64 im im)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 (neg.f64 im) im)) (.f64 #s(literal 2 binary64) (+.f64 (.f64 (neg.f64 re) im) (.f64 (neg.f64 im) re)))) (.f64 #s(literal 2 binary64) (*.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 (neg.f64 im) im)) (.f64 #s(literal 2 binary64) (+.f64 (.f64 re (neg.f64 im)) (.f64 im (neg.f64 re))))) (.f64 #s(literal 2 binary64) (*.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 im im)) (.f64 #s(literal 2 binary64) (+.f64 (.f64 re im) (.f64 im re)))) (.f64 #s(literal 2 binary64) (*.f64 im im)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 im))) (.f64 #s(literal 2 binary64) (+.f64 re re))) (*.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 im))))
(/.f64 (-.f64 (+.f64 im im) (*.f64 #s(literal 2 binary64) (+.f64 re re))) (+.f64 im im))
(/.f64 (-.f64 (.f64 #s(literal -2 binary64) im) (.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) re))) (.f64 #s(literal -2 binary64) im))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)) (E.f64)) (.f64 (neg.f64 im) (E.f64)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) im))
(/.f64 (.f64 (E.f64) (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re))) (.f64 (E.f64) (neg.f64 im)))
(/.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re))) (.f64 #s(literal -2 binary64) im))
(/.f64 (.f64 (E.f64) (neg.f64 (-.f64 im (+.f64 re re)))) (.f64 (E.f64) (neg.f64 im)))
(/.f64 (.f64 (E.f64) (-.f64 im (+.f64 re re))) (.f64 (E.f64) im))
(/.f64 (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 im (+.f64 re re)))) (.f64 #s(literal -2 binary64) im))
(/.f64 (*.f64 #s(literal 2 binary64) (-.f64 im (+.f64 re re))) (+.f64 im im))
(/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (E.f64)) (.f64 (neg.f64 im) (E.f64)))
(/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) #s(literal 2 binary64)) (.f64 #s(literal -2 binary64) im))
(/.f64 (.f64 (-.f64 im (+.f64 re re)) (E.f64)) (.f64 im (E.f64)))
(/.f64 (*.f64 (-.f64 im (+.f64 re re)) #s(literal 2 binary64)) (+.f64 im im))
(/.f64 (neg.f64 (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re))) (neg.f64 (neg.f64 im)))
(/.f64 (neg.f64 (neg.f64 (-.f64 im (+.f64 re re)))) (neg.f64 (neg.f64 im)))
(/.f64 (-.f64 (+.f64 re re) im) (*.f64 #s(literal -1 binary64) im))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)) (neg.f64 im))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im))) (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) #s(literal -2 binary64))))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im))) (+.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)))
(/.f64 (-.f64 (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im)) #s(literal 1 binary64)) (-.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im)) (-.f64 #s(literal 1 binary64) (.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 1 binary64)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im)) (.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) #s(literal -2 binary64))))))
(/.f64 (neg.f64 (-.f64 im (+.f64 re re))) (neg.f64 im))
(/.f64 (-.f64 im (+.f64 re re)) im)
(/.f64 (-.f64 (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im)) (.f64 #s(literal -1 binary64) #s(literal -1 binary64))) (+.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -1 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im)) (+.f64 (.f64 #s(literal -1 binary64) #s(literal -1 binary64)) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -1 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 re re) im) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im)) (*.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)))))
(/.f64 #s(literal 1 binary64) (/.f64 im (-.f64 im (+.f64 re re))))
(neg.f64 (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(neg.f64 (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)))
(neg.f64 (/.f64 (-.f64 (+.f64 re re) im) im))
(-.f64 (-.f64 #s(literal 1 binary64) (/.f64 re im)) (/.f64 re im))
(-.f64 (/.f64 im im) (/.f64 (+.f64 re re) im))
(-.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))
(+.f64 (.f64 #s(literal 1 binary64) (.f64 (/.f64 re im) #s(literal -2 binary64))) #s(literal 1 binary64))
(+.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 1 binary64)) #s(literal 1 binary64))
(+.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) #s(literal -2 binary64)))
(*.f64 (neg.f64 (neg.f64 (fabs.f64 (/.f64 (-.f64 (+.f64 re re) im) im)))) (neg.f64 (neg.f64 (fabs.f64 (/.f64 (-.f64 (+.f64 re re) im) im)))))
(*.f64 (pow.f64 (fabs.f64 (/.f64 (-.f64 (+.f64 re re) im) im)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (/.f64 (-.f64 (+.f64 re re) im) im)) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 (/.f64 (-.f64 (+.f64 re re) im) im)) #s(literal 1 binary64)) (fabs.f64 (/.f64 (-.f64 (+.f64 re re) im) im)))
(*.f64 (pow.f64 (/.f64 (-.f64 (+.f64 re re) im) im) #s(literal 1 binary64)) (pow.f64 (/.f64 (-.f64 (+.f64 re re) im) im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (-.f64 (+.f64 re re) im) im) #s(literal 1 binary64)) (/.f64 (-.f64 (+.f64 re re) im) im))
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (*.f64 im im)))
(.f64 (.f64 #s(literal -1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) (*.f64 #s(literal -1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(.f64 (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)))
(*.f64 (pow.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (pow.f64 (/.f64 #s(literal 1 binary64) im) #s(literal 2 binary64)))
(*.f64 (neg.f64 (fabs.f64 (/.f64 (-.f64 (+.f64 re re) im) im))) (neg.f64 (fabs.f64 (/.f64 (-.f64 (+.f64 re re) im) im))))
(*.f64 (pow.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal 1 binary64)) (pow.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal 1 binary64)) (/.f64 (-.f64 im (+.f64 re re)) im))
(*.f64 (fabs.f64 (/.f64 (-.f64 (+.f64 re re) im) im)) (fabs.f64 (/.f64 (-.f64 (+.f64 re re) im) im)))
(*.f64 (/.f64 (-.f64 (+.f64 re re) im) im) (/.f64 (-.f64 (+.f64 re re) im) im))
(.f64 (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (*.f64 im im)) (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(*.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (/.f64 (-.f64 im (+.f64 re re)) im))
(pow.f64 (neg.f64 (fabs.f64 (/.f64 (-.f64 (+.f64 re re) im) im))) #s(literal 2 binary64))
(pow.f64 (fabs.f64 (/.f64 (-.f64 (+.f64 re re) im) im)) #s(literal 2 binary64))
(pow.f64 (/.f64 (-.f64 (+.f64 re re) im) im) #s(literal 2 binary64))
(pow.f64 (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im)) #s(literal 1 binary64))
(pow.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal 2 binary64))
(/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) im) (.f64 #s(literal -2 binary64) re)) (-.f64 (.f64 #s(literal -1 binary64) im) (.f64 #s(literal -2 binary64) re))) (.f64 im im))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)) (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re))) (.f64 im im))
(/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) im) (.f64 #s(literal -2 binary64) re)) (neg.f64 (-.f64 im (+.f64 re re)))) (.f64 im im))
(/.f64 (.f64 (-.f64 (.f64 #s(literal -1 binary64) im) (.f64 #s(literal -2 binary64) re)) (-.f64 im (+.f64 re re))) (.f64 (neg.f64 im) im))
(/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re))) (.f64 im im))
(/.f64 (.f64 (-.f64 im (+.f64 re re)) (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re))) (.f64 (neg.f64 im) im))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)) (neg.f64 (-.f64 im (+.f64 re re)))) (.f64 im im))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)) (-.f64 im (+.f64 re re))) (.f64 (neg.f64 im) im))
(/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (-.f64 (.f64 #s(literal -1 binary64) im) (.f64 #s(literal -2 binary64) re))) (.f64 im im))
(/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (-.f64 im (+.f64 re re))) (.f64 (neg.f64 im) im))
(/.f64 (.f64 (-.f64 im (+.f64 re re)) (-.f64 (.f64 #s(literal -1 binary64) im) (.f64 #s(literal -2 binary64) re))) (.f64 (neg.f64 im) im))
(/.f64 (.f64 (-.f64 im (+.f64 re re)) (neg.f64 (-.f64 im (+.f64 re re)))) (.f64 (neg.f64 im) im))
(/.f64 (neg.f64 (*.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (-.f64 im (+.f64 re re)))) (neg.f64 im))
(/.f64 (neg.f64 (*.f64 (-.f64 im (+.f64 re re)) (/.f64 (-.f64 im (+.f64 re re)) im))) (neg.f64 im))
(/.f64 (neg.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im))) (.f64 (neg.f64 im) im))
(/.f64 (fabs.f64 (*.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (-.f64 im (+.f64 re re)))) (fabs.f64 im))
(/.f64 (fabs.f64 (*.f64 (-.f64 im (+.f64 re re)) (/.f64 (-.f64 im (+.f64 re re)) im))) (fabs.f64 im))
(/.f64 (fabs.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im))) (.f64 im im))
(/.f64 (pow.f64 (fabs.f64 (/.f64 (-.f64 (+.f64 re re) im) im)) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (/.f64 (-.f64 (+.f64 re re) im) im)) #s(literal -1 binary64)))
(/.f64 (pow.f64 (/.f64 (-.f64 (+.f64 re re) im) im) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 (*.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (-.f64 im (+.f64 re re))) im)
(/.f64 (*.f64 (-.f64 im (+.f64 re re)) (/.f64 (-.f64 im (+.f64 re re)) im)) im)
(/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im))
(/.f64 (pow.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 (/.f64 (-.f64 (+.f64 re re) im) im)) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (-.f64 (+.f64 re re) im) im) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal -2 binary64)))
(neg.f64 (/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (-.f64 im (+.f64 re re))) (.f64 im im)))
(sqrt.f64 (.f64 (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im)) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (*.f64 im im))))
(fabs.f64 (/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (-.f64 im (+.f64 re re))) (.f64 im im)))
(fabs.f64 (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im)))
(exp.f64 (*.f64 (log.f64 (fabs.f64 (/.f64 (-.f64 (+.f64 re re) im) im))) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (-.f64 (+.f64 re re) im) im)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal 2 binary64)))
(+.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (.f64 (/.f64 re im) #s(literal -2 binary64))))) (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (*.f64 im im)))
(+.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)))) (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im)))
(+.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (+.f64 re re)) (.f64 im im)))
(+.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (/.f64 (.f64 (+.f64 re re) (neg.f64 (-.f64 im (+.f64 re re)))) (.f64 im im)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (-.f64 im (+.f64 re re))) (*.f64 im im)) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (*.f64 im im)) #s(literal 1 binary64))) #s(literal 1 binary64))
(/.f64 (-.f64 (.f64 (E.f64) im) (.f64 (E.f64) (.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (-.f64 im (+.f64 re re))))) (.f64 (E.f64) im))
(/.f64 (-.f64 (.f64 (E.f64) im) (.f64 (E.f64) (.f64 (-.f64 im (+.f64 re re)) (/.f64 (-.f64 im (+.f64 re re)) im)))) (.f64 (E.f64) im))
(/.f64 (-.f64 (.f64 (E.f64) (.f64 im im)) (.f64 (E.f64) (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)))) (.f64 (E.f64) (.f64 im im)))
(/.f64 (-.f64 (+.f64 im im) (.f64 #s(literal 2 binary64) (.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (-.f64 im (+.f64 re re))))) (+.f64 im im))
(/.f64 (-.f64 (+.f64 im im) (.f64 #s(literal 2 binary64) (.f64 (-.f64 im (+.f64 re re)) (/.f64 (-.f64 im (+.f64 re re)) im)))) (+.f64 im im))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 im im)) (.f64 #s(literal 2 binary64) (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)))) (.f64 #s(literal 2 binary64) (.f64 im im)))
(/.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (-.f64 im (+.f64 re re))) (.f64 im im)) (/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (-.f64 im (+.f64 re re))) (.f64 im im)))) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (-.f64 im (+.f64 re re))) (*.f64 im im))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (-.f64 im (+.f64 re re))) (.f64 im im)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (-.f64 im (+.f64 re re))) (.f64 im im)) (/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (-.f64 im (+.f64 re re))) (.f64 im im))) (.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (-.f64 im (+.f64 re re))) (.f64 im im))))))
(/.f64 (-.f64 #s(literal 1 binary64) (.f64 (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im)) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im)))) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (*.f64 im im))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im)) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im))) (.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im))))))
(neg.f64 (/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) (+.f64 re re)) (*.f64 (neg.f64 im) im)))
(-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im)))
(+.f64 (/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (-.f64 im (+.f64 re re))) (.f64 im im)) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (-.f64 im (+.f64 re re))) (.f64 im im)))
(*.f64 (neg.f64 (/.f64 re im)) #s(literal -2 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 re im) (/.f64 re im))) (/.f64 re im))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 re re) im) #s(literal 0 binary64))) #s(literal 0 binary64))
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 (+.f64 re re) im) im) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (/.f64 #s(literal 1 binary64) im) (+.f64 re re))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (+.f64 re re) (/.f64 #s(literal 1 binary64) im))
(*.f64 (/.f64 re im) #s(literal 2 binary64))
(.f64 (.f64 #s(literal -2 binary64) re) (/.f64 #s(literal -1 binary64) im))
(*.f64 #s(literal -2 binary64) (neg.f64 (/.f64 re im)))
(*.f64 re (+.f64 (/.f64 #s(literal 1 binary64) im) (/.f64 #s(literal 1 binary64) im)))
(*.f64 #s(literal 2 binary64) (/.f64 re im))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 im)) (.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (neg.f64 re)))) (.f64 #s(literal -2 binary64) im))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 im)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 re) #s(literal -2 binary64)))) (.f64 #s(literal -2 binary64) im))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 im)) (.f64 #s(literal 2 binary64) (+.f64 re re))) (*.f64 #s(literal -2 binary64) im))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) (neg.f64 (neg.f64 im))) (.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) re))) (.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 im))))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) im) (.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) re))) (+.f64 im im))
(/.f64 (-.f64 (.f64 (.f64 re #s(literal 1 binary64)) im) (.f64 im (neg.f64 re))) (.f64 im im))
(/.f64 (-.f64 (.f64 (neg.f64 (neg.f64 re)) im) (.f64 (neg.f64 (neg.f64 im)) (neg.f64 re))) (*.f64 (neg.f64 (neg.f64 im)) im))
(/.f64 (-.f64 (.f64 (neg.f64 re) im) (.f64 (neg.f64 im) (neg.f64 re))) (*.f64 (neg.f64 im) im))
(/.f64 (-.f64 (.f64 re im) (.f64 im (neg.f64 re))) (*.f64 im im))
(/.f64 (-.f64 (.f64 (E.f64) (neg.f64 im)) (.f64 (E.f64) (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)))) (*.f64 (E.f64) (neg.f64 im)))
(/.f64 (-.f64 (.f64 (E.f64) (neg.f64 im)) (.f64 (E.f64) (neg.f64 (-.f64 im (+.f64 re re))))) (*.f64 (E.f64) (neg.f64 im)))
(/.f64 (-.f64 (.f64 (E.f64) im) (.f64 (E.f64) (-.f64 im (+.f64 re re)))) (*.f64 (E.f64) im))
(/.f64 (-.f64 (.f64 #s(literal -2 binary64) im) (.f64 #s(literal 2 binary64) (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)))) (*.f64 #s(literal -2 binary64) im))
(/.f64 (-.f64 (.f64 #s(literal -2 binary64) im) (.f64 #s(literal 2 binary64) (neg.f64 (-.f64 im (+.f64 re re))))) (*.f64 #s(literal -2 binary64) im))
(/.f64 (-.f64 (+.f64 im im) (*.f64 #s(literal 2 binary64) (-.f64 im (+.f64 re re)))) (+.f64 im im))
(/.f64 (neg.f64 (*.f64 (+.f64 re re) #s(literal 1 binary64))) (neg.f64 im))
(/.f64 (neg.f64 (+.f64 (*.f64 (/.f64 re im) (neg.f64 im)) (neg.f64 re))) (neg.f64 (neg.f64 im)))
(/.f64 (neg.f64 (+.f64 (*.f64 (/.f64 re im) im) re)) (neg.f64 im))
(/.f64 (neg.f64 (+.f64 (.f64 #s(literal 0 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re))) (neg.f64 (neg.f64 im)))
(/.f64 (neg.f64 (+.f64 (*.f64 #s(literal 0 binary64) im) (+.f64 re re))) (neg.f64 im))
(/.f64 (neg.f64 (-.f64 im (-.f64 im (+.f64 re re)))) (neg.f64 im))
(/.f64 (neg.f64 (+.f64 (.f64 (neg.f64 re) (neg.f64 im)) (.f64 (neg.f64 re) (neg.f64 im)))) (*.f64 (neg.f64 im) im))
(/.f64 (neg.f64 (+.f64 (.f64 (neg.f64 re) im) (.f64 re (neg.f64 im)))) (*.f64 im im))
(/.f64 (neg.f64 (+.f64 (.f64 re (neg.f64 im)) (.f64 (neg.f64 re) im))) (*.f64 im im))
(/.f64 (neg.f64 (+.f64 (.f64 re im) (.f64 re im))) (*.f64 (neg.f64 im) im))
(/.f64 (neg.f64 (+.f64 (.f64 (neg.f64 re) (neg.f64 im)) (.f64 (neg.f64 im) (neg.f64 re)))) (*.f64 (neg.f64 im) im))
(/.f64 (neg.f64 (+.f64 (.f64 (neg.f64 re) im) (.f64 (neg.f64 im) re))) (*.f64 im im))
(/.f64 (neg.f64 (+.f64 (.f64 re (neg.f64 im)) (.f64 im (neg.f64 re)))) (*.f64 im im))
(/.f64 (neg.f64 (+.f64 (.f64 re im) (.f64 im re))) (*.f64 (neg.f64 im) im))
(/.f64 (*.f64 (+.f64 re re) #s(literal 1 binary64)) im)
(/.f64 (+.f64 (*.f64 (/.f64 re im) (neg.f64 im)) (neg.f64 re)) (neg.f64 im))
(/.f64 (+.f64 (*.f64 (/.f64 re im) im) re) im)
(/.f64 (+.f64 (.f64 #s(literal 0 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)) (neg.f64 im))
(/.f64 (+.f64 (*.f64 #s(literal 0 binary64) im) (+.f64 re re)) im)
(/.f64 (-.f64 im (-.f64 im (+.f64 re re))) im)
(/.f64 (+.f64 (.f64 (neg.f64 re) (neg.f64 im)) (.f64 (neg.f64 re) (neg.f64 im))) (*.f64 im im))
(/.f64 (+.f64 (.f64 (neg.f64 re) im) (.f64 re (neg.f64 im))) (*.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 re (neg.f64 im)) (.f64 (neg.f64 re) im)) (*.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 re im) (.f64 re im)) (*.f64 im im))
(/.f64 (-.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (*.f64 im im))) (-.f64 #s(literal 0 binary64) (/.f64 (+.f64 re re) im)))
(/.f64 (-.f64 (.f64 (/.f64 re im) (/.f64 re im)) (.f64 (/.f64 re im) (/.f64 re im))) (-.f64 (/.f64 re im) (/.f64 re im)))
(/.f64 (+.f64 (pow.f64 (/.f64 re im) #s(literal 3 binary64)) (pow.f64 (/.f64 re im) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 re im) (/.f64 re im)) (-.f64 (.f64 (/.f64 re im) (/.f64 re im)) (*.f64 (/.f64 re im) (/.f64 re im)))))
(/.f64 (+.f64 (pow.f64 #s(literal 0 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 re re) im) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 0 binary64) #s(literal 0 binary64)) (-.f64 (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im)) (.f64 #s(literal 0 binary64) (/.f64 (+.f64 re re) im)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 (-.f64 (+.f64 re re) im) im) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im)) (*.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)))))
(/.f64 (+.f64 (.f64 (neg.f64 re) (neg.f64 im)) (.f64 (neg.f64 im) (neg.f64 re))) (*.f64 im im))
(/.f64 (+.f64 (.f64 (neg.f64 re) im) (.f64 (neg.f64 im) re)) (*.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 re (neg.f64 im)) (.f64 im (neg.f64 re))) (*.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 re im) (.f64 im re)) (*.f64 im im))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im)) (/.f64 (-.f64 im (+.f64 re re)) im))))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im))) (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im))) (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)))
(/.f64 (+.f64 re re) (neg.f64 (neg.f64 im)))
(/.f64 (+.f64 re re) im)
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 im) (*.f64 #s(literal -2 binary64) re)))
(/.f64 #s(literal 1 binary64) (/.f64 im (+.f64 re re)))
(/.f64 (*.f64 #s(literal -2 binary64) re) (neg.f64 (neg.f64 (neg.f64 im))))
(/.f64 (.f64 #s(literal -2 binary64) re) (.f64 #s(literal -1 binary64) im))
(/.f64 (*.f64 #s(literal -2 binary64) re) (neg.f64 im))
(neg.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)))
(-.f64 #s(literal 0 binary64) (*.f64 (/.f64 re im) #s(literal -2 binary64)))
(-.f64 (/.f64 re im) (*.f64 (neg.f64 re) (/.f64 #s(literal 1 binary64) im)))
(-.f64 (/.f64 re im) (neg.f64 (/.f64 re im)))
(-.f64 (/.f64 re im) (/.f64 (neg.f64 re) im))
(-.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im))
(+.f64 (+.f64 #s(literal 0 binary64) (/.f64 re im)) (/.f64 re im))
(+.f64 (/.f64 (+.f64 re re) im) #s(literal 0 binary64))
(+.f64 (/.f64 (-.f64 (+.f64 re re) im) im) #s(literal 1 binary64))
(+.f64 #s(literal 0 binary64) (/.f64 (+.f64 re re) im))
(+.f64 (/.f64 re im) (/.f64 re im))
(+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 2 binary64) (.f64 (/.f64 re im) #s(literal -2 binary64)))) (*.f64 (/.f64 re im) #s(literal -2 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) #s(literal 1 binary64)) (.f64 (*.f64 im im) (/.f64 (+.f64 re re) im))) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)))) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 re re) im) #s(literal 2 binary64))) #s(literal 2 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 2 binary64))) #s(literal 2 binary64))
(.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (*.f64 im im))))
(.f64 (/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) (+.f64 re re)) (.f64 (neg.f64 im) im)) (/.f64 #s(literal -1 binary64) (/.f64 (+.f64 re re) im)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (*.f64 im im))) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)))
(*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64)) (/.f64 (-.f64 im (+.f64 re re)) im))
(*.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64)))
(/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) (/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (-.f64 im (+.f64 re re))) (.f64 im im)))) (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im)))
(/.f64 (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 re re) im)) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im)))) (.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) (/.f64 (+.f64 re re) im)))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) (.f64 (/.f64 re im) #s(literal -2 binary64))) (.f64 (/.f64 (+.f64 re re) im) (/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (-.f64 im (+.f64 re re))) (.f64 im im)))) (.f64 (/.f64 (+.f64 re re) im) (*.f64 (/.f64 re im) #s(literal -2 binary64))))
(/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)) #s(literal -1 binary64)) (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re))) (*.f64 (/.f64 (-.f64 (+.f64 re re) im) im) (neg.f64 im)))
(/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)) #s(literal -1 binary64)) (neg.f64 (-.f64 im (+.f64 re re)))) (*.f64 (/.f64 (-.f64 (+.f64 re re) im) im) (neg.f64 im)))
(/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)) #s(literal -1 binary64)) (-.f64 im (+.f64 re re))) (*.f64 (/.f64 (-.f64 (+.f64 re re) im) im) im))
(/.f64 (.f64 (neg.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im))) (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re))) (.f64 (/.f64 (-.f64 (+.f64 re re) im) im) (neg.f64 im)))
(/.f64 (.f64 (neg.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im))) (neg.f64 (-.f64 im (+.f64 re re)))) (.f64 (/.f64 (-.f64 (+.f64 re re) im) im) (neg.f64 im)))
(/.f64 (.f64 (neg.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im))) (-.f64 im (+.f64 re re))) (.f64 (/.f64 (-.f64 (+.f64 re re) im) im) im))
(/.f64 (.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re))) (.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (neg.f64 im)))
(/.f64 (.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) (neg.f64 (-.f64 im (+.f64 re re)))) (.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (neg.f64 im)))
(/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) (-.f64 im (+.f64 re re))) (-.f64 im (+.f64 re re)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)) (+.f64 (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)) #s(literal -1 binary64))) (*.f64 (neg.f64 im) (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)) (neg.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)))) (.f64 (neg.f64 im) (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)) (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im))) (.f64 (neg.f64 im) (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (+.f64 (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)) #s(literal -1 binary64))) (*.f64 (neg.f64 im) (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (neg.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)))) (.f64 (neg.f64 im) (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im))) (.f64 (neg.f64 im) (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 (.f64 (-.f64 im (+.f64 re re)) (+.f64 (.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)) #s(literal -1 binary64))) (*.f64 im (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (.f64 (-.f64 im (+.f64 re re)) (neg.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)))) (.f64 im (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (.f64 (-.f64 im (+.f64 re re)) (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im))) (.f64 im (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 (neg.f64 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im))) #s(literal 1 binary64))) (.f64 (/.f64 re im) #s(literal -2 binary64)))
(/.f64 (neg.f64 (-.f64 (.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) (/.f64 (.f64 (+.f64 re re) (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im))) (.f64 im (.f64 im im))))) (neg.f64 (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (*.f64 im im))))
(/.f64 (neg.f64 (/.f64 (.f64 (-.f64 im (+.f64 re re)) (.f64 #s(literal -2 binary64) (-.f64 re im))) (*.f64 im im))) (/.f64 (-.f64 (+.f64 re re) im) im))
(/.f64 (neg.f64 (/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) (-.f64 im (+.f64 re re))) (*.f64 im im))) (/.f64 (-.f64 (+.f64 re re) im) im))
(/.f64 (neg.f64 (*.f64 #s(literal -2 binary64) (-.f64 re im))) (neg.f64 im))
(/.f64 (/.f64 (.f64 (-.f64 im (+.f64 re re)) (.f64 #s(literal -2 binary64) (-.f64 re im))) (*.f64 im im)) (/.f64 (-.f64 im (+.f64 re re)) im))
(/.f64 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (*.f64 im im))) #s(literal 1 binary64)) (/.f64 (+.f64 re re) im))
(/.f64 (/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) (-.f64 im (+.f64 re re))) (*.f64 im im)) (/.f64 (-.f64 im (+.f64 re re)) im))
(/.f64 (-.f64 (.f64 #s(literal -2 binary64) im) (.f64 #s(literal -2 binary64) re)) (*.f64 #s(literal -1 binary64) im))
(/.f64 (-.f64 (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im)) (.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (-.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))) (.f64 (/.f64 (.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) #s(literal 1 binary64)) (.f64 (.f64 im im) (/.f64 (+.f64 re re) im))) (/.f64 (.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) #s(literal 1 binary64)) (.f64 (.f64 im im) (/.f64 (+.f64 re re) im))))) (+.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) (/.f64 (.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) #s(literal 1 binary64)) (.f64 (.f64 im im) (/.f64 (+.f64 re re) im)))))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (*.f64 im im))) (+.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im))) (-.f64 #s(literal 2 binary64) (.f64 (/.f64 re im) #s(literal -2 binary64))))
(/.f64 (+.f64 (pow.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im)) (/.f64 (+.f64 re re) im)))
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im)) (-.f64 (.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) #s(literal 1 binary64)) (.f64 (.f64 im im) (/.f64 (+.f64 re re) im))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))) (+.f64 (.f64 (/.f64 (.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) #s(literal 1 binary64)) (.f64 (.f64 im im) (/.f64 (+.f64 re re) im))) (/.f64 (.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) #s(literal 1 binary64)) (.f64 (.f64 im im) (/.f64 (+.f64 re re) im)))) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) (/.f64 (.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) #s(literal 1 binary64)) (.f64 (*.f64 im im) (/.f64 (+.f64 re re) im)))))))
(/.f64 (-.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 re re) im) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (+.f64 (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im)) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)))))
(/.f64 (-.f64 (.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) (/.f64 (.f64 (+.f64 re re) (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im))) (.f64 im (.f64 im im)))) (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (*.f64 im im)))
(/.f64 (+.f64 (pow.f64 #s(literal 2 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 3 binary64))) (+.f64 (.f64 #s(literal 2 binary64) #s(literal 2 binary64)) (-.f64 (/.f64 (.f64 (+.f64 re re) (+.f64 re re)) (.f64 im im)) (.f64 #s(literal 2 binary64) (.f64 (/.f64 re im) #s(literal -2 binary64))))))
(/.f64 (/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) (+.f64 re re)) (.f64 (neg.f64 im) im)) (.f64 (/.f64 re im) #s(literal -2 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im))) (/.f64 (+.f64 re re) im))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) (/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) (+.f64 re re)) (.f64 (neg.f64 im) im))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 re re) im) (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im)))))
(/.f64 (*.f64 #s(literal -2 binary64) (-.f64 re im)) im)
(neg.f64 (*.f64 (/.f64 (-.f64 (+.f64 re re) im) im) (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64))))
(neg.f64 (.f64 (/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) (+.f64 re re)) (.f64 (neg.f64 im) im)) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))))
(neg.f64 (/.f64 (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) (neg.f64 (-.f64 im (+.f64 re re)))) (-.f64 im (+.f64 re re))))
(neg.f64 (+.f64 (/.f64 (-.f64 (+.f64 re re) im) im) #s(literal -1 binary64)))
(neg.f64 (/.f64 (/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) (+.f64 re re)) (*.f64 (neg.f64 im) im)) (/.f64 (+.f64 re re) im)))
(neg.f64 (-.f64 (/.f64 (.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) #s(literal 1 binary64)) (.f64 (.f64 im im) (/.f64 (+.f64 re re) im))) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))))
(neg.f64 (-.f64 (/.f64 (+.f64 re re) im) #s(literal 2 binary64)))
(-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) (/.f64 (.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) #s(literal 1 binary64)) (.f64 (.f64 im im) (/.f64 (+.f64 re re) im))))
(-.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal -1 binary64))
(-.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -2 binary64))
(-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im))
(+.f64 (/.f64 (.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) (.f64 #s(literal -2 binary64) re)) (-.f64 im (+.f64 re re))) (*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64)) #s(literal 1 binary64)))
(+.f64 (/.f64 (.f64 (-.f64 im (+.f64 re re)) #s(literal -1 binary64)) (.f64 im (/.f64 (-.f64 (+.f64 re re) im) im))) (/.f64 (-.f64 im (+.f64 re re)) im))
(+.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64))) (*.f64 #s(literal 1 binary64) (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64))))
(+.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) (neg.f64 (/.f64 (.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) #s(literal 1 binary64)) (.f64 (.f64 im im) (/.f64 (+.f64 re re) im)))))
(+.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) (/.f64 (/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (-.f64 im (+.f64 re re))) (.f64 im im)) (/.f64 (+.f64 re re) im)))
(+.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (/.f64 (.f64 (-.f64 im (+.f64 re re)) #s(literal -1 binary64)) (.f64 im (/.f64 (-.f64 (+.f64 re re) im) im))))
(+.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal 1 binary64))
(+.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal 2 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im))
(+.f64 #s(literal 2 binary64) (*.f64 (/.f64 re im) #s(literal -2 binary64)))
(.f64 (.f64 im (/.f64 (-.f64 im (+.f64 re re)) im)) (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) im) (+.f64 im im))) (+.f64 im im))
(.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64)) im) (/.f64 (-.f64 im (+.f64 re re)) im))
(.f64 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im))) im) (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)))
(*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im)
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im))) (.f64 (/.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) im))
(*.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64)) (-.f64 im (+.f64 re re)))
(.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64)) im))
(*.f64 im (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)))
(/.f64 (.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re))) (.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (neg.f64 im)))
(/.f64 (.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (neg.f64 (-.f64 im (+.f64 re re)))) (.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (neg.f64 im)))
(/.f64 (*.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (-.f64 im (+.f64 re re))) (-.f64 im (+.f64 re re)))
(/.f64 (.f64 (-.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 #s(literal -2 binary64) re)) (+.f64 (-.f64 im (+.f64 re re)) im)) (.f64 (neg.f64 im) (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 (.f64 (neg.f64 (-.f64 im (+.f64 re re))) (+.f64 (-.f64 im (+.f64 re re)) im)) (.f64 (neg.f64 im) (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 (.f64 (-.f64 im (+.f64 re re)) (+.f64 (-.f64 im (+.f64 re re)) im)) (.f64 im (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 (neg.f64 (.f64 (/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) (+.f64 re re)) (.f64 (neg.f64 im) im)) im)) (/.f64 (+.f64 re re) im))
(/.f64 (neg.f64 (neg.f64 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (*.f64 im im))) im))) (/.f64 (+.f64 re re) im))
(/.f64 (.f64 (/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) (+.f64 re re)) (.f64 (neg.f64 im) im)) im) (*.f64 (/.f64 re im) #s(literal -2 binary64)))
(/.f64 (.f64 im (/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) (+.f64 re re)) (.f64 (neg.f64 im) im))) (*.f64 (/.f64 re im) #s(literal -2 binary64)))
(/.f64 (-.f64 (.f64 (+.f64 im im) (+.f64 im im)) (.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im))) (-.f64 (+.f64 im im) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im)))
(/.f64 (+.f64 (pow.f64 (+.f64 im im) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 im im) (+.f64 im im)) (-.f64 (.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im)) (.f64 (+.f64 im im) (.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) im)))))
(/.f64 (neg.f64 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (.f64 im im))) im)) (.f64 (/.f64 re im) #s(literal -2 binary64)))
(/.f64 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (*.f64 im im))) im) (/.f64 (+.f64 re re) im))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 re re) im) (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (*.f64 im im))) im)))
(neg.f64 (/.f64 (*.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (neg.f64 (-.f64 im (+.f64 re re)))) (-.f64 im (+.f64 re re))))
(neg.f64 (/.f64 (.f64 im (/.f64 (.f64 (.f64 #s(literal -2 binary64) (-.f64 re im)) (+.f64 re re)) (.f64 (neg.f64 im) im))) (/.f64 (+.f64 re re) im)))
(-.f64 (+.f64 im im) (.f64 (neg.f64 im) (.f64 (/.f64 re im) #s(literal -2 binary64))))
(-.f64 (+.f64 im im) (*.f64 (/.f64 (+.f64 re re) im) im))
(-.f64 (+.f64 im im) (neg.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im)))
(+.f64 (/.f64 (.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (.f64 #s(literal -2 binary64) re)) (-.f64 im (+.f64 re re))) (.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64)) im) #s(literal 1 binary64)))
(+.f64 (*.f64 im (/.f64 (-.f64 im (+.f64 re re)) im)) im)
(+.f64 (/.f64 (.f64 (+.f64 re re) (+.f64 (-.f64 im (+.f64 re re)) im)) (.f64 (neg.f64 im) (/.f64 (-.f64 im (+.f64 re re)) im))) (.f64 #s(literal 1 binary64) (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64)) im)))
(+.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im) (+.f64 im im))
(+.f64 (-.f64 im (+.f64 re re)) im)
(+.f64 (+.f64 im im) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im))
(+.f64 im (+.f64 im (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im)))
(.f64 (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))) (neg.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))))
(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))))
(pow.f64 (.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)) #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))) #s(literal 2 binary64))
(pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)) #s(literal 1 binary64))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))
(sqrt.f64 (.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)) #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))))
(fabs.f64 (.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))) (neg.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))))))
(fabs.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))
(.f64 (sqrt.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))) (sqrt.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))))
(.f64 (pow.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))))))
(fabs.f64 (neg.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))))
(fabs.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))))
(exp.f64 (.f64 (log.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))))

eval149.0ms (3.0%)

Memory: 27.9MiB live, 301.2MiB allocated; 36ms collecting garbage
Compiler: Compiled 48 105 to 8 369 computations (82.6% saved)

prune55.0ms (1.1%)

Memory

-10.1MiB live, 90.0MiB allocated; 7ms collecting garbage

Pruning

30 alts after pruning (26 fresh and 4 done)

	Pruned	Kept	Total
New	1 030	14	1 044
Fresh	3	12	15
Picked	5	0	5
Done	-1	4	3
Total	1 037	30	1 067

Accuracy

87.6%

Counts

1 067 → 30

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	53.4%	(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))) #s(literal 1/2 binary64))
▶	53.4%	(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 #s(literal -2 binary64) (-.f64 re im))))) #s(literal 1/2 binary64))
	10.9%	(.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 1 binary64))) (sqrt.f64 (+.f64 re re))))
	50.9%	(.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im)))) (sqrt.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im))))))
	53.1%	(.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (.f64 #s(literal -2 binary64) (-.f64 re im)))))) (sqrt.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 #s(literal -2 binary64) (-.f64 re im))))))))
▶	25.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 (-.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re)))) (.f64 #s(literal 1 binary64) #s(literal 1 binary64))) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal 1 binary64))) (neg.f64 re))))
	38.7%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 1 binary64)) (+.f64 re re))))
	38.7%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re)) (neg.f64 re))))
	38.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (sqrt.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) #s(literal 2 binary64)) re) (neg.f64 re))) (neg.f64 re))))
	27.8%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 re re)) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))))
	43.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 (sqrt.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (sqrt.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))) re))))
✓	43.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))
▶	33.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 re re) (.f64 im im))) (.f64 im im))) re))))
	4.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) #s(approx (/ (sqrt (+ ( im im) (* re re))) (neg re)) #s(literal -1 binary64))) (neg.f64 re)))))
	14.9%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (pow.f64 im #s(literal 2 binary64)) re))))
	9.9%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 2 binary64)))) (pow.f64 im #s(literal 2 binary64))) re))))
▶	44.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (/.f64 (.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (.f64 #s(literal -2 binary64) re)) (-.f64 im (+.f64 re re))) (.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64)) im) #s(literal 1 binary64))))))
	3.8%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im (/.f64 (/.f64 (-.f64 (+.f64 im im) (.f64 #s(literal 2 binary64) (*.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (-.f64 im (+.f64 re re))))) (+.f64 im im)) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))))))))
	3.8%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im (/.f64 (/.f64 (-.f64 (.f64 (E.f64) im) (.f64 (E.f64) (.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (-.f64 im (+.f64 re re))))) (*.f64 (E.f64) im)) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))))))))
	4.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im (/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (/.f64 (pow.f64 (/.f64 (-.f64 (+.f64 re re) im) im) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))))))))
	4.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im (/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (/.f64 (*.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (-.f64 im (+.f64 re re))) im)) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))))))))
	4.7%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im (/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (-.f64 (+.f64 re re) im) im) #s(literal -2 binary64)))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))))))))
	3.8%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im (/.f64 #s(approx (- ( 1 1) (* (- 1 (/ (+ re re) im)) (- 1 (/ (+ re re) im)))) (.f64 re (+.f64 (.f64 #s(literal -4 binary64) (/.f64 re (pow.f64 im #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 #s(literal 1 binary64) im))))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))))))))
✓	51.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64))))))
✓	26.9%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))))
	47.6%	(.f64 #s(literal 1/2 binary64) (exp.f64 (.f64 (log.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im))) #s(literal 1/2 binary64))))
	50.8%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 im (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) im))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) im)))))))
✓	51.0%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (*.f64 im (sqrt.f64 (/.f64 #s(literal 2 binary64) im)))))
	47.7%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 im (exp.f64 (.f64 (log.f64 (/.f64 #s(literal 2 binary64) im)) #s(literal 1/2 binary64))))))
	51.1%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 im #s(approx (sqrt (/ 2 im)) (/.f64 (sqrt.f64 (.f64 #s(literal 2 binary64) im)) im)))))

Compiler

Compiled 1 963 to 1 178 computations (40.0% saved)

sample1.0ms (0.0%)

Memory

0.6MiB live, 0.6MiB allocated; 0ms collecting garbage

Calls

Call 1

Inputs
1/2
-2
2
1
-1
(* 1 1)

Outputs
#s(literal 1/2 binary64)
#s(literal -2 binary64)
#s(literal 2 binary64)
#s(literal 1 binary64)
#s(literal -1 binary64)
#s(literal 1 binary64)

Samples

0.0ms

1×

valid

Compiler

Compiled 10 to 8 computations (20.0% saved)

Precisions

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

adjust: 0.0ms (0.0% of total)

series255.0ms (5.2%)

Memory

30.2MiB live, 736.7MiB allocated; 97ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	2060	22265

Stop Event

1×	iter-limit

Counts

55 → 374

Calls

Call 1

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

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

Calls

6 calls:

Time	Variable	Point
29.0ms	im	0
22.0ms	re	inf
11.0ms	im	-inf
11.0ms	re	-inf
7.0ms	im	inf

rewrite305.0ms (6.3%)

Memory

-7.6MiB live, 859.9MiB allocated; 82ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	65	909
0	110	769
1	511	755
2	2142	752
0	4159	651

Stop Event

1×	iter-limit
1×	node-limit
1×	iter-limit

Counts

55 → 1 108

Calls

Call 1

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

Outputs
re
im
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (neg.f64 re) re)) re)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 re re)) re)
(*.f64 re #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) re)
(/.f64 (-.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 (neg.f64 re) #s(literal 3 binary64))) (+.f64 (.f64 re re) (+.f64 (.f64 re re) (*.f64 (neg.f64 re) re))))
(/.f64 (-.f64 (.f64 re re) (.f64 re re)) (+.f64 re (neg.f64 re)))
(/.f64 (-.f64 (.f64 re re) (.f64 re re)) (-.f64 re re))
(/.f64 (+.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (+.f64 (.f64 re re) (-.f64 (.f64 re re) (*.f64 re re))))
(neg.f64 (*.f64 #s(literal -2 binary64) re))
(-.f64 re (neg.f64 re))
(+.f64 re (neg.f64 (neg.f64 re)))
(+.f64 re re)
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 re (-.f64 im re))) (-.f64 im re))
(*.f64 (/.f64 (-.f64 im (+.f64 re re)) im) im)
(/.f64 (-.f64 (.f64 im im) (.f64 (.f64 #s(literal -2 binary64) re) (.f64 #s(literal -2 binary64) re))) (-.f64 im (*.f64 #s(literal -2 binary64) re)))
(/.f64 (-.f64 (.f64 (-.f64 im re) (-.f64 im re)) (.f64 re re)) (+.f64 (-.f64 im re) re))
(/.f64 (+.f64 (pow.f64 im #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal -2 binary64) re) #s(literal 3 binary64))) (+.f64 (.f64 im im) (-.f64 (.f64 (.f64 #s(literal -2 binary64) re) (.f64 #s(literal -2 binary64) re)) (.f64 im (*.f64 #s(literal -2 binary64) re)))))
(/.f64 (-.f64 (pow.f64 (-.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 im re) (-.f64 im re)) (+.f64 (.f64 re re) (*.f64 (-.f64 im re) re))))
(/.f64 (-.f64 (.f64 im im) (.f64 (+.f64 re re) (+.f64 re re))) (+.f64 im (+.f64 re re)))
(/.f64 (-.f64 (pow.f64 im #s(literal 3 binary64)) (pow.f64 (+.f64 re re) #s(literal 3 binary64))) (+.f64 (.f64 im im) (+.f64 (.f64 (+.f64 re re) (+.f64 re re)) (*.f64 im (+.f64 re re)))))
(neg.f64 (-.f64 (+.f64 re re) im))
(-.f64 (-.f64 im re) re)
(-.f64 im (+.f64 re re))
(+.f64 (-.f64 im re) (neg.f64 re))
(+.f64 (*.f64 #s(literal -2 binary64) re) im)
(+.f64 im (*.f64 #s(literal -2 binary64) re))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) im) (+.f64 im im))) (+.f64 im im))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 im (-.f64 (+.f64 re re) im))) (-.f64 im (+.f64 re re)))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)) im)
(*.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) (-.f64 im (+.f64 re re)))
(*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im)
(*.f64 im (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)))
(/.f64 (-.f64 (.f64 im im) (.f64 (-.f64 im (+.f64 re re)) (-.f64 im (+.f64 re re)))) (-.f64 im (-.f64 im (+.f64 re re))))
(/.f64 (-.f64 (.f64 (+.f64 im im) (+.f64 im im)) (.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im))) (-.f64 (+.f64 im im) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im)))
(/.f64 (-.f64 (.f64 im im) (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im))) (+.f64 im (-.f64 (+.f64 re re) im)))
(/.f64 (+.f64 (pow.f64 im #s(literal 3 binary64)) (pow.f64 (-.f64 im (+.f64 re re)) #s(literal 3 binary64))) (+.f64 (.f64 im im) (-.f64 (.f64 (-.f64 im (+.f64 re re)) (-.f64 im (+.f64 re re))) (*.f64 im (-.f64 im (+.f64 re re))))))
(/.f64 (+.f64 (pow.f64 (+.f64 im im) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im) #s(literal 3 binary64))) (+.f64 (.f64 (+.f64 im im) (+.f64 im im)) (-.f64 (.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im)) (.f64 (+.f64 im im) (.f64 (*.f64 (/.f64 re im) #s(literal -2 binary64)) im)))))
(/.f64 (-.f64 (pow.f64 (-.f64 im (+.f64 re re)) #s(literal 3 binary64)) (pow.f64 (neg.f64 im) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 im (+.f64 re re)) (-.f64 im (+.f64 re re))) (+.f64 (.f64 im im) (*.f64 (-.f64 im (+.f64 re re)) (neg.f64 im)))))
(/.f64 (-.f64 (pow.f64 im #s(literal 3 binary64)) (pow.f64 (-.f64 (+.f64 re re) im) #s(literal 3 binary64))) (+.f64 (.f64 im im) (+.f64 (.f64 (-.f64 (+.f64 re re) im) (-.f64 (+.f64 re re) im)) (*.f64 im (-.f64 (+.f64 re re) im)))))
(/.f64 (-.f64 (.f64 (-.f64 im (+.f64 re re)) (-.f64 im (+.f64 re re))) (.f64 im im)) (+.f64 (-.f64 im (+.f64 re re)) (neg.f64 im)))
(/.f64 (-.f64 (.f64 (-.f64 im (+.f64 re re)) (-.f64 im (+.f64 re re))) (.f64 im im)) (-.f64 (-.f64 im (+.f64 re re)) im))
(/.f64 (+.f64 (pow.f64 (-.f64 im (+.f64 re re)) #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 im (+.f64 re re)) (-.f64 im (+.f64 re re))) (-.f64 (.f64 im im) (*.f64 (-.f64 im (+.f64 re re)) im))))
(neg.f64 (-.f64 (neg.f64 im) (-.f64 im (+.f64 re re))))
(neg.f64 (-.f64 (-.f64 (+.f64 re re) im) im))
(-.f64 (+.f64 im (-.f64 im re)) re)
(-.f64 (+.f64 im im) (.f64 (neg.f64 im) (.f64 (/.f64 re im) #s(literal -2 binary64))))
(-.f64 (+.f64 im im) (*.f64 (/.f64 (+.f64 re re) im) im))
(-.f64 (+.f64 im im) (neg.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im)))
(-.f64 (+.f64 im im) (+.f64 re re))
(-.f64 (-.f64 im re) (-.f64 re im))
(-.f64 (-.f64 im (+.f64 re re)) (neg.f64 im))
(-.f64 im (-.f64 (+.f64 re re) im))
(+.f64 (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im) (+.f64 im im))
(+.f64 (+.f64 im im) (.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) im))
(+.f64 (+.f64 im im) (*.f64 #s(literal -2 binary64) re))
(+.f64 (-.f64 im (+.f64 re re)) (neg.f64 (neg.f64 im)))
(+.f64 (-.f64 im (+.f64 re re)) im)
(+.f64 im (-.f64 (*.f64 #s(literal -2 binary64) re) (neg.f64 im)))
(+.f64 im (-.f64 im (+.f64 re re)))
(.f64 (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))) (neg.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))))
(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))))
(pow.f64 (.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)) #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))) #s(literal 2 binary64))
(pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)) #s(literal 1 binary64))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))
(sqrt.f64 (.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)) #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))))
(fabs.f64 (.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))) (neg.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))))))
(fabs.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))
(.f64 (sqrt.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))) (sqrt.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))))
(.f64 (pow.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))))))
(fabs.f64 (neg.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im)))))
(fabs.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))))
(exp.f64 (.f64 (log.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))) #s(literal 1/2 binary64)))
#s(literal 1/2 binary64)
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))))
(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))) #s(literal 1/2 binary64))
#s(literal -2 binary64)
(*.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 im) re)) re)
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 im re)) re)
(/.f64 (+.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 (neg.f64 im) #s(literal 3 binary64))) (+.f64 (.f64 re re) (-.f64 (.f64 im im) (*.f64 re (neg.f64 im)))))
(/.f64 (-.f64 (.f64 re re) (.f64 im im)) (-.f64 re (neg.f64 im)))
(/.f64 (-.f64 (.f64 re re) (.f64 im im)) (+.f64 re im))
(/.f64 (-.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (+.f64 (.f64 re re) (+.f64 (.f64 im im) (*.f64 re im))))
(neg.f64 (-.f64 im re))
(-.f64 re (neg.f64 (neg.f64 im)))
(-.f64 re im)
(+.f64 (neg.f64 im) re)
(+.f64 re (neg.f64 im))
(*.f64 (-.f64 re im) #s(literal -2 binary64))
(*.f64 #s(literal -2 binary64) (-.f64 re im))
(neg.f64 (*.f64 (-.f64 im re) #s(literal -2 binary64)))
(neg.f64 (*.f64 #s(literal -2 binary64) (-.f64 im re)))
(+.f64 (.f64 #s(literal -2 binary64) re) (.f64 #s(literal -2 binary64) (neg.f64 im)))
(+.f64 (.f64 #s(literal -2 binary64) re) (.f64 (neg.f64 im) #s(literal -2 binary64)))
#s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 (-.f64 re im) #s(literal -2 binary64)))
(.f64 (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (.f64 (-.f64 re im) #s(literal -2 binary64)))))) (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 (-.f64 re im) #s(literal -2 binary64)))))))
(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (.f64 (-.f64 re im) #s(literal -2 binary64))))) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 (-.f64 re im) #s(literal -2 binary64))))))
(pow.f64 (.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (.f64 (-.f64 re im) #s(literal -2 binary64)))) #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 (-.f64 re im) #s(literal -2 binary64))))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 (-.f64 re im) #s(literal -2 binary64))))) #s(literal 2 binary64))
(pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 (-.f64 re im) #s(literal -2 binary64)))) #s(literal 1 binary64))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 (-.f64 re im) #s(literal -2 binary64))))
(sqrt.f64 (.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (.f64 (-.f64 re im) #s(literal -2 binary64)))) #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 (-.f64 re im) #s(literal -2 binary64))))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (.f64 (-.f64 re im) #s(literal -2 binary64)))))) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 (-.f64 re im) #s(literal -2 binary64)))))))
(fabs.f64 (.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (.f64 (-.f64 re im) #s(literal -2 binary64))))) (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 (-.f64 re im) #s(literal -2 binary64))))))))
(fabs.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 (-.f64 re im) #s(literal -2 binary64)))))
(.f64 (sqrt.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (.f64 (-.f64 re im) #s(literal -2 binary64)))))) (sqrt.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 (-.f64 re im) #s(literal -2 binary64)))))))
(.f64 (pow.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (.f64 (-.f64 re im) #s(literal -2 binary64)))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 (-.f64 re im) #s(literal -2 binary64)))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 (-.f64 re im) #s(literal -2 binary64)))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 (-.f64 re im) #s(literal -2 binary64)))))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 (-.f64 re im) #s(literal -2 binary64))))))))
(fabs.f64 (neg.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 (-.f64 re im) #s(literal -2 binary64)))))))
(fabs.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 (-.f64 re im) #s(literal -2 binary64))))))
(exp.f64 (.f64 (log.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 (-.f64 re im) #s(literal -2 binary64))))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 (-.f64 re im) #s(literal -2 binary64))))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 (-.f64 re im) #s(literal -2 binary64))))))
#s(literal 2 binary64)
#s(literal 1 binary64)
(*.f64 (neg.f64 (neg.f64 (fabs.f64 re))) (neg.f64 (neg.f64 (fabs.f64 re))))
(*.f64 (neg.f64 (neg.f64 (neg.f64 re))) (neg.f64 (neg.f64 (neg.f64 re))))
(*.f64 (pow.f64 (fabs.f64 re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 re) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 re) #s(literal 1 binary64)) (fabs.f64 re))
(*.f64 (pow.f64 (neg.f64 re) #s(literal 1 binary64)) (pow.f64 (neg.f64 re) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 re) #s(literal 1 binary64)) (neg.f64 re))
(*.f64 (pow.f64 re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 re (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 re)))
(*.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 re)))
(*.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)))
(*.f64 (pow.f64 re #s(literal 1 binary64)) re)
(*.f64 (fabs.f64 re) (fabs.f64 re))
(*.f64 (neg.f64 re) (neg.f64 re))
(*.f64 re re)
(pow.f64 (neg.f64 (fabs.f64 re)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 re)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 re) #s(literal 2 binary64))
(pow.f64 (neg.f64 re) #s(literal 2 binary64))
(pow.f64 (*.f64 re re) #s(literal 1 binary64))
(pow.f64 re #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 re) #s(literal 1 binary64)) (pow.f64 (fabs.f64 re) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 re) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) re))
(/.f64 (pow.f64 re #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) re))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 re) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 re) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal -2 binary64)))
(neg.f64 (*.f64 (neg.f64 re) re))
(sqrt.f64 (.f64 (.f64 re re) (*.f64 re re)))
(fabs.f64 (*.f64 (neg.f64 re) re))
(fabs.f64 (*.f64 re re))
(exp.f64 (*.f64 (log.f64 (fabs.f64 re)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 re)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 re) #s(literal 2 binary64)))
(*.f64 (neg.f64 (neg.f64 (fabs.f64 im))) (neg.f64 (neg.f64 (fabs.f64 im))))
(*.f64 (neg.f64 (neg.f64 (neg.f64 im))) (neg.f64 (neg.f64 (neg.f64 im))))
(*.f64 (pow.f64 (fabs.f64 im) #s(literal 1 binary64)) (pow.f64 (fabs.f64 im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (fabs.f64 im) #s(literal 1 binary64)) (fabs.f64 im))
(*.f64 (pow.f64 (neg.f64 im) #s(literal 1 binary64)) (pow.f64 (neg.f64 im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (neg.f64 im) #s(literal 1 binary64)) (neg.f64 im))
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (.f64 im im))
(.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (neg.f64 im))
(.f64 (.f64 im #s(literal -1 binary64)) (*.f64 im #s(literal -1 binary64)))
(*.f64 (pow.f64 im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 im (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(*.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 im)))
(*.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 im)))
(*.f64 (pow.f64 im #s(literal 1 binary64)) (pow.f64 im #s(literal 1 binary64)))
(*.f64 (pow.f64 im #s(literal 1 binary64)) im)
(*.f64 (fabs.f64 im) (fabs.f64 im))
(*.f64 (neg.f64 im) (neg.f64 im))
(.f64 (.f64 im im) (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(.f64 (.f64 im im) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) (.f64 im im))
(*.f64 im im)
(pow.f64 (*.f64 (neg.f64 im) #s(literal 1 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 #s(literal 1 binary64) (neg.f64 im)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (fabs.f64 im)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (neg.f64 im)) #s(literal 2 binary64))
(pow.f64 (fabs.f64 im) #s(literal 2 binary64))
(pow.f64 (neg.f64 im) #s(literal 2 binary64))
(pow.f64 (*.f64 im im) #s(literal 1 binary64))
(pow.f64 im #s(literal 2 binary64))
(/.f64 (pow.f64 (fabs.f64 im) #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) (fabs.f64 im)))
(/.f64 (pow.f64 (neg.f64 im) #s(literal 1 binary64)) (/.f64 #s(literal -1 binary64) im))
(/.f64 (pow.f64 im #s(literal 1 binary64)) (/.f64 #s(literal 1 binary64) im))
(/.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (*.f64 im im)))
(neg.f64 (.f64 #s(literal -1 binary64) (.f64 im im)))
(neg.f64 (*.f64 (neg.f64 im) im))
(sqrt.f64 (.f64 (.f64 im im) (*.f64 im im)))
(fabs.f64 (.f64 #s(literal -1 binary64) (.f64 im im)))
(fabs.f64 (*.f64 (neg.f64 im) im))
(fabs.f64 (*.f64 im im))
(exp.f64 (*.f64 (log.f64 (fabs.f64 im)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 (neg.f64 im)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 im) #s(literal 2 binary64)))
(*.f64 (fabs.f64 (/.f64 (fabs.f64 re) (neg.f64 im))) (fabs.f64 (/.f64 (fabs.f64 re) (neg.f64 im))))
(*.f64 (fabs.f64 (/.f64 (fabs.f64 re) im)) (fabs.f64 (/.f64 (fabs.f64 re) im)))
(*.f64 (fabs.f64 (/.f64 (neg.f64 re) (fabs.f64 im))) (fabs.f64 (/.f64 (neg.f64 re) (fabs.f64 im))))
(*.f64 (fabs.f64 (/.f64 re (fabs.f64 im))) (fabs.f64 (/.f64 re (fabs.f64 im))))
(*.f64 (fabs.f64 (fabs.f64 (/.f64 re im))) (fabs.f64 (fabs.f64 (/.f64 re im))))
(*.f64 (neg.f64 (/.f64 (fabs.f64 re) (neg.f64 im))) (neg.f64 (/.f64 (fabs.f64 re) (neg.f64 im))))
(*.f64 (neg.f64 (/.f64 (fabs.f64 re) im)) (neg.f64 (/.f64 (fabs.f64 re) im)))
(*.f64 (neg.f64 (/.f64 (neg.f64 re) (fabs.f64 im))) (neg.f64 (/.f64 (neg.f64 re) (fabs.f64 im))))
(*.f64 (neg.f64 (/.f64 re (fabs.f64 im))) (neg.f64 (/.f64 re (fabs.f64 im))))
(*.f64 (neg.f64 (fabs.f64 (/.f64 re im))) (neg.f64 (fabs.f64 (/.f64 re im))))
(*.f64 (neg.f64 (neg.f64 (/.f64 re im))) (neg.f64 (neg.f64 (/.f64 re im))))
(*.f64 (pow.f64 (/.f64 re im) #s(literal 1 binary64)) (pow.f64 (/.f64 re im) #s(literal 1 binary64)))
(*.f64 (pow.f64 (/.f64 re im) #s(literal 1 binary64)) (/.f64 re im))
(.f64 (.f64 (/.f64 re im) re) (/.f64 #s(literal 1 binary64) im))
(*.f64 (fabs.f64 (/.f64 re im)) (fabs.f64 (/.f64 re im)))
(*.f64 (/.f64 (fabs.f64 re) (neg.f64 im)) (/.f64 (fabs.f64 re) (neg.f64 im)))
(*.f64 (/.f64 (fabs.f64 re) im) (/.f64 (fabs.f64 re) im))
(*.f64 (/.f64 (neg.f64 re) (fabs.f64 im)) (/.f64 (neg.f64 re) (fabs.f64 im)))
(*.f64 (/.f64 (neg.f64 re) im) (/.f64 (neg.f64 re) im))
(*.f64 (/.f64 re (fabs.f64 im)) (/.f64 re (fabs.f64 im)))
(*.f64 (/.f64 re (neg.f64 im)) (/.f64 re (neg.f64 im)))
(*.f64 (neg.f64 (/.f64 re im)) (neg.f64 (/.f64 re im)))
(.f64 (.f64 re (/.f64 re im)) (/.f64 #s(literal 1 binary64) im))
(.f64 (/.f64 re (.f64 im im)) re)
(.f64 (/.f64 #s(literal 1 binary64) (.f64 im im)) (*.f64 re re))
(.f64 (.f64 (neg.f64 re) re) (/.f64 #s(literal -1 binary64) (*.f64 im im)))
(.f64 (fabs.f64 re) (.f64 (fabs.f64 re) (/.f64 #s(literal 1 binary64) (*.f64 im im))))
(.f64 (fabs.f64 re) (/.f64 (fabs.f64 re) (.f64 im im)))
(.f64 (neg.f64 re) (.f64 (neg.f64 re) (/.f64 #s(literal 1 binary64) (*.f64 im im))))
(.f64 (neg.f64 re) (/.f64 re (.f64 (neg.f64 im) im)))
(.f64 (.f64 re re) (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal 2 binary64)))
(.f64 (.f64 re re) (/.f64 #s(literal 1 binary64) (*.f64 im im)))
(*.f64 (/.f64 re im) (/.f64 re im))
(.f64 re (/.f64 (.f64 #s(literal 1 binary64) re) (*.f64 im im)))
(.f64 re (/.f64 re (.f64 im im)))
(pow.f64 (fabs.f64 (/.f64 re im)) #s(literal 2 binary64))
(pow.f64 (/.f64 (fabs.f64 re) (neg.f64 im)) #s(literal 2 binary64))
(pow.f64 (/.f64 (fabs.f64 re) im) #s(literal 2 binary64))
(pow.f64 (/.f64 (neg.f64 re) (fabs.f64 im)) #s(literal 2 binary64))
(pow.f64 (/.f64 (neg.f64 re) im) #s(literal 2 binary64))
(pow.f64 (/.f64 re (fabs.f64 im)) #s(literal 2 binary64))
(pow.f64 (/.f64 re (neg.f64 im)) #s(literal 2 binary64))
(pow.f64 (neg.f64 (/.f64 re im)) #s(literal 2 binary64))
(pow.f64 (/.f64 re im) #s(literal 2 binary64))
(/.f64 (.f64 (.f64 (neg.f64 re) re) #s(literal -1 binary64)) (*.f64 im im))
(/.f64 (.f64 (.f64 (neg.f64 re) re) #s(literal 1 binary64)) (*.f64 (neg.f64 im) im))
(/.f64 (.f64 (.f64 re re) #s(literal -1 binary64)) (*.f64 (neg.f64 im) im))
(/.f64 (.f64 (.f64 re #s(literal 1 binary64)) (.f64 re #s(literal 1 binary64))) (.f64 im im))
(/.f64 (.f64 (.f64 re #s(literal 1 binary64)) (neg.f64 (neg.f64 re))) (*.f64 im (neg.f64 (neg.f64 im))))
(/.f64 (.f64 (.f64 re #s(literal 1 binary64)) (neg.f64 re)) (*.f64 (neg.f64 im) im))
(/.f64 (.f64 (.f64 re #s(literal 1 binary64)) re) (*.f64 im im))
(/.f64 (.f64 (neg.f64 (neg.f64 re)) (.f64 re #s(literal 1 binary64))) (*.f64 (neg.f64 (neg.f64 im)) im))
(/.f64 (.f64 (neg.f64 re) (.f64 re #s(literal 1 binary64))) (*.f64 (neg.f64 im) im))
(/.f64 (.f64 re (.f64 re #s(literal 1 binary64))) (*.f64 im im))
(/.f64 (.f64 re (neg.f64 (neg.f64 re))) (.f64 im (neg.f64 (neg.f64 im))))
(/.f64 (.f64 (neg.f64 (neg.f64 re)) re) (.f64 (neg.f64 (neg.f64 im)) im))
(/.f64 (neg.f64 (.f64 (.f64 re re) #s(literal 1 binary64))) (*.f64 (neg.f64 im) im))
(/.f64 (neg.f64 (*.f64 (/.f64 re im) (neg.f64 re))) (neg.f64 (neg.f64 im)))
(/.f64 (neg.f64 (*.f64 (/.f64 re im) re)) (neg.f64 im))
(/.f64 (neg.f64 (*.f64 (neg.f64 re) (/.f64 re im))) (neg.f64 (neg.f64 im)))
(/.f64 (neg.f64 (/.f64 (*.f64 re re) (fabs.f64 im))) (neg.f64 (fabs.f64 im)))
(/.f64 (neg.f64 (/.f64 (*.f64 (neg.f64 re) re) im)) (neg.f64 (neg.f64 im)))
(/.f64 (neg.f64 (neg.f64 (*.f64 re (/.f64 re im)))) (neg.f64 (neg.f64 im)))
(/.f64 (pow.f64 (/.f64 re im) #s(literal 1 binary64)) (pow.f64 (/.f64 re im) #s(literal -1 binary64)))
(/.f64 (.f64 (.f64 re re) #s(literal 1 binary64)) (*.f64 im im))
(/.f64 (*.f64 (/.f64 re im) (neg.f64 re)) (neg.f64 im))
(/.f64 (*.f64 (/.f64 re im) re) im)
(/.f64 (*.f64 (neg.f64 re) (/.f64 re im)) (neg.f64 im))
(/.f64 (/.f64 (*.f64 re re) (fabs.f64 im)) (fabs.f64 im))
(/.f64 (/.f64 (*.f64 (neg.f64 re) re) im) (neg.f64 im))
(/.f64 (neg.f64 (*.f64 re (/.f64 re im))) (neg.f64 im))
(/.f64 (*.f64 re (/.f64 re im)) im)
(/.f64 (.f64 (neg.f64 re) re) (.f64 #s(literal -1 binary64) (*.f64 im im)))
(/.f64 (.f64 (neg.f64 re) re) (.f64 (neg.f64 im) im))
(/.f64 (.f64 re re) (.f64 im im))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 re im) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 im (*.f64 re (/.f64 re im))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 im) im) (.f64 (neg.f64 re) re)))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 im im) (.f64 re re)))
(neg.f64 (.f64 (neg.f64 re) (/.f64 re (.f64 im im))))
(fabs.f64 (.f64 (/.f64 re (.f64 im im)) re))
(exp.f64 (*.f64 (log.f64 (/.f64 re im)) #s(literal 2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 re (.f64 im im)) re))) (.f64 (/.f64 re (*.f64 im im)) re))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 re) (/.f64 re (*.f64 im im))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 re (*.f64 im im)) re) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (+.f64 (.f64 im im) (.f64 re re)) (/.f64 #s(literal 1 binary64) (.f64 im im)))
(/.f64 (+.f64 (.f64 (.f64 im im) (.f64 im im)) (.f64 (.f64 im im) (.f64 (.f64 re re) #s(literal 1 binary64)))) (.f64 (.f64 im im) (.f64 im im)))
(/.f64 (+.f64 (.f64 (.f64 im im) (neg.f64 im)) (.f64 (.f64 im im) (.f64 (/.f64 re im) (neg.f64 re)))) (.f64 (*.f64 im im) (neg.f64 im)))
(/.f64 (+.f64 (.f64 (.f64 im im) im) (.f64 (.f64 im im) (.f64 (/.f64 re im) re))) (.f64 (*.f64 im im) im))
(/.f64 (+.f64 (.f64 (.f64 im im) (neg.f64 im)) (.f64 (.f64 im im) (.f64 (neg.f64 re) (/.f64 re im)))) (.f64 (*.f64 im im) (neg.f64 im)))
(/.f64 (+.f64 (.f64 (.f64 im im) (fabs.f64 im)) (.f64 (.f64 im im) (/.f64 (.f64 re re) (fabs.f64 im)))) (.f64 (*.f64 im im) (fabs.f64 im)))
(/.f64 (+.f64 (.f64 (.f64 im im) (neg.f64 im)) (.f64 (.f64 im im) (/.f64 (.f64 (neg.f64 re) re) im))) (.f64 (*.f64 im im) (neg.f64 im)))
(/.f64 (+.f64 (.f64 (.f64 im im) (neg.f64 im)) (.f64 (.f64 im im) (neg.f64 (.f64 re (/.f64 re im))))) (.f64 (*.f64 im im) (neg.f64 im)))
(/.f64 (+.f64 (.f64 (.f64 im im) im) (.f64 (.f64 im im) (.f64 re (/.f64 re im)))) (.f64 (*.f64 im im) im))
(/.f64 (+.f64 (.f64 (.f64 im im) (.f64 (neg.f64 im) im)) (.f64 (.f64 im im) (.f64 (neg.f64 re) re))) (.f64 (.f64 im im) (*.f64 (neg.f64 im) im)))
(/.f64 (+.f64 (.f64 (.f64 im im) (.f64 im im)) (.f64 (.f64 im im) (.f64 re re))) (.f64 (.f64 im im) (*.f64 im im)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 re re) #s(literal 1 binary64)) (neg.f64 im)) (.f64 (.f64 im im) (neg.f64 im))) (.f64 (*.f64 im im) (neg.f64 im)))
(/.f64 (+.f64 (.f64 (.f64 (.f64 re re) #s(literal 1 binary64)) im) (.f64 (.f64 im im) im)) (.f64 (*.f64 im im) im))
(/.f64 (+.f64 (.f64 (.f64 (.f64 re re) #s(literal 1 binary64)) #s(literal 2 binary64)) (.f64 (.f64 im im) #s(literal 2 binary64))) (.f64 (*.f64 im im) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 re im) (neg.f64 re)) (neg.f64 im)) (.f64 im im)) (.f64 im im))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 re im) (neg.f64 re)) im) (.f64 (neg.f64 im) im)) (.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 re im) (neg.f64 re)) #s(literal 2 binary64)) (.f64 (neg.f64 im) #s(literal 2 binary64))) (.f64 (neg.f64 im) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 re im) re) (neg.f64 im)) (.f64 (neg.f64 im) im)) (.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 re im) re) im) (.f64 im im)) (.f64 im im))
(/.f64 (+.f64 (.f64 (.f64 (/.f64 re im) re) #s(literal 2 binary64)) (+.f64 im im)) (+.f64 im im))
(/.f64 (+.f64 (.f64 (.f64 (neg.f64 re) (/.f64 re im)) (neg.f64 im)) (.f64 im im)) (.f64 im im))
(/.f64 (+.f64 (.f64 (.f64 (neg.f64 re) (/.f64 re im)) im) (.f64 (neg.f64 im) im)) (.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 (.f64 (neg.f64 re) (/.f64 re im)) #s(literal 2 binary64)) (.f64 (neg.f64 im) #s(literal 2 binary64))) (.f64 (neg.f64 im) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 re re) (fabs.f64 im)) (neg.f64 im)) (.f64 (fabs.f64 im) (neg.f64 im))) (.f64 (fabs.f64 im) (neg.f64 im)))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 re re) (fabs.f64 im)) im) (.f64 (fabs.f64 im) im)) (.f64 (fabs.f64 im) im))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 re re) (fabs.f64 im)) #s(literal 2 binary64)) (.f64 (fabs.f64 im) #s(literal 2 binary64))) (.f64 (fabs.f64 im) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (neg.f64 re) re) im) (neg.f64 im)) (.f64 im im)) (.f64 im im))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (neg.f64 re) re) im) im) (.f64 (neg.f64 im) im)) (.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 (/.f64 (.f64 (neg.f64 re) re) im) #s(literal 2 binary64)) (.f64 (neg.f64 im) #s(literal 2 binary64))) (.f64 (neg.f64 im) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (neg.f64 (.f64 re (/.f64 re im))) (neg.f64 im)) (.f64 im im)) (.f64 im im))
(/.f64 (+.f64 (.f64 (neg.f64 (.f64 re (/.f64 re im))) im) (.f64 (neg.f64 im) im)) (.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 (neg.f64 (.f64 re (/.f64 re im))) #s(literal 2 binary64)) (.f64 (neg.f64 im) #s(literal 2 binary64))) (.f64 (neg.f64 im) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (.f64 re (/.f64 re im)) (neg.f64 im)) (.f64 (neg.f64 im) im)) (.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 (.f64 re (/.f64 re im)) im) (.f64 im im)) (.f64 im im))
(/.f64 (+.f64 (.f64 (.f64 re (/.f64 re im)) #s(literal 2 binary64)) (+.f64 im im)) (+.f64 im im))
(/.f64 (+.f64 (.f64 (.f64 (neg.f64 re) re) (neg.f64 im)) (.f64 (.f64 (neg.f64 im) im) (neg.f64 im))) (.f64 (.f64 (neg.f64 im) im) (neg.f64 im)))
(/.f64 (+.f64 (.f64 (.f64 (neg.f64 re) re) im) (.f64 (.f64 (neg.f64 im) im) im)) (.f64 (.f64 (neg.f64 im) im) im))
(/.f64 (+.f64 (.f64 (.f64 (neg.f64 re) re) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 im) im) #s(literal 2 binary64))) (.f64 (.f64 (neg.f64 im) im) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (.f64 re re) (neg.f64 im)) (.f64 (.f64 im im) (neg.f64 im))) (.f64 (.f64 im im) (neg.f64 im)))
(/.f64 (+.f64 (.f64 (.f64 re re) im) (.f64 (.f64 im im) im)) (.f64 (.f64 im im) im))
(/.f64 (+.f64 (.f64 (.f64 re re) #s(literal 2 binary64)) (.f64 (.f64 im im) #s(literal 2 binary64))) (.f64 (.f64 im im) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (neg.f64 im) (.f64 im im)) (.f64 (neg.f64 im) (.f64 (.f64 re re) #s(literal 1 binary64)))) (.f64 (neg.f64 im) (*.f64 im im)))
(/.f64 (+.f64 (.f64 im im) (.f64 (neg.f64 im) (.f64 (/.f64 re im) (neg.f64 re)))) (.f64 im im))
(/.f64 (+.f64 (.f64 (neg.f64 im) im) (.f64 (neg.f64 im) (.f64 (/.f64 re im) re))) (.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 im im) (.f64 (neg.f64 im) (.f64 (neg.f64 re) (/.f64 re im)))) (.f64 im im))
(/.f64 (+.f64 (.f64 (neg.f64 im) (fabs.f64 im)) (.f64 (neg.f64 im) (/.f64 (.f64 re re) (fabs.f64 im)))) (.f64 (neg.f64 im) (fabs.f64 im)))
(/.f64 (+.f64 (.f64 im im) (.f64 (neg.f64 im) (/.f64 (.f64 (neg.f64 re) re) im))) (.f64 im im))
(/.f64 (+.f64 (.f64 im im) (.f64 (neg.f64 im) (neg.f64 (.f64 re (/.f64 re im))))) (.f64 im im))
(/.f64 (+.f64 (.f64 (neg.f64 im) im) (.f64 (neg.f64 im) (.f64 re (/.f64 re im)))) (.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 (neg.f64 im) (.f64 (neg.f64 im) im)) (.f64 (neg.f64 im) (.f64 (neg.f64 re) re))) (.f64 (neg.f64 im) (.f64 (neg.f64 im) im)))
(/.f64 (+.f64 (.f64 (neg.f64 im) (.f64 im im)) (.f64 (neg.f64 im) (.f64 re re))) (.f64 (neg.f64 im) (.f64 im im)))
(/.f64 (+.f64 (.f64 im (.f64 im im)) (.f64 im (.f64 (.f64 re re) #s(literal 1 binary64)))) (.f64 im (*.f64 im im)))
(/.f64 (+.f64 (.f64 (neg.f64 im) im) (.f64 im (.f64 (/.f64 re im) (neg.f64 re)))) (.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 im im) (.f64 im (.f64 (/.f64 re im) re))) (.f64 im im))
(/.f64 (+.f64 (.f64 (neg.f64 im) im) (.f64 im (.f64 (neg.f64 re) (/.f64 re im)))) (.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 im (fabs.f64 im)) (.f64 im (/.f64 (.f64 re re) (fabs.f64 im)))) (.f64 im (fabs.f64 im)))
(/.f64 (+.f64 (.f64 (neg.f64 im) im) (.f64 im (/.f64 (.f64 (neg.f64 re) re) im))) (.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 (neg.f64 im) im) (.f64 im (neg.f64 (.f64 re (/.f64 re im))))) (.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 im im) (.f64 im (.f64 re (/.f64 re im)))) (.f64 im im))
(/.f64 (+.f64 (.f64 im (.f64 (neg.f64 im) im)) (.f64 im (.f64 (neg.f64 re) re))) (.f64 im (.f64 (neg.f64 im) im)))
(/.f64 (+.f64 (.f64 im (.f64 im im)) (.f64 im (.f64 re re))) (.f64 im (.f64 im im)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 im im)) (.f64 #s(literal 2 binary64) (.f64 (.f64 re re) #s(literal 1 binary64)))) (.f64 #s(literal 2 binary64) (*.f64 im im)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (neg.f64 im)) (.f64 #s(literal 2 binary64) (.f64 (/.f64 re im) (neg.f64 re)))) (.f64 #s(literal 2 binary64) (neg.f64 im)))
(/.f64 (+.f64 (+.f64 im im) (.f64 #s(literal 2 binary64) (.f64 (/.f64 re im) re))) (+.f64 im im))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (neg.f64 im)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 re) (/.f64 re im)))) (.f64 #s(literal 2 binary64) (neg.f64 im)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (fabs.f64 im)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 re re) (fabs.f64 im)))) (.f64 #s(literal 2 binary64) (fabs.f64 im)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (neg.f64 im)) (.f64 #s(literal 2 binary64) (/.f64 (.f64 (neg.f64 re) re) im))) (.f64 #s(literal 2 binary64) (neg.f64 im)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (neg.f64 im)) (.f64 #s(literal 2 binary64) (neg.f64 (.f64 re (/.f64 re im))))) (.f64 #s(literal 2 binary64) (neg.f64 im)))
(/.f64 (+.f64 (+.f64 im im) (.f64 #s(literal 2 binary64) (.f64 re (/.f64 re im)))) (+.f64 im im))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 (neg.f64 im) im)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 re) re))) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 im) im)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (.f64 im im)) (.f64 #s(literal 2 binary64) (.f64 re re))) (.f64 #s(literal 2 binary64) (.f64 im im)))
(/.f64 (-.f64 (.f64 (neg.f64 im) im) (.f64 (neg.f64 im) (neg.f64 (.f64 re (/.f64 re im))))) (.f64 (neg.f64 im) im))
(/.f64 (-.f64 (.f64 im im) (.f64 (neg.f64 im) (.f64 re (/.f64 re im)))) (.f64 im im))
(/.f64 (-.f64 (.f64 (neg.f64 im) (.f64 im im)) (.f64 (neg.f64 im) (.f64 (neg.f64 re) re))) (.f64 (neg.f64 im) (.f64 im im)))
(/.f64 (-.f64 (.f64 (neg.f64 im) (.f64 (neg.f64 im) im)) (.f64 (neg.f64 im) (.f64 re re))) (.f64 (neg.f64 im) (.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (.f64 im im) (.f64 im (neg.f64 (.f64 re (/.f64 re im))))) (.f64 im im))
(/.f64 (-.f64 (.f64 (neg.f64 im) im) (.f64 im (.f64 re (/.f64 re im)))) (.f64 (neg.f64 im) im))
(/.f64 (-.f64 (.f64 im (.f64 im im)) (.f64 im (.f64 (neg.f64 re) re))) (.f64 im (.f64 im im)))
(/.f64 (-.f64 (.f64 im (.f64 (neg.f64 im) im)) (.f64 im (.f64 re re))) (.f64 im (.f64 (neg.f64 im) im)))
(/.f64 (-.f64 (+.f64 im im) (.f64 #s(literal 2 binary64) (neg.f64 (.f64 re (/.f64 re im))))) (+.f64 im im))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (neg.f64 im)) (.f64 #s(literal 2 binary64) (.f64 re (/.f64 re im)))) (.f64 #s(literal 2 binary64) (neg.f64 im)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 im im)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 re) re))) (.f64 #s(literal 2 binary64) (.f64 im im)))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (.f64 (neg.f64 im) im)) (.f64 #s(literal 2 binary64) (.f64 re re))) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 im) im)))
(/.f64 (.f64 (.f64 (.f64 im im) (+.f64 (.f64 im im) (.f64 re re))) (/.f64 #s(literal 1 binary64) (fabs.f64 im))) (.f64 (*.f64 im im) (fabs.f64 im)))
(/.f64 (.f64 (.f64 (.f64 im im) (+.f64 (.f64 im im) (.f64 re re))) (/.f64 #s(literal -1 binary64) im)) (.f64 (*.f64 im im) (neg.f64 im)))
(/.f64 (.f64 (.f64 (.f64 im im) (+.f64 (.f64 im im) (.f64 re re))) (/.f64 #s(literal 1 binary64) im)) (.f64 (*.f64 im im) im))
(/.f64 (.f64 (.f64 (.f64 im im) (+.f64 (.f64 im im) (.f64 re re))) #s(literal -1 binary64)) (.f64 (.f64 im im) (.f64 (neg.f64 im) im)))
(/.f64 (.f64 (.f64 (.f64 im im) (+.f64 (.f64 im im) (.f64 re re))) #s(literal 1 binary64)) (.f64 (.f64 im im) (.f64 im im)))
(/.f64 (.f64 (.f64 (+.f64 (.f64 im im) (.f64 re re)) (.f64 im im)) (/.f64 #s(literal 1 binary64) (fabs.f64 im))) (.f64 (*.f64 im im) (fabs.f64 im)))
(/.f64 (.f64 (.f64 (+.f64 (.f64 im im) (.f64 re re)) (.f64 im im)) (/.f64 #s(literal -1 binary64) im)) (.f64 (*.f64 im im) (neg.f64 im)))
(/.f64 (.f64 (.f64 (+.f64 (.f64 im im) (.f64 re re)) (.f64 im im)) (/.f64 #s(literal 1 binary64) im)) (.f64 (*.f64 im im) im))
(/.f64 (.f64 (.f64 (+.f64 (.f64 im im) (.f64 re re)) (.f64 im im)) #s(literal -1 binary64)) (.f64 (.f64 im im) (.f64 (neg.f64 im) im)))
(/.f64 (.f64 (.f64 (+.f64 (.f64 im im) (.f64 re re)) (.f64 im im)) #s(literal 1 binary64)) (.f64 (.f64 im im) (.f64 im im)))
(/.f64 (neg.f64 (/.f64 (+.f64 (.f64 im im) (.f64 re re)) (fabs.f64 im))) (neg.f64 (fabs.f64 im)))
(/.f64 (neg.f64 (/.f64 (+.f64 (.f64 im im) (.f64 re re)) (neg.f64 im))) (neg.f64 (neg.f64 im)))
(/.f64 (neg.f64 (/.f64 (+.f64 (.f64 im im) (.f64 re re)) im)) (neg.f64 im))
(/.f64 (neg.f64 (+.f64 (.f64 #s(literal 1 binary64) (.f64 (neg.f64 im) im)) (.f64 (neg.f64 re) re))) (.f64 im im))
(/.f64 (neg.f64 (neg.f64 (+.f64 (.f64 im im) (.f64 re re)))) (*.f64 im im))
(/.f64 (neg.f64 (+.f64 im (*.f64 re (/.f64 re im)))) (neg.f64 im))
(/.f64 (/.f64 (+.f64 (.f64 im im) (.f64 re re)) (fabs.f64 im)) (fabs.f64 im))
(/.f64 (/.f64 (+.f64 (.f64 im im) (.f64 re re)) (neg.f64 im)) (neg.f64 im))
(/.f64 (/.f64 (+.f64 (.f64 im im) (.f64 re re)) im) im)
(/.f64 (-.f64 (.f64 (neg.f64 im) im) (.f64 re re)) (.f64 #s(literal -1 binary64) (.f64 im im)))
(/.f64 (-.f64 (.f64 (neg.f64 im) im) (.f64 re re)) (*.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (.f64 (neg.f64 im) im)) (.f64 (neg.f64 re) re)) (.f64 (neg.f64 im) im))
(/.f64 (-.f64 (.f64 (.f64 (/.f64 re (.f64 im im)) re) (.f64 (/.f64 re (.f64 im im)) re)) #s(literal 1 binary64)) (-.f64 (.f64 (/.f64 re (*.f64 im im)) re) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (neg.f64 re) (/.f64 re (.f64 im im))) (.f64 (neg.f64 re) (/.f64 re (.f64 im im))))) (+.f64 #s(literal 1 binary64) (.f64 (neg.f64 re) (/.f64 re (*.f64 im im)))))
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (/.f64 re (.f64 im im)) re) (.f64 (/.f64 re (.f64 im im)) re)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 re) (/.f64 re (.f64 im im))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (.f64 (neg.f64 re) (/.f64 re (.f64 im im))) (.f64 (neg.f64 re) (/.f64 re (.f64 im im)))) (.f64 #s(literal 1 binary64) (.f64 (neg.f64 re) (/.f64 re (.f64 im im)))))))
(/.f64 (neg.f64 (+.f64 (.f64 im im) (.f64 re re))) (*.f64 (neg.f64 im) im))
(/.f64 (+.f64 im (*.f64 re (/.f64 re im))) im)
(/.f64 (+.f64 (.f64 im im) (.f64 re re)) (*.f64 im im))
(/.f64 (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 re (.f64 im im)) re) (.f64 (/.f64 re (.f64 im im)) re))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 re (*.f64 im im)) re)))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (.f64 (/.f64 re (.f64 im im)) re) (.f64 (/.f64 re (.f64 im im)) re)) (.f64 #s(literal 1 binary64) (.f64 (/.f64 re (.f64 im im)) re)))))
(/.f64 #s(literal 1 binary64) (/.f64 (.f64 im im) (+.f64 (.f64 im im) (*.f64 re re))))
(neg.f64 (-.f64 (.f64 (neg.f64 re) (/.f64 re (.f64 im im))) #s(literal 1 binary64)))
(-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 re) (/.f64 re (.f64 im im))))
(+.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 (/.f64 re (.f64 im im)) re))
(.f64 (.f64 (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64)) (fabs.f64 im)) (fabs.f64 im))
(.f64 (.f64 (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64)) (neg.f64 im)) (neg.f64 im))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 im) im) (.f64 re re))) (.f64 re re))
(.f64 (+.f64 im (.f64 re (/.f64 re im))) im)
(.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 im im) (.f64 re re))) (.f64 re re))
(.f64 (fabs.f64 im) (.f64 (fabs.f64 im) (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64))))
(.f64 (neg.f64 im) (.f64 (neg.f64 im) (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64))))
(.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))
(.f64 (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64)) (.f64 im im))
(.f64 (.f64 im im) (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64)))
(.f64 im (+.f64 im (.f64 re (/.f64 re im))))
(pow.f64 (.f64 (+.f64 (.f64 im im) (.f64 re re)) (+.f64 (.f64 im im) (*.f64 re re))) #s(literal 1/2 binary64))
(pow.f64 (+.f64 (.f64 im im) (.f64 re re)) #s(literal 1 binary64))
(pow.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal 2 binary64))
(/.f64 (neg.f64 (.f64 (.f64 im im) (+.f64 (.f64 im im) (.f64 re re)))) (*.f64 (neg.f64 im) im))
(/.f64 (neg.f64 (.f64 (+.f64 (.f64 im im) (.f64 re re)) (.f64 im im))) (*.f64 (neg.f64 im) im))
(/.f64 (.f64 (.f64 im im) (+.f64 (.f64 im im) (.f64 re re))) (*.f64 im im))
(/.f64 (.f64 (+.f64 (.f64 im im) (.f64 re re)) (.f64 im im)) (*.f64 im im))
(/.f64 (-.f64 (.f64 (.f64 im im) (.f64 im im)) (.f64 (.f64 re re) (.f64 re re))) (-.f64 (.f64 im im) (.f64 re re)))
(/.f64 (-.f64 (.f64 (.f64 re re) (.f64 re re)) (.f64 (.f64 (neg.f64 im) im) (.f64 (neg.f64 im) im))) (+.f64 (.f64 re re) (.f64 (neg.f64 im) im)))
(/.f64 (+.f64 (pow.f64 (.f64 im im) #s(literal 3 binary64)) (pow.f64 (.f64 re re) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 im im) (.f64 im im)) (-.f64 (.f64 (.f64 re re) (.f64 re re)) (.f64 (.f64 im im) (*.f64 re re)))))
(/.f64 (-.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 im) im) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 re re) (.f64 re re)) (+.f64 (.f64 (.f64 (neg.f64 im) im) (.f64 (neg.f64 im) im)) (.f64 (.f64 re re) (*.f64 (neg.f64 im) im)))))
(/.f64 (-.f64 (.f64 (.f64 re re) (.f64 re re)) (.f64 (.f64 im im) (.f64 im im))) (-.f64 (.f64 re re) (.f64 im im)))
(/.f64 (+.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) (pow.f64 (.f64 im im) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 re re) (.f64 re re)) (-.f64 (.f64 (.f64 im im) (.f64 im im)) (.f64 (.f64 re re) (*.f64 im im)))))
(neg.f64 (-.f64 (.f64 (neg.f64 im) im) (.f64 re re)))
(-.f64 (.f64 im im) (.f64 (neg.f64 re) re))
(-.f64 (.f64 re re) (.f64 (neg.f64 im) im))
(sqrt.f64 (.f64 (+.f64 (.f64 im im) (.f64 re re)) (+.f64 (.f64 im im) (*.f64 re re))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))
(fabs.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))))
(fabs.f64 (+.f64 (.f64 im im) (.f64 re re)))
(+.f64 (.f64 (.f64 im im) (.f64 (/.f64 re (.f64 im im)) re)) (*.f64 im im))
(+.f64 (.f64 (.f64 (/.f64 re (.f64 im im)) re) (.f64 im im)) (*.f64 im im))
(+.f64 (.f64 im im) (.f64 (.f64 im im) (.f64 (/.f64 re (*.f64 im im)) re)))
(+.f64 (.f64 im im) (.f64 (.f64 (/.f64 re (.f64 im im)) re) (*.f64 im im)))
(+.f64 (.f64 im im) (.f64 re re))
(+.f64 (.f64 re re) (.f64 (neg.f64 (neg.f64 im)) im))
(+.f64 (.f64 re re) (.f64 im im))
(.f64 (sqrt.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (sqrt.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))
(.f64 (sqrt.f64 (.f64 (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64)) (fabs.f64 im))) (sqrt.f64 (fabs.f64 im)))
(.f64 (sqrt.f64 (.f64 (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64)) (neg.f64 im))) (sqrt.f64 (neg.f64 im)))
(.f64 (sqrt.f64 (fabs.f64 im)) (sqrt.f64 (.f64 (fabs.f64 im) (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64)))))
(.f64 (sqrt.f64 (neg.f64 im)) (sqrt.f64 (.f64 (neg.f64 im) (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64)))))
(.f64 (pow.f64 (.f64 (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64)) (fabs.f64 im)) #s(literal 1/2 binary64)) (pow.f64 (fabs.f64 im) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64)) (neg.f64 im)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 im) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (fabs.f64 im) #s(literal 1/2 binary64)) (pow.f64 (.f64 (fabs.f64 im) (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (neg.f64 im) #s(literal 1/2 binary64)) (pow.f64 (.f64 (neg.f64 im) (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (+.f64 (.f64 im im) (.f64 re re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (.f64 im im) (*.f64 re re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (sqrt.f64 im) (sqrt.f64 (+.f64 im (.f64 re (/.f64 re im)))))
(.f64 (sqrt.f64 (+.f64 im (.f64 re (/.f64 re im)))) (sqrt.f64 im))
(.f64 (pow.f64 im #s(literal 1/2 binary64)) (pow.f64 (+.f64 im (.f64 re (/.f64 re im))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (+.f64 im (.f64 re (/.f64 re im))) #s(literal 1/2 binary64)) (pow.f64 im #s(literal 1/2 binary64)))
(.f64 (pow.f64 (-.f64 (.f64 (/.f64 re (*.f64 im im)) re) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (fabs.f64 im))
(.f64 (fabs.f64 im) (pow.f64 (-.f64 (.f64 (/.f64 re (*.f64 im im)) re) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(.f64 (fabs.f64 im) (sqrt.f64 (-.f64 (.f64 (/.f64 re (*.f64 im im)) re) #s(literal -1 binary64))))
(.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 re (*.f64 im im)) re) #s(literal -1 binary64))) (fabs.f64 im))
(pow.f64 (+.f64 (.f64 im im) (.f64 re re)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (.f64 (.f64 im im) (+.f64 (.f64 im im) (.f64 re re)))) (fabs.f64 im))
(/.f64 (sqrt.f64 (.f64 (+.f64 (.f64 im im) (.f64 re re)) (.f64 im im))) (fabs.f64 im))
(sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))))
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))
(fabs.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))
(exp.f64 (.f64 (log.f64 (+.f64 (.f64 im im) (*.f64 re re))) #s(literal 1/2 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (neg.f64 re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 re (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal 3 binary64)) (pow.f64 (neg.f64 re) #s(literal 3 binary64))) (+.f64 (+.f64 (.f64 im im) (.f64 re re)) (-.f64 (.f64 re re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) (neg.f64 re)))))
(/.f64 (-.f64 (+.f64 (.f64 im im) (.f64 re re)) (.f64 re re)) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) (neg.f64 re)))
(/.f64 (-.f64 (+.f64 (.f64 im im) (.f64 re re)) (.f64 re re)) (+.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re))
(/.f64 (-.f64 (pow.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (+.f64 (+.f64 (.f64 im im) (.f64 re re)) (+.f64 (.f64 re re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re))))
(neg.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))
(-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) (neg.f64 (neg.f64 re)))
(-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re)
(+.f64 (neg.f64 re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))
(+.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) (neg.f64 re))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re))) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re))
(.f64 (neg.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 2 binary64)))) (neg.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64)))))
(.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 2 binary64))) (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64))))
(.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64))
(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re))
(pow.f64 (.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 2 binary64)) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64))) #s(literal 2 binary64))
(pow.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64)) #s(literal 1 binary64))
(/.f64 (-.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re)) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re))) (-.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re)))
(/.f64 (+.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 3 binary64)) (pow.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re)) (-.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re)) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re)))))
(neg.f64 (.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 2 binary64)))
(neg.f64 (.f64 #s(literal -2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re)))
(neg.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal -2 binary64)))
(neg.f64 (.f64 #s(literal 2 binary64) (-.f64 re (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))))
(neg.f64 (+.f64 (-.f64 re (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (-.f64 re (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))))
(-.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) re)
(-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) (-.f64 re (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re)))
(-.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (-.f64 re (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))
(sqrt.f64 (.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 2 binary64)) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 2 binary64)))) (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64)))))
(fabs.f64 (.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 2 binary64))) (neg.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64))))))
(fabs.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64)))
(+.f64 (+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (neg.f64 re))
(+.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 1 binary64)) (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (.f64 #s(literal -2 binary64) re))
(+.f64 (.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re)) (.f64 #s(literal 1 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re)))
(+.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal 2 binary64)) (.f64 (neg.f64 re) #s(literal 2 binary64)))
(+.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) (+.f64 (neg.f64 re) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re)))
(+.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re))
(.f64 (sqrt.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 2 binary64)))) (sqrt.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64)))))
(.f64 (pow.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (pow.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 1/2 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)))
(.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64)) (pow.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re)) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re)))
(pow.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64)))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64))))))
(fabs.f64 (neg.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64)))))
(fabs.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re) #s(literal 2 binary64))))
(exp.f64 (.f64 (log.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 2 binary64))))
(*.f64 #s(literal -2 binary64) re)
(*.f64 re #s(literal -2 binary64))
(*.f64 #s(literal 2 binary64) (neg.f64 re))
(neg.f64 (+.f64 re re))
(-.f64 (neg.f64 re) re)
(+.f64 (neg.f64 re) (neg.f64 re))
(.f64 (.f64 (+.f64 (-.f64 im (+.f64 re re)) im) re) #s(literal -2 binary64))
(.f64 (.f64 #s(literal -2 binary64) (+.f64 (-.f64 im (+.f64 re re)) im)) re)
(.f64 (.f64 #s(literal -2 binary64) re) (+.f64 (-.f64 im (+.f64 re re)) im))
(.f64 #s(literal -2 binary64) (.f64 re (+.f64 (-.f64 im (+.f64 re re)) im)))
(.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (.f64 #s(literal -2 binary64) re))
(.f64 re (.f64 #s(literal -2 binary64) (+.f64 (-.f64 im (+.f64 re re)) im)))
(+.f64 (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 im (+.f64 re re))) (.f64 (.f64 #s(literal -2 binary64) re) im))
(+.f64 (.f64 (.f64 #s(literal -2 binary64) re) im) (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 im (+.f64 re re))))
(+.f64 (.f64 (-.f64 im (+.f64 re re)) (.f64 #s(literal -2 binary64) re)) (.f64 im (.f64 #s(literal -2 binary64) re)))
(+.f64 (.f64 im (.f64 #s(literal -2 binary64) re)) (.f64 (-.f64 im (+.f64 re re)) (.f64 #s(literal -2 binary64) re)))
(.f64 (.f64 #s(literal -2 binary64) (+.f64 (-.f64 im (+.f64 re re)) im)) (*.f64 re (/.f64 #s(literal -1 binary64) (-.f64 (+.f64 re re) im))))
(.f64 (.f64 #s(literal -2 binary64) (+.f64 (-.f64 im (+.f64 re re)) im)) (/.f64 re (-.f64 im (+.f64 re re))))
(*.f64 (/.f64 (+.f64 re re) (-.f64 (+.f64 re re) im)) (+.f64 (-.f64 im (+.f64 re re)) im))
(.f64 (/.f64 #s(literal -1 binary64) (-.f64 (+.f64 re re) im)) (.f64 (*.f64 (+.f64 (-.f64 im (+.f64 re re)) im) re) #s(literal -2 binary64)))
(.f64 (.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (+.f64 re re)) (/.f64 #s(literal -1 binary64) (-.f64 im (+.f64 re re))))
(.f64 (.f64 (*.f64 (+.f64 (-.f64 im (+.f64 re re)) im) re) #s(literal -2 binary64)) (/.f64 #s(literal -1 binary64) (-.f64 (+.f64 re re) im)))
(.f64 (.f64 #s(literal -2 binary64) re) (*.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (/.f64 #s(literal -1 binary64) (-.f64 (+.f64 re re) im))))
(.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))
(*.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (/.f64 (+.f64 re re) (-.f64 (+.f64 re re) im)))
(/.f64 (neg.f64 (.f64 (.f64 (*.f64 (+.f64 (-.f64 im (+.f64 re re)) im) re) #s(literal -2 binary64)) #s(literal 1 binary64))) (-.f64 (+.f64 re re) im))
(/.f64 (neg.f64 (neg.f64 (*.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (+.f64 re re)))) (-.f64 (+.f64 re re) im))
(/.f64 (.f64 (.f64 (*.f64 (+.f64 (-.f64 im (+.f64 re re)) im) re) #s(literal -2 binary64)) #s(literal 1 binary64)) (-.f64 im (+.f64 re re)))
(/.f64 (neg.f64 (*.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (+.f64 re re))) (-.f64 im (+.f64 re re)))
(/.f64 (*.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (+.f64 re re)) (-.f64 (+.f64 re re) im))
(/.f64 (.f64 (.f64 (+.f64 (-.f64 im (+.f64 re re)) im) re) #s(literal -2 binary64)) (-.f64 im (+.f64 re re)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 (+.f64 re re) im) (*.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (+.f64 re re))))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) (.f64 (.f64 (+.f64 (-.f64 im (+.f64 re re)) im) re) #s(literal -2 binary64))))
(neg.f64 (/.f64 (*.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (+.f64 re re)) (-.f64 im (+.f64 re re))))
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 (+.f64 re re) im) #s(literal 1 binary64))) #s(literal 1 binary64))
(*.f64 (/.f64 #s(literal 1 binary64) im) (-.f64 im (+.f64 re re)))
(*.f64 (-.f64 (+.f64 re re) im) (/.f64 #s(literal -1 binary64) im))
(*.f64 (-.f64 im (+.f64 re re)) (/.f64 #s(literal 1 binary64) im))
(/.f64 (+.f64 (.f64 im im) (.f64 (neg.f64 im) (.f64 #s(literal -2 binary64) (neg.f64 re)))) (.f64 im im))
(/.f64 (+.f64 (.f64 im im) (.f64 (neg.f64 im) (.f64 (neg.f64 re) #s(literal -2 binary64)))) (.f64 im im))
(/.f64 (+.f64 (.f64 (neg.f64 im) im) (.f64 (neg.f64 im) (.f64 #s(literal -2 binary64) re))) (.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 im im) (.f64 (neg.f64 im) (+.f64 re re))) (*.f64 im im))
(/.f64 (+.f64 (.f64 (neg.f64 im) im) (.f64 im (.f64 #s(literal -2 binary64) (neg.f64 re)))) (.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 (neg.f64 im) im) (.f64 im (.f64 (neg.f64 re) #s(literal -2 binary64)))) (.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 im im) (.f64 im (.f64 #s(literal -2 binary64) re))) (.f64 im im))
(/.f64 (+.f64 (.f64 (neg.f64 im) im) (.f64 im (+.f64 re re))) (*.f64 (neg.f64 im) im))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (neg.f64 im)) (.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (neg.f64 re)))) (.f64 #s(literal 2 binary64) (neg.f64 im)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (neg.f64 im)) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 re) #s(literal -2 binary64)))) (.f64 #s(literal 2 binary64) (neg.f64 im)))
(/.f64 (+.f64 (+.f64 im im) (.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) re))) (+.f64 im im))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (neg.f64 im)) (.f64 #s(literal 2 binary64) (+.f64 re re))) (*.f64 #s(literal 2 binary64) (neg.f64 im)))
(/.f64 (-.f64 (.f64 (-.f64 im re) im) (.f64 im (.f64 re #s(literal 1 binary64)))) (.f64 im im))
(/.f64 (-.f64 (.f64 (-.f64 im re) (neg.f64 (neg.f64 im))) (.f64 im (neg.f64 (neg.f64 re)))) (*.f64 im (neg.f64 (neg.f64 im))))
(/.f64 (-.f64 (.f64 (-.f64 im re) (neg.f64 im)) (.f64 im (neg.f64 re))) (*.f64 (neg.f64 im) im))
(/.f64 (-.f64 (.f64 (-.f64 im re) im) (.f64 im re)) (*.f64 im im))
(/.f64 (-.f64 (.f64 im im) (.f64 (neg.f64 im) (.f64 #s(literal -2 binary64) re))) (.f64 im im))
(/.f64 (-.f64 (.f64 (neg.f64 im) im) (.f64 (neg.f64 im) (+.f64 re re))) (*.f64 (neg.f64 im) im))
(/.f64 (-.f64 (.f64 (neg.f64 im) im) (.f64 im (.f64 #s(literal -2 binary64) re))) (.f64 (neg.f64 im) im))
(/.f64 (-.f64 (.f64 #s(literal 2 binary64) (neg.f64 im)) (.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) re))) (.f64 #s(literal 2 binary64) (neg.f64 im)))
(/.f64 (-.f64 (+.f64 im im) (*.f64 #s(literal 2 binary64) (+.f64 re re))) (+.f64 im im))
(/.f64 (neg.f64 (*.f64 (-.f64 im (+.f64 re re)) #s(literal 1 binary64))) (neg.f64 im))
(/.f64 (neg.f64 (-.f64 (.f64 im im) (.f64 im (+.f64 re re)))) (*.f64 (neg.f64 im) im))
(/.f64 (*.f64 (-.f64 im (+.f64 re re)) #s(literal 1 binary64)) im)
(/.f64 (-.f64 #s(literal 1 binary64) (*.f64 (/.f64 (+.f64 re re) im) (/.f64 (+.f64 re re) im))) (+.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (/.f64 (+.f64 re re) im) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (.f64 (/.f64 (+.f64 re re) im) (/.f64 (+.f64 re re) im)) (.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)))))
(/.f64 (-.f64 (.f64 im im) (.f64 im (+.f64 re re))) (*.f64 im im))
(/.f64 (-.f64 (+.f64 re re) im) (neg.f64 (neg.f64 (neg.f64 im))))
(/.f64 (-.f64 (+.f64 re re) im) (*.f64 im #s(literal -1 binary64)))
(/.f64 (-.f64 (+.f64 re re) im) (neg.f64 im))
(/.f64 #s(literal 1 binary64) (/.f64 im (-.f64 im (+.f64 re re))))
(/.f64 (-.f64 im (+.f64 re re)) (neg.f64 (neg.f64 im)))
(/.f64 (-.f64 im (+.f64 re re)) im)
(neg.f64 (/.f64 (-.f64 (+.f64 re re) im) im))
(-.f64 (/.f64 (-.f64 im re) im) (/.f64 re im))
(-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))
(+.f64 #s(literal 1 binary64) (neg.f64 (/.f64 (+.f64 re re) im)))
(+.f64 #s(literal 1 binary64) (*.f64 (/.f64 re im) #s(literal -2 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (-.f64 im (+.f64 re re))) (pow.f64 (/.f64 #s(literal -1 binary64) im) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (-.f64 im (+.f64 re re))) (neg.f64 im))
(*.f64 (pow.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))) (pow.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (/.f64 #s(literal -1 binary64) #s(literal 2 binary64))))
(*.f64 (pow.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -1 binary64)) (/.f64 #s(literal -1 binary64) (-.f64 (+.f64 re re) im)))
(*.f64 (/.f64 #s(literal -1 binary64) (-.f64 (+.f64 re re) im)) (pow.f64 (/.f64 #s(literal 1 binary64) im) #s(literal -1 binary64)))
(*.f64 (/.f64 #s(literal -1 binary64) (-.f64 (+.f64 re re) im)) im)
(*.f64 #s(literal -1 binary64) (/.f64 #s(literal -1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(*.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal 1 binary64))
(*.f64 #s(literal 1 binary64) (/.f64 im (-.f64 im (+.f64 re re))))
(*.f64 im (/.f64 #s(literal -1 binary64) (-.f64 (+.f64 re re) im)))
(pow.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal -1 binary64))
(/.f64 (.f64 (/.f64 #s(literal -1 binary64) (-.f64 (+.f64 re re) im)) (neg.f64 im)) (.f64 (/.f64 #s(literal 1 binary64) im) (neg.f64 im)))
(/.f64 (.f64 (/.f64 #s(literal -1 binary64) (-.f64 (+.f64 re re) im)) #s(literal 2 binary64)) (.f64 (/.f64 #s(literal 1 binary64) im) #s(literal 2 binary64)))
(/.f64 (.f64 (neg.f64 im) #s(literal 2 binary64)) (.f64 (-.f64 (+.f64 re re) im) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal -1 binary64) (neg.f64 im)) (.f64 (/.f64 (-.f64 (+.f64 re re) im) im) (neg.f64 im)))
(/.f64 (.f64 #s(literal -1 binary64) im) (.f64 (/.f64 (-.f64 (+.f64 re re) im) im) im))
(/.f64 (.f64 (neg.f64 im) (/.f64 #s(literal -1 binary64) (-.f64 (+.f64 re re) im))) (.f64 (neg.f64 im) (/.f64 #s(literal 1 binary64) im)))
(/.f64 (.f64 #s(literal 2 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (+.f64 re re) im))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) im)))
(/.f64 (.f64 #s(literal 2 binary64) (neg.f64 im)) (.f64 #s(literal 2 binary64) (-.f64 (+.f64 re re) im)))
(/.f64 (.f64 (neg.f64 im) #s(literal -1 binary64)) (.f64 (neg.f64 im) (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (.f64 (neg.f64 im) #s(literal 1 binary64)) (.f64 (neg.f64 im) (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (neg.f64 im)))
(/.f64 (.f64 im #s(literal -1 binary64)) (.f64 im (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (*.f64 im #s(literal -1 binary64)) (-.f64 (+.f64 re re) im))
(/.f64 (neg.f64 (/.f64 #s(literal -1 binary64) (-.f64 (+.f64 re re) im))) (neg.f64 (/.f64 #s(literal 1 binary64) im)))
(/.f64 (/.f64 #s(literal -1 binary64) (-.f64 im (+.f64 re re))) (/.f64 #s(literal -1 binary64) im))
(/.f64 (neg.f64 (neg.f64 im)) (-.f64 im (+.f64 re re)))
(/.f64 (+.f64 im im) (*.f64 (-.f64 im (+.f64 re re)) #s(literal 2 binary64)))
(/.f64 (+.f64 im im) (*.f64 #s(literal 2 binary64) (-.f64 im (+.f64 re re))))
(/.f64 (/.f64 #s(literal -1 binary64) (-.f64 (+.f64 re re) im)) (/.f64 #s(literal 1 binary64) im))
(/.f64 (.f64 (neg.f64 im) im) (.f64 (-.f64 (+.f64 re re) im) im))
(/.f64 (.f64 (neg.f64 im) im) (.f64 (-.f64 im (+.f64 re re)) (neg.f64 im)))
(/.f64 (.f64 (neg.f64 im) im) (.f64 (neg.f64 im) (-.f64 im (+.f64 re re))))
(/.f64 (.f64 (neg.f64 im) im) (.f64 im (-.f64 (+.f64 re re) im)))
(/.f64 (neg.f64 im) (-.f64 (+.f64 re re) im))
(/.f64 #s(literal -1 binary64) (/.f64 (-.f64 (+.f64 re re) im) im))
(/.f64 (/.f64 im (-.f64 im (+.f64 re re))) (*.f64 (/.f64 #s(literal 1 binary64) im) im))
(/.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal 1 binary64))
(/.f64 (.f64 im im) (.f64 (-.f64 (+.f64 re re) im) (neg.f64 im)))
(/.f64 (.f64 im im) (.f64 (-.f64 im (+.f64 re re)) im))
(/.f64 (.f64 im im) (.f64 (neg.f64 im) (-.f64 (+.f64 re re) im)))
(/.f64 (.f64 im im) (.f64 im (-.f64 im (+.f64 re re))))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 (+.f64 re re) im) im) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal 1 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im))
(/.f64 #s(literal -2 binary64) (*.f64 (/.f64 (-.f64 (+.f64 re re) im) im) #s(literal 2 binary64)))
(/.f64 #s(literal -2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 im (*.f64 im (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 im (-.f64 im (+.f64 re re)))
(/.f64 #s(literal 2 binary64) (*.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal 2 binary64)))
(/.f64 #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(neg.f64 (*.f64 #s(literal -1 binary64) (/.f64 im (-.f64 im (+.f64 re re)))))
(neg.f64 (/.f64 #s(literal -1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(neg.f64 (/.f64 im (-.f64 (+.f64 re re) im)))
(exp.f64 (*.f64 (log.f64 (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64)))
#s(literal -1 binary64)
(*.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (/.f64 im (-.f64 im (+.f64 re re))))) (/.f64 im (-.f64 im (+.f64 re re))))
(*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) (/.f64 im (-.f64 im (+.f64 re re))))
(/.f64 (+.f64 (.f64 (/.f64 #s(literal -1 binary64) (-.f64 (+.f64 re re) im)) (neg.f64 im)) (.f64 (/.f64 #s(literal 1 binary64) im) (neg.f64 im))) (*.f64 (/.f64 #s(literal 1 binary64) im) (neg.f64 im)))
(/.f64 (+.f64 (/.f64 im (-.f64 im (+.f64 re re))) (.f64 (/.f64 #s(literal 1 binary64) im) im)) (.f64 (/.f64 #s(literal 1 binary64) im) im))
(/.f64 (+.f64 (.f64 (/.f64 #s(literal -1 binary64) (-.f64 (+.f64 re re) im)) #s(literal 2 binary64)) (.f64 (/.f64 #s(literal 1 binary64) im) #s(literal 2 binary64))) (*.f64 (/.f64 #s(literal 1 binary64) im) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 im im) (.f64 (-.f64 (+.f64 re re) im) (neg.f64 im))) (*.f64 (-.f64 (+.f64 re re) im) (neg.f64 im)))
(/.f64 (+.f64 (.f64 (neg.f64 im) im) (.f64 (-.f64 (+.f64 re re) im) im)) (*.f64 (-.f64 (+.f64 re re) im) im))
(/.f64 (+.f64 (.f64 (neg.f64 im) #s(literal 2 binary64)) (.f64 (-.f64 (+.f64 re re) im) #s(literal 2 binary64))) (*.f64 (-.f64 (+.f64 re re) im) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) (neg.f64 im)) (.f64 (/.f64 (-.f64 (+.f64 re re) im) im) (neg.f64 im))) (*.f64 (/.f64 (-.f64 (+.f64 re re) im) im) (neg.f64 im)))
(/.f64 (+.f64 (.f64 #s(literal -1 binary64) im) (.f64 (/.f64 (-.f64 (+.f64 re re) im) im) im)) (*.f64 (/.f64 (-.f64 (+.f64 re re) im) im) im))
(/.f64 (+.f64 #s(literal -2 binary64) (.f64 (/.f64 (-.f64 (+.f64 re re) im) im) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 (+.f64 re re) im) im) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 im)) (.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (neg.f64 im))) (*.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (neg.f64 im)))
(/.f64 (+.f64 #s(literal 2 binary64) (.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal 2 binary64))) (.f64 (/.f64 (-.f64 im (+.f64 re re)) im) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (neg.f64 im) im) (.f64 (-.f64 im (+.f64 re re)) (neg.f64 im))) (*.f64 (-.f64 im (+.f64 re re)) (neg.f64 im)))
(/.f64 (+.f64 (.f64 im im) (.f64 (-.f64 im (+.f64 re re)) im)) (*.f64 (-.f64 im (+.f64 re re)) im))
(/.f64 (+.f64 (+.f64 im im) (.f64 (-.f64 im (+.f64 re re)) #s(literal 2 binary64))) (.f64 (-.f64 im (+.f64 re re)) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (neg.f64 im) (/.f64 #s(literal 1 binary64) im)) (.f64 (neg.f64 im) (/.f64 #s(literal -1 binary64) (-.f64 (+.f64 re re) im)))) (*.f64 (neg.f64 im) (/.f64 #s(literal 1 binary64) im)))
(/.f64 (+.f64 (.f64 (neg.f64 im) (-.f64 (+.f64 re re) im)) (.f64 im im)) (*.f64 (neg.f64 im) (-.f64 (+.f64 re re) im)))
(/.f64 (+.f64 (.f64 (neg.f64 im) (/.f64 (-.f64 (+.f64 re re) im) im)) (.f64 (neg.f64 im) #s(literal -1 binary64))) (*.f64 (neg.f64 im) (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (+.f64 (.f64 (neg.f64 im) (/.f64 (-.f64 im (+.f64 re re)) im)) (.f64 (neg.f64 im) #s(literal 1 binary64))) (*.f64 (neg.f64 im) (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 (+.f64 (.f64 (neg.f64 im) (-.f64 im (+.f64 re re))) (.f64 (neg.f64 im) im)) (*.f64 (neg.f64 im) (-.f64 im (+.f64 re re))))
(/.f64 (+.f64 (.f64 im (-.f64 (+.f64 re re) im)) (.f64 (neg.f64 im) im)) (*.f64 im (-.f64 (+.f64 re re) im)))
(/.f64 (+.f64 (.f64 im (/.f64 (-.f64 (+.f64 re re) im) im)) (.f64 im #s(literal -1 binary64))) (*.f64 im (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (+.f64 (.f64 im (/.f64 (-.f64 im (+.f64 re re)) im)) im) (.f64 im (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 (+.f64 (.f64 im (-.f64 im (+.f64 re re))) (.f64 im im)) (*.f64 im (-.f64 im (+.f64 re re))))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) im)) (.f64 #s(literal 2 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (+.f64 re re) im)))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) im)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (-.f64 (+.f64 re re) im)) (.f64 #s(literal 2 binary64) (neg.f64 im))) (*.f64 #s(literal 2 binary64) (-.f64 (+.f64 re re) im)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)) #s(literal -2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 (-.f64 (+.f64 re re) im) im)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)))
(/.f64 (+.f64 (.f64 #s(literal 2 binary64) (-.f64 im (+.f64 re re))) (+.f64 im im)) (.f64 #s(literal 2 binary64) (-.f64 im (+.f64 re re))))
(/.f64 (neg.f64 (+.f64 (-.f64 im (+.f64 re re)) im)) (-.f64 (+.f64 re re) im))
(/.f64 (-.f64 (neg.f64 im) (-.f64 im (+.f64 re re))) (-.f64 (+.f64 re re) im))
(/.f64 (-.f64 (-.f64 (+.f64 re re) im) im) (-.f64 (+.f64 re re) im))
(/.f64 (-.f64 (*.f64 (/.f64 im (-.f64 im (+.f64 re re))) (/.f64 im (-.f64 im (+.f64 re re)))) #s(literal 1 binary64)) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal 1 binary64)))
(/.f64 (+.f64 (pow.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (*.f64 (/.f64 im (-.f64 im (+.f64 re re))) (/.f64 im (-.f64 im (+.f64 re re)))) (-.f64 #s(literal 1 binary64) (/.f64 im (-.f64 im (+.f64 re re))))))
(/.f64 (-.f64 (.f64 (/.f64 im (-.f64 im (+.f64 re re))) (/.f64 im (-.f64 im (+.f64 re re)))) (.f64 #s(literal -1 binary64) #s(literal -1 binary64))) (+.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))
(/.f64 (-.f64 (pow.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal 3 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 im (-.f64 im (+.f64 re re))) (/.f64 im (-.f64 im (+.f64 re re)))) (+.f64 (.f64 #s(literal -1 binary64) #s(literal -1 binary64)) (*.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))))
(/.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) #s(literal 1 binary64))
(/.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (-.f64 im (+.f64 re re)))
(neg.f64 (-.f64 #s(literal -1 binary64) (/.f64 im (-.f64 im (+.f64 re re)))))
(-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))
(+.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (/.f64 im (-.f64 im (+.f64 re re))))
(.f64 (.f64 #s(literal 1 binary64) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))) im)
(.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) #s(literal 1 binary64))
(*.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im)
(.f64 #s(literal 1 binary64) (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im))
(.f64 im (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(*.f64 im (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))
(neg.f64 (*.f64 (-.f64 #s(literal -1 binary64) (/.f64 im (-.f64 im (+.f64 re re)))) im))
(+.f64 (*.f64 im (/.f64 im (-.f64 im (+.f64 re re)))) im)
(+.f64 (*.f64 (/.f64 im (-.f64 im (+.f64 re re))) im) im)
(.f64 (.f64 #s(literal 1 binary64) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))) im)
(.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) #s(literal 1 binary64))
(*.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im)
(.f64 #s(literal 1 binary64) (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im))
(.f64 im (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(*.f64 im (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))
(neg.f64 (*.f64 (-.f64 #s(literal -1 binary64) (/.f64 im (-.f64 im (+.f64 re re)))) im))
(+.f64 (*.f64 im (/.f64 im (-.f64 im (+.f64 re re)))) im)
(+.f64 (*.f64 (/.f64 im (-.f64 im (+.f64 re re))) im) im)
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))) (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im))) (*.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 #s(literal -1 binary64) (/.f64 im (-.f64 im (+.f64 re re)))) im) (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))))) (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))))) (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))))
(/.f64 (neg.f64 (+.f64 (.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (-.f64 (+.f64 re re) im)) (*.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (+.f64 re re)))) (-.f64 im (+.f64 re re)))
(/.f64 (neg.f64 (+.f64 (.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (-.f64 im (+.f64 re re))) (.f64 (.f64 (+.f64 (-.f64 im (+.f64 re re)) im) re) #s(literal -2 binary64)))) (-.f64 (+.f64 re re) im))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (-.f64 (+.f64 re re) im)) (*.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (+.f64 re re))) (-.f64 (+.f64 re re) im))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (-.f64 im (+.f64 re re))) (.f64 (.f64 (+.f64 (-.f64 im (+.f64 re re)) im) re) #s(literal -2 binary64))) (-.f64 im (+.f64 re re)))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im)) (.f64 (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))) (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))))) (-.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (*.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))) (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))) (.f64 (.f64 (-.f64 #s(literal -1 binary64) (/.f64 im (-.f64 im (+.f64 re re)))) im) (.f64 (-.f64 #s(literal -1 binary64) (/.f64 im (-.f64 im (+.f64 re re)))) im))) (+.f64 (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))) (*.f64 (-.f64 #s(literal -1 binary64) (/.f64 im (-.f64 im (+.f64 re re)))) im)))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im)) (-.f64 (.f64 (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))) (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))) (.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (*.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))))))
(/.f64 (-.f64 (pow.f64 (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 #s(literal -1 binary64) (/.f64 im (-.f64 im (+.f64 re re)))) im) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))) (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))) (+.f64 (.f64 (.f64 (-.f64 #s(literal -1 binary64) (/.f64 im (-.f64 im (+.f64 re re)))) im) (.f64 (-.f64 #s(literal -1 binary64) (/.f64 im (-.f64 im (+.f64 re re)))) im)) (.f64 (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))) (*.f64 (-.f64 #s(literal -1 binary64) (/.f64 im (-.f64 im (+.f64 re re)))) im)))))
(/.f64 (-.f64 (.f64 (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))) (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))) (.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im))) (-.f64 (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))) (*.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im)))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))) #s(literal 3 binary64)) (pow.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))) (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))) (-.f64 (.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im)) (.f64 (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))) (*.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im)))))
(neg.f64 (-.f64 (.f64 (-.f64 #s(literal -1 binary64) (/.f64 im (-.f64 im (+.f64 re re)))) im) (.f64 (*.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))))
(-.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (*.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (+.f64 re re)) (/.f64 #s(literal -1 binary64) (-.f64 (+.f64 re re) im))))
(-.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (neg.f64 (+.f64 (-.f64 im (+.f64 re re)) im)) (/.f64 (+.f64 re re) (-.f64 (+.f64 re re) im))))
(-.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (neg.f64 (.f64 (*.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))))
(-.f64 (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))) (*.f64 (-.f64 #s(literal -1 binary64) (/.f64 im (-.f64 im (+.f64 re re)))) im))
(+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (*.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))))
(+.f64 (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))) (*.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im))
(.f64 (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))))))) (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (*.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))))))))
(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))))) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (*.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))))))
(pow.f64 (.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))))) #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (*.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (*.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))))) #s(literal 2 binary64))
(pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (*.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))))) #s(literal 1 binary64))
#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (*.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))))
(sqrt.f64 (.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))))) #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (*.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))))))) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (*.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))))))))
(fabs.f64 (.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))))) (neg.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (*.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))))))))
(fabs.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (*.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))))))
(.f64 (sqrt.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))))))) (sqrt.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (*.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))))))))
(.f64 (pow.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (*.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))))) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(pow.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (*.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))))) #s(literal 1/2 binary64))
(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (*.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))))))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (*.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))))))))
(fabs.f64 (neg.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (*.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64))))))))
(fabs.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (*.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))))))
(exp.f64 (.f64 (log.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (*.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (*.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (*.f64 #s(literal -2 binary64) re) (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)))))))
(.f64 (.f64 (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64)) (fabs.f64 im)) (fabs.f64 im))
(.f64 (.f64 (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64)) (neg.f64 im)) (neg.f64 im))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 im) im) (.f64 re re))) (.f64 re re))
(.f64 (+.f64 im (.f64 re (/.f64 re im))) im)
(.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 im im) (.f64 re re))) (.f64 re re))
(.f64 (fabs.f64 im) (.f64 (fabs.f64 im) (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64))))
(.f64 (neg.f64 im) (.f64 (neg.f64 im) (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64))))
(.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))
(.f64 (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64)) (.f64 im im))
(.f64 (.f64 im im) (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64)))
(.f64 im (+.f64 im (.f64 re (/.f64 re im))))
(pow.f64 (.f64 (+.f64 (.f64 im im) (.f64 re re)) (+.f64 (.f64 im im) (*.f64 re re))) #s(literal 1/2 binary64))
(pow.f64 (+.f64 (.f64 im im) (.f64 re re)) #s(literal 1 binary64))
(pow.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal 2 binary64))
(/.f64 (neg.f64 (.f64 (.f64 im im) (+.f64 (.f64 im im) (.f64 re re)))) (*.f64 (neg.f64 im) im))
(/.f64 (neg.f64 (.f64 (+.f64 (.f64 im im) (.f64 re re)) (.f64 im im))) (*.f64 (neg.f64 im) im))
(/.f64 (.f64 (.f64 im im) (+.f64 (.f64 im im) (.f64 re re))) (*.f64 im im))
(/.f64 (.f64 (+.f64 (.f64 im im) (.f64 re re)) (.f64 im im)) (*.f64 im im))
(/.f64 (-.f64 (.f64 (.f64 im im) (.f64 im im)) (.f64 (.f64 re re) (.f64 re re))) (-.f64 (.f64 im im) (.f64 re re)))
(/.f64 (-.f64 (.f64 (.f64 re re) (.f64 re re)) (.f64 (.f64 (neg.f64 im) im) (.f64 (neg.f64 im) im))) (+.f64 (.f64 re re) (.f64 (neg.f64 im) im)))
(/.f64 (+.f64 (pow.f64 (.f64 im im) #s(literal 3 binary64)) (pow.f64 (.f64 re re) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 im im) (.f64 im im)) (-.f64 (.f64 (.f64 re re) (.f64 re re)) (.f64 (.f64 im im) (*.f64 re re)))))
(/.f64 (-.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 im) im) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 re re) (.f64 re re)) (+.f64 (.f64 (.f64 (neg.f64 im) im) (.f64 (neg.f64 im) im)) (.f64 (.f64 re re) (*.f64 (neg.f64 im) im)))))
(/.f64 (-.f64 (.f64 (.f64 re re) (.f64 re re)) (.f64 (.f64 im im) (.f64 im im))) (-.f64 (.f64 re re) (.f64 im im)))
(/.f64 (+.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) (pow.f64 (.f64 im im) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 re re) (.f64 re re)) (-.f64 (.f64 (.f64 im im) (.f64 im im)) (.f64 (.f64 re re) (*.f64 im im)))))
(neg.f64 (-.f64 (.f64 (neg.f64 im) im) (.f64 re re)))
(-.f64 (.f64 im im) (.f64 (neg.f64 re) re))
(-.f64 (.f64 re re) (.f64 (neg.f64 im) im))
(sqrt.f64 (.f64 (+.f64 (.f64 im im) (.f64 re re)) (+.f64 (.f64 im im) (*.f64 re re))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))
(fabs.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))))
(fabs.f64 (+.f64 (.f64 im im) (.f64 re re)))
(+.f64 (.f64 (.f64 im im) (.f64 (/.f64 re (.f64 im im)) re)) (*.f64 im im))
(+.f64 (.f64 (.f64 (/.f64 re (.f64 im im)) re) (.f64 im im)) (*.f64 im im))
(+.f64 (.f64 im im) (.f64 (.f64 im im) (.f64 (/.f64 re (*.f64 im im)) re)))
(+.f64 (.f64 im im) (.f64 (.f64 (/.f64 re (.f64 im im)) re) (*.f64 im im)))
(+.f64 (.f64 im im) (.f64 re re))
(+.f64 (.f64 re re) (.f64 (neg.f64 (neg.f64 im)) im))
(+.f64 (.f64 re re) (.f64 im im))
(.f64 (sqrt.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (sqrt.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))
(.f64 (sqrt.f64 (.f64 (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64)) (fabs.f64 im))) (sqrt.f64 (fabs.f64 im)))
(.f64 (sqrt.f64 (.f64 (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64)) (neg.f64 im))) (sqrt.f64 (neg.f64 im)))
(.f64 (sqrt.f64 (fabs.f64 im)) (sqrt.f64 (.f64 (fabs.f64 im) (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64)))))
(.f64 (sqrt.f64 (neg.f64 im)) (sqrt.f64 (.f64 (neg.f64 im) (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64)))))
(.f64 (pow.f64 (.f64 (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64)) (fabs.f64 im)) #s(literal 1/2 binary64)) (pow.f64 (fabs.f64 im) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64)) (neg.f64 im)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 im) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (fabs.f64 im) #s(literal 1/2 binary64)) (pow.f64 (.f64 (fabs.f64 im) (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (neg.f64 im) #s(literal 1/2 binary64)) (pow.f64 (.f64 (neg.f64 im) (-.f64 (.f64 (/.f64 re (.f64 im im)) re) #s(literal -1 binary64))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (+.f64 (.f64 im im) (.f64 re re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (+.f64 (.f64 im im) (*.f64 re re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (sqrt.f64 im) (sqrt.f64 (+.f64 im (.f64 re (/.f64 re im)))))
(.f64 (sqrt.f64 (+.f64 im (.f64 re (/.f64 re im)))) (sqrt.f64 im))
(.f64 (pow.f64 im #s(literal 1/2 binary64)) (pow.f64 (+.f64 im (.f64 re (/.f64 re im))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (+.f64 im (.f64 re (/.f64 re im))) #s(literal 1/2 binary64)) (pow.f64 im #s(literal 1/2 binary64)))
(.f64 (pow.f64 (-.f64 (.f64 (/.f64 re (*.f64 im im)) re) #s(literal -1 binary64)) #s(literal 1/2 binary64)) (fabs.f64 im))
(.f64 (fabs.f64 im) (pow.f64 (-.f64 (.f64 (/.f64 re (*.f64 im im)) re) #s(literal -1 binary64)) #s(literal 1/2 binary64)))
(.f64 (fabs.f64 im) (sqrt.f64 (-.f64 (.f64 (/.f64 re (*.f64 im im)) re) #s(literal -1 binary64))))
(.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 re (*.f64 im im)) re) #s(literal -1 binary64))) (fabs.f64 im))
(pow.f64 (+.f64 (.f64 im im) (.f64 re re)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (.f64 (.f64 im im) (+.f64 (.f64 im im) (.f64 re re)))) (fabs.f64 im))
(/.f64 (sqrt.f64 (.f64 (+.f64 (.f64 im im) (.f64 re re)) (.f64 im im))) (fabs.f64 im))
(sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))))
(fabs.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))
(fabs.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))
(exp.f64 (.f64 (log.f64 (+.f64 (.f64 im im) (*.f64 re re))) #s(literal 1/2 binary64)))
(*.f64 (/.f64 #s(literal 1 binary64) re) #s(literal -2 binary64))
(*.f64 #s(literal -2 binary64) (/.f64 #s(literal 1 binary64) re))
(*.f64 #s(literal 2 binary64) (/.f64 #s(literal -1 binary64) re))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) (neg.f64 re)) (.f64 (neg.f64 re) #s(literal 1 binary64))) (*.f64 re re))
(/.f64 #s(literal 1 binary64) (/.f64 (neg.f64 re) #s(literal 2 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 re #s(literal -2 binary64)))
(/.f64 #s(literal -2 binary64) (neg.f64 (neg.f64 re)))
(/.f64 #s(literal -2 binary64) re)
(/.f64 #s(literal 2 binary64) (neg.f64 (neg.f64 (neg.f64 re))))
(/.f64 #s(literal 2 binary64) (neg.f64 re))
(neg.f64 (/.f64 #s(literal 2 binary64) re))
(+.f64 (/.f64 #s(literal -1 binary64) re) (/.f64 #s(literal -1 binary64) re))
(.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64)) (/.f64 #s(literal 1 binary64) re))
(.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))
(.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) (/.f64 #s(literal -2 binary64) re))
(.f64 #s(literal -2 binary64) (.f64 (/.f64 #s(literal 1 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))
(/.f64 (neg.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))) (neg.f64 (neg.f64 re)))
(/.f64 (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) #s(literal 2 binary64))) (neg.f64 (neg.f64 re)))
(/.f64 (neg.f64 (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) #s(literal -2 binary64)))) (neg.f64 (neg.f64 re)))
(/.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) (neg.f64 re))
(/.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) #s(literal 2 binary64)) (neg.f64 re))
(/.f64 (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) #s(literal -2 binary64))) (neg.f64 re))
(/.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) #s(literal -2 binary64)) re)
(/.f64 #s(literal 1 binary64) (/.f64 re (.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) #s(literal -2 binary64))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (neg.f64 (/.f64 #s(literal -2 binary64) re)) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) #s(literal 1 binary64))
(.f64 #s(literal 1 binary64) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (neg.f64 im)) (.f64 (neg.f64 re) (neg.f64 im))) (.f64 (neg.f64 re) (neg.f64 im)))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) im) (.f64 (neg.f64 re) im)) (.f64 (neg.f64 re) im))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (.f64 (neg.f64 re) #s(literal 2 binary64))) (.f64 (neg.f64 re) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal 2 binary64)) (neg.f64 im)) (.f64 (neg.f64 re) (neg.f64 im))) (.f64 (neg.f64 re) (neg.f64 im)))
(/.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal 2 binary64)) im) (.f64 (neg.f64 re) im)) (.f64 (neg.f64 re) im))
(/.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal 2 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 re) #s(literal 2 binary64))) (.f64 (neg.f64 re) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (neg.f64 im)) (.f64 (neg.f64 re) (neg.f64 im))) (.f64 (neg.f64 re) (neg.f64 im)))
(/.f64 (+.f64 (.f64 (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) im) (.f64 (neg.f64 re) im)) (.f64 (neg.f64 re) im))
(/.f64 (+.f64 (.f64 (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (neg.f64 re) #s(literal 2 binary64))) (.f64 (neg.f64 re) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64)) (neg.f64 im)) (.f64 re (neg.f64 im))) (.f64 re (neg.f64 im)))
(/.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64)) im) (.f64 re im)) (.f64 re im))
(/.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64)) #s(literal 2 binary64)) (+.f64 re re)) (+.f64 re re))
(/.f64 (+.f64 (.f64 (neg.f64 im) (neg.f64 re)) (.f64 (neg.f64 im) (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) (.f64 (neg.f64 im) (neg.f64 re)))
(/.f64 (+.f64 (.f64 (neg.f64 im) (neg.f64 re)) (.f64 (neg.f64 im) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal 2 binary64)))) (.f64 (neg.f64 im) (neg.f64 re)))
(/.f64 (+.f64 (.f64 (neg.f64 im) (neg.f64 re)) (.f64 (neg.f64 im) (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))))) (.f64 (neg.f64 im) (neg.f64 re)))
(/.f64 (+.f64 (.f64 (neg.f64 im) re) (.f64 (neg.f64 im) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64)))) (.f64 (neg.f64 im) re))
(/.f64 (+.f64 (.f64 im (neg.f64 re)) (.f64 im (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) (.f64 im (neg.f64 re)))
(/.f64 (+.f64 (.f64 im (neg.f64 re)) (.f64 im (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal 2 binary64)))) (.f64 im (neg.f64 re)))
(/.f64 (+.f64 (.f64 im (neg.f64 re)) (.f64 im (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))))) (.f64 im (neg.f64 re)))
(/.f64 (+.f64 (.f64 im re) (.f64 im (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64)))) (.f64 im re))
(/.f64 (+.f64 (.f64 #s(literal -2 binary64) re) (.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) (.f64 #s(literal -2 binary64) re))
(/.f64 (+.f64 (.f64 #s(literal -2 binary64) re) (.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) re))
(/.f64 (+.f64 (.f64 #s(literal -2 binary64) re) (.f64 #s(literal 2 binary64) (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))))) (.f64 #s(literal -2 binary64) re))
(/.f64 (+.f64 (+.f64 re re) (.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64)))) (+.f64 re re))
(/.f64 (-.f64 (.f64 (neg.f64 im) re) (.f64 (neg.f64 im) (.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -2 binary64)))) (.f64 (neg.f64 im) re))
(/.f64 (-.f64 (.f64 (neg.f64 im) (neg.f64 re)) (.f64 (neg.f64 im) (.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)))) (.f64 (neg.f64 im) (neg.f64 re)))
(/.f64 (-.f64 (.f64 (neg.f64 im) re) (.f64 (neg.f64 im) (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))))) (.f64 (neg.f64 im) re))
(/.f64 (-.f64 (.f64 (neg.f64 im) (neg.f64 re)) (.f64 (neg.f64 im) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64)))) (.f64 (neg.f64 im) (neg.f64 re)))
(/.f64 (-.f64 (.f64 im re) (.f64 im (.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -2 binary64)))) (.f64 im re))
(/.f64 (-.f64 (.f64 im (neg.f64 re)) (.f64 im (.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)))) (.f64 im (neg.f64 re)))
(/.f64 (-.f64 (.f64 im re) (.f64 im (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))))) (.f64 im re))
(/.f64 (-.f64 (.f64 im (neg.f64 re)) (.f64 im (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64)))) (.f64 im (neg.f64 re)))
(/.f64 (-.f64 (+.f64 re re) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -2 binary64)))) (+.f64 re re))
(/.f64 (-.f64 (.f64 #s(literal -2 binary64) re) (.f64 #s(literal 2 binary64) (.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)))) (.f64 #s(literal -2 binary64) re))
(/.f64 (-.f64 (+.f64 re re) (.f64 #s(literal 2 binary64) (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))))) (+.f64 re re))
(/.f64 (-.f64 (.f64 #s(literal -2 binary64) re) (.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64)))) (.f64 #s(literal -2 binary64) re))
(/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (neg.f64 im)) (.f64 re (neg.f64 im)))
(/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) im) (.f64 re im))
(/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) #s(literal -2 binary64))) #s(literal 2 binary64)) (+.f64 re re))
(/.f64 (.f64 (neg.f64 im) (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64)))) (.f64 (neg.f64 im) re))
(/.f64 (.f64 im (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64)))) (.f64 im re))
(/.f64 (.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) #s(literal -2 binary64)))) (+.f64 re re))
(/.f64 (neg.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64)))) (neg.f64 re))
(/.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) re)
(/.f64 (-.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) (.f64 re re)) #s(literal 1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 1 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) (.f64 re re))) (-.f64 #s(literal 1 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))))
(/.f64 (-.f64 #s(literal 1 binary64) (/.f64 (.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) (.f64 re re))) (+.f64 #s(literal 1 binary64) (.f64 (neg.f64 (/.f64 #s(literal -2 binary64) re)) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))))
(/.f64 (+.f64 (pow.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) (.f64 re re)) (-.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 1 binary64)))))
(/.f64 (-.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (neg.f64 (/.f64 #s(literal -2 binary64) re)) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (+.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) (.f64 re re)) (.f64 #s(literal 1 binary64) (.f64 (neg.f64 (/.f64 #s(literal -2 binary64) re)) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) (.f64 re re)) (.f64 #s(literal 1 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))))))
(neg.f64 (.f64 #s(literal -1 binary64) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))))
(neg.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) #s(literal -1 binary64)))
(neg.f64 (neg.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64))))
(-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (.f64 (neg.f64 (/.f64 #s(literal -2 binary64) re)) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))
(+.f64 (.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 1 binary64)) #s(literal 1 binary64))
(+.f64 (.f64 #s(literal 1 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) #s(literal 1 binary64))
(+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 1 binary64))
(+.f64 #s(literal 1 binary64) (.f64 (neg.f64 (neg.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))) (/.f64 #s(literal -2 binary64) re)))
(+.f64 #s(literal 1 binary64) (neg.f64 (.f64 (neg.f64 (/.f64 #s(literal -2 binary64) re)) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))))
(+.f64 #s(literal 1 binary64) (.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 1 binary64)))
(+.f64 #s(literal 1 binary64) (.f64 #s(literal 1 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))))
(+.f64 #s(literal 1 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))
(.f64 (neg.f64 (neg.f64 (fabs.f64 (-.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))))) (neg.f64 (neg.f64 (fabs.f64 (-.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))))))
(.f64 (pow.f64 (fabs.f64 (-.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (-.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))) #s(literal 1 binary64)))
(.f64 (pow.f64 (fabs.f64 (-.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) #s(literal 1 binary64)) (fabs.f64 (-.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))))
(.f64 (pow.f64 (neg.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64))) #s(literal 1 binary64)))
(.f64 (pow.f64 (neg.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) #s(literal 1 binary64)) (neg.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64))))
(.f64 (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)) (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))))
(.f64 (.f64 #s(literal -1 binary64) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (.f64 #s(literal -1 binary64) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64))))
(.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) #s(literal -1 binary64)) (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64)) #s(literal -1 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 re re)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)))) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)))
(.f64 (pow.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))) (pow.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64)) (/.f64 #s(literal 2 binary64) #s(literal 2 binary64))))
(.f64 (neg.f64 (fabs.f64 (-.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))))) (neg.f64 (fabs.f64 (-.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))))))
(.f64 (pow.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) #s(literal 1 binary64)) (pow.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64)) #s(literal 1 binary64)))
(.f64 (pow.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) #s(literal 1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64)))
(.f64 (fabs.f64 (-.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) (fabs.f64 (-.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))))
(.f64 (neg.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (neg.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64))))
(.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (pow.f64 #s(literal 1 binary64) #s(literal 2 binary64)))
(.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64)))
(pow.f64 (neg.f64 (fabs.f64 (-.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))))) #s(literal 2 binary64))
(pow.f64 (fabs.f64 (-.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))) #s(literal 2 binary64))
(pow.f64 (neg.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64))) #s(literal 2 binary64))
(pow.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64))) #s(literal 1 binary64))
(pow.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64)) #s(literal 2 binary64))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) re) (.f64 re (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))))) (.f64 re re))
(/.f64 (+.f64 (.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) re) (.f64 re (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))))) (.f64 re re))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) re) (.f64 re (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))))) (.f64 re re))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) re) (.f64 re (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))))) (.f64 re re))
(/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64)))) (.f64 re re))
(/.f64 (pow.f64 (fabs.f64 (-.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) #s(literal 1 binary64)) (pow.f64 (fabs.f64 (-.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) #s(literal -1 binary64)))
(/.f64 (pow.f64 (neg.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) #s(literal 1 binary64)) (pow.f64 (neg.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) #s(literal -1 binary64)))
(/.f64 (-.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (.f64 (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 re re)) (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 re re)))) (-.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 re re))))
(/.f64 (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 re re)) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (-.f64 (.f64 (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 re re)) (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 re re))) (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (*.f64 re re))))))
(/.f64 (pow.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) #s(literal 1 binary64)) (pow.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) #s(literal -1 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (fabs.f64 (-.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (neg.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64))) #s(literal -2 binary64)))
(/.f64 #s(literal 1 binary64) (pow.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64)) #s(literal -2 binary64)))
(neg.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (neg.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64)))))
(neg.f64 (.f64 (neg.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64))))
(-.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (.f64 (neg.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))))
(-.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (/.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64)) (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64)))) (.f64 (neg.f64 re) re)))
(-.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (neg.f64 (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 re re))))
(sqrt.f64 (.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64)))))
(fabs.f64 (-.f64 (.f64 (neg.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))))
(fabs.f64 (-.f64 (/.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64)) (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64)))) (.f64 (neg.f64 re) re)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))))
(fabs.f64 (-.f64 (neg.f64 (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 re re))) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))))
(fabs.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (neg.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64)))))
(fabs.f64 (.f64 (neg.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64))))
(fabs.f64 (neg.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64)))))
(fabs.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64))))
(exp.f64 (.f64 (log.f64 (fabs.f64 (-.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))))) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (neg.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)))) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) #s(literal 2 binary64)))
(+.f64 (+.f64 (/.f64 (.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) (.f64 re re)) (.f64 #s(literal 2 binary64) (.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 1 binary64)))) #s(literal 1 binary64))
(+.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))))) (/.f64 (.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) (*.f64 re re)))
(+.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 2 binary64) (.f64 #s(literal 1 binary64) (.f64 (neg.f64 (/.f64 #s(literal -2 binary64) re)) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))))) (/.f64 (.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) (*.f64 re re)))
(+.f64 (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 re re)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)))
(+.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 re re)))
#s(literal 1 binary64)
(.f64 (+.f64 (fabs.f64 (-.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) #s(literal 1 binary64)) (-.f64 (fabs.f64 (-.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))) #s(literal 1 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))))) (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64))))
(.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 0 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))))) (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64))))
(.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) (-.f64 (neg.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64))) #s(literal 1 binary64)))
(.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)))) (.f64 #s(literal -1 binary64) #s(literal -1 binary64))) (-.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64))) #s(literal -1 binary64)))
(/.f64 (+.f64 (pow.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) #s(literal 3 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)))) (-.f64 (.f64 #s(literal -1 binary64) #s(literal -1 binary64)) (.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64))) #s(literal -1 binary64)))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)))) #s(literal 1 binary64)) (+.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) #s(literal 1 binary64)))
(/.f64 (-.f64 (pow.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)))) (+.f64 #s(literal 1 binary64) (.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) #s(literal 1 binary64)))))
(neg.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))))
(-.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64))) #s(literal 1 binary64))
(+.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 2 binary64)) #s(literal -1 binary64)))
(+.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 1 binary64))))
(+.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64))) (.f64 #s(literal -1 binary64) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 2 binary64))))
(+.f64 (.f64 #s(literal 1 binary64) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64))) (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 1 binary64)) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 2 binary64))))
(+.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64))) #s(literal -1 binary64))
(+.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (+.f64 (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 re re)) #s(literal -1 binary64)))
(+.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (.f64 re re)) #s(literal 1 binary64)))
(+.f64 #s(literal -1 binary64) (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64))))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)))) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 1 binary64)) #s(literal 1 binary64))) #s(literal 1 binary64))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)))) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64)))
(/.f64 (+.f64 (.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (.f64 (neg.f64 re) #s(literal 0 binary64))) (.f64 (neg.f64 re) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal 2 binary64)) #s(literal 2 binary64)) (.f64 (neg.f64 re) #s(literal 0 binary64))) (.f64 (neg.f64 re) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (neg.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) #s(literal 2 binary64)) (.f64 (neg.f64 re) #s(literal 0 binary64))) (.f64 (neg.f64 re) #s(literal 2 binary64)))
(/.f64 (+.f64 (.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64)) #s(literal 2 binary64)) (*.f64 re #s(literal 0 binary64))) (+.f64 re re))
(/.f64 (-.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (neg.f64 im)) (.f64 re (neg.f64 im))) (*.f64 re (neg.f64 im)))
(/.f64 (-.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) im) (.f64 re im)) (*.f64 re im))
(/.f64 (-.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) #s(literal -2 binary64))) #s(literal 2 binary64)) (+.f64 re re)) (+.f64 re re))
(/.f64 (-.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (.f64 #s(literal -1 binary64) #s(literal -1 binary64))) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 2 binary64)))
(/.f64 (-.f64 #s(literal 1 binary64) (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 1 binary64)))) (-.f64 #s(literal 1 binary64) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 1 binary64))))
(/.f64 (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (-.f64 (.f64 #s(literal -1 binary64) #s(literal -1 binary64)) (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64)) #s(literal -1 binary64)))))
(/.f64 (+.f64 (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64)) (pow.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 1 binary64)) #s(literal 3 binary64))) (+.f64 #s(literal 1 binary64) (-.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 1 binary64))) (.f64 #s(literal 1 binary64) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 1 binary64))))))
(/.f64 (-.f64 (pow.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 2 binary64))))
(/.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64))) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)))
(neg.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))))
(-.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64)) #s(literal 1 binary64))
(-.f64 #s(literal 1 binary64) (-.f64 (.f64 (neg.f64 (/.f64 #s(literal -2 binary64) re)) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64)))
(-.f64 #s(literal 1 binary64) (+.f64 (.f64 (neg.f64 (/.f64 #s(literal -2 binary64) re)) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 1 binary64)))
(-.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 1 binary64))))
(+.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 1 binary64)) #s(literal 1 binary64))
(+.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64)) #s(literal -1 binary64))
(+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 0 binary64))
(+.f64 #s(literal -1 binary64) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64)))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 1 binary64)))
(.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)))) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64)))
(.f64 (-.f64 #s(literal 1 binary64) (/.f64 (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (.f64 re (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)))))) (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (.f64 re (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)))))
(.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)) (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))))))
(.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (/.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))))
(.f64 (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 0 binary64))))
(.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) (/.f64 #s(literal -1 binary64) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 0 binary64))))
(.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64))) (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))))
(/.f64 (+.f64 (.f64 (neg.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)))) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) #s(literal -1 binary64))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64))))
(/.f64 (+.f64 (.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64))) (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)) #s(literal -1 binary64))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (neg.f64 im)) (.f64 re (neg.f64 im))) (*.f64 re (neg.f64 im)))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) im) (.f64 re im)) (*.f64 re im))
(/.f64 (+.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) #s(literal -2 binary64))) #s(literal 2 binary64)) (+.f64 re re)) (+.f64 re re))
(/.f64 (+.f64 (.f64 (neg.f64 im) re) (.f64 (neg.f64 im) (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))))) (*.f64 (neg.f64 im) re))
(/.f64 (+.f64 (.f64 im re) (.f64 im (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))))) (*.f64 im re))
(/.f64 (+.f64 (+.f64 re re) (.f64 #s(literal 2 binary64) (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) #s(literal -2 binary64))))) (+.f64 re re))
(/.f64 (-.f64 (.f64 (neg.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)))) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) #s(literal -1 binary64))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))))
(/.f64 (-.f64 (.f64 (neg.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)))) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) #s(literal 1 binary64))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)) #s(literal -1 binary64))) (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))))
(/.f64 (neg.f64 (.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64))) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))))
(/.f64 (neg.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (.f64 re (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)))) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64))) #s(literal 1 binary64))) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))))
(/.f64 (neg.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64))) (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)) #s(literal 1 binary64)))) (neg.f64 (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))))))
(/.f64 (.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64))) #s(literal 1 binary64)) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 0 binary64)))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (.f64 re (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)))) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64))) #s(literal 1 binary64)) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 0 binary64)))
(/.f64 (-.f64 (.f64 (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (.f64 re (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)))) (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (.f64 re (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64))))) (.f64 (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))))) (+.f64 (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (.f64 re (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)))) (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) #s(literal 3 binary64)) (pow.f64 #s(literal 1 binary64) #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))))
(/.f64 (-.f64 (pow.f64 (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (.f64 re (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)))) #s(literal 3 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) #s(literal 3 binary64))) (+.f64 (.f64 (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (.f64 re (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)))) (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (.f64 re (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64))))) (+.f64 (.f64 (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))))) (.f64 (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (.f64 re (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)))) (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))))))))
(/.f64 (-.f64 (.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64))) (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)) #s(literal 1 binary64))) (.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))))
(/.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))))
(/.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64))) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))) (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))))))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)) (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)))))
(neg.f64 (.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))))))
(neg.f64 (/.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64))))
(neg.f64 (-.f64 (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (.f64 re (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 0 binary64))))))
(-.f64 (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (.f64 re (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)))) (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))))
(-.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64)) #s(literal -1 binary64))
(-.f64 #s(literal 1 binary64) (neg.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64))))
(+.f64 (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (.f64 re (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)))) (neg.f64 (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))))))
(+.f64 (/.f64 (.f64 (+.f64 (.f64 #s(literal 1 binary64) re) (.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal -2 binary64))) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) (.f64 re (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)))) (/.f64 #s(literal -1 binary64) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 0 binary64))))
(+.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64)) #s(literal 1 binary64))
(+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 2 binary64))
(+.f64 #s(literal 1 binary64) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal -1 binary64)))
(neg.f64 re)
(.f64 (neg.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64))) re)
(.f64 (neg.f64 (sqrt.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re)))) (neg.f64 (sqrt.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re)))))
(.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)) (neg.f64 re))) (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))))
(.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re))
(.f64 (sqrt.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re))) (sqrt.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re))))
(.f64 (neg.f64 re) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)))
(.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64))) (.f64 (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) (neg.f64 re)))
(.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64))) (/.f64 re (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))))
(pow.f64 (.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re)) (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re))) #s(literal 1/2 binary64))
(pow.f64 (sqrt.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re))) #s(literal 2 binary64))
(pow.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re)) #s(literal 1 binary64))
(/.f64 (neg.f64 (.f64 (neg.f64 re) (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))))) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 0 binary64)))
(/.f64 (neg.f64 (neg.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)) (neg.f64 re))))) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 0 binary64)))
(/.f64 (.f64 (neg.f64 re) (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))))) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))))
(/.f64 (.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) (neg.f64 re)) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))))
(/.f64 (.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64))) re) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))))
(/.f64 (neg.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)) (neg.f64 re)))) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))))
(/.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)) (neg.f64 re))) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 0 binary64)))
(/.f64 #s(literal 1 binary64) (/.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)) (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 0 binary64)) (neg.f64 re)))))
(neg.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) re))
(sqrt.f64 (.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re)) (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re))))
(fabs.f64 (.f64 (neg.f64 (sqrt.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re)))) (sqrt.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re)))))
(fabs.f64 (.f64 (sqrt.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re))) (neg.f64 (sqrt.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re))))))
(fabs.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re)))
(.f64 (sqrt.f64 (sqrt.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re)))) (sqrt.f64 (sqrt.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re)))))
(.f64 (sqrt.f64 (neg.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)))) (sqrt.f64 re))
(.f64 (sqrt.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)))) (sqrt.f64 (.f64 (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) (neg.f64 re))))
(.f64 (sqrt.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)))) (sqrt.f64 (/.f64 re (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))))))
(.f64 (pow.f64 (neg.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (pow.f64 re #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)) (neg.f64 re))) #s(literal 1/2 binary64)) (pow.f64 (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64))) #s(literal 1/2 binary64)) (pow.f64 (.f64 (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) (neg.f64 re)) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64))) #s(literal 1/2 binary64)) (pow.f64 (/.f64 re (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))) (pow.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re)) (/.f64 #s(literal 1/2 binary64) #s(literal 2 binary64))))
(.f64 (sqrt.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)) (neg.f64 re)))) (sqrt.f64 (/.f64 #s(literal -1 binary64) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))))))))
(.f64 (pow.f64 (neg.f64 re) #s(literal 1/2 binary64)) (pow.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(.f64 (pow.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) #s(literal 1/2 binary64)) (pow.f64 (neg.f64 re) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (neg.f64 re)) (sqrt.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64))))
(.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64))) (sqrt.f64 (neg.f64 re)))
(pow.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re)) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (.f64 (neg.f64 re) (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))))
(/.f64 (sqrt.f64 (.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))))) (neg.f64 re))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))))
(/.f64 (sqrt.f64 (neg.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)) (neg.f64 re))))) (sqrt.f64 (-.f64 #s(literal 0 binary64) (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))))))
(/.f64 (sqrt.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 0 binary64)) (neg.f64 re)))) (sqrt.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 0 binary64))))
(sqrt.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re)))
(fabs.f64 (neg.f64 (neg.f64 (sqrt.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re))))))
(fabs.f64 (neg.f64 (sqrt.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re)))))
(fabs.f64 (sqrt.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re))))
(exp.f64 (.f64 (log.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re))) #s(literal 1/2 binary64)))
(.f64 (sqrt.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (+.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re)))) #s(literal 2 binary64)) (neg.f64 re))))

eval282.0ms (5.8%)

Memory: 14.6MiB live, 707.0MiB allocated; 146ms collecting garbage
Compiler: Compiled 86 032 to 12 295 computations (85.7% saved)

prune57.0ms (1.2%)

Memory

36.6MiB live, 225.8MiB allocated; 24ms collecting garbage

Pruning

30 alts after pruning (25 fresh and 5 done)

	Pruned	Kept	Total
New	1 502	13	1 515
Fresh	9	12	21
Picked	5	0	5
Done	-1	5	4
Total	1 515	30	1 545

Accuracy

88.6%

Counts

1 545 → 30

Alt Table

Click to see full alt table

Status	Accuracy	Program
	53.1%	(.f64 (.f64 (sqrt.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (.f64 (-.f64 re im) #s(literal -2 binary64)))))) (sqrt.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 (-.f64 re im) #s(literal -2 binary64))))))) #s(literal 1/2 binary64))
	14.9%	(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (pow.f64 im #s(literal 2 binary64)) re))) #s(literal 1/2 binary64))
	9.9%	(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (+.f64 (*.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 2 binary64)))) (pow.f64 im #s(literal 2 binary64))) re))) #s(literal 1/2 binary64))
	18.9%	(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (/.f64 (-.f64 (pow.f64 (-.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (+.f64 (.f64 (-.f64 im re) (-.f64 im re)) (+.f64 (.f64 re re) (*.f64 (-.f64 im re) re)))) im))) #s(literal 1/2 binary64))
	30.7%	(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (/.f64 (-.f64 (.f64 im im) (.f64 (+.f64 re re) (+.f64 re re))) (+.f64 im (+.f64 re re))) im))) #s(literal 1/2 binary64))
✓	53.4%	(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))) #s(literal 1/2 binary64))
	51.2%	(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 #s(approx (- im (+ re re)) im) im))) #s(literal 1/2 binary64))
✓	53.4%	(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 #s(literal -2 binary64) (-.f64 re im))))) #s(literal 1/2 binary64))
	10.9%	(.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 1 binary64))) (sqrt.f64 (+.f64 re re))))
	50.9%	(.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im)))) (sqrt.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im))))))
	25.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (/.f64 (-.f64 (.f64 (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64)) (-.f64 (.f64 (/.f64 #s(literal -2 binary64) re) (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) #s(literal -1 binary64))) #s(literal 1 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (/.f64 #s(literal -2 binary64) re))) #s(literal 1 binary64))) (neg.f64 re))))
	38.7%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 1 binary64)) (+.f64 re re))))
	38.7%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re)) (neg.f64 re))))
	38.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (sqrt.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) #s(literal 2 binary64)) re) (neg.f64 re))) (neg.f64 re))))
	27.8%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 re re)) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))))
	55.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 re (*.f64 im im)) re) #s(literal -1 binary64))) (fabs.f64 im)) re))))
	64.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 (sqrt.f64 (+.f64 im (.f64 re (/.f64 re im)))) (sqrt.f64 im)) re))))
✓	43.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))
	16.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (.f64 (/.f64 (.f64 (.f64 (+.f64 (.f64 im im) (.f64 re re)) (.f64 im im)) (/.f64 #s(literal 1 binary64) im)) (.f64 (.f64 im im) im)) (*.f64 im im))) re))))
	40.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (.f64 (+.f64 im (.f64 re (/.f64 re im))) im)) re))))
	4.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) #s(approx (/ (sqrt (+ ( im im) (* re re))) (neg re)) #s(literal -1 binary64))) (neg.f64 re)))))
	44.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (-.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (*.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (+.f64 re re)) (/.f64 #s(literal -1 binary64) (-.f64 (+.f64 re re) im)))))))
	44.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (/.f64 #s(approx (* (+ (- im (+ re re)) im) (* -2 re)) (.f64 #s(literal -4 binary64) (.f64 im re))) (-.f64 im (+.f64 re re))) (.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64)) im) #s(literal 1 binary64))))))
	3.8%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im (/.f64 #s(approx (- ( 1 1) (* (- 1 (/ (+ re re) im)) (- 1 (/ (+ re re) im)))) (.f64 re (+.f64 (.f64 #s(literal -4 binary64) (/.f64 re (pow.f64 im #s(literal 2 binary64)))) (*.f64 #s(literal 4 binary64) (/.f64 #s(literal 1 binary64) im))))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))))))))
✓	26.9%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))))
	47.6%	(.f64 #s(literal 1/2 binary64) (exp.f64 (.f64 (log.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im))) #s(literal 1/2 binary64))))
	50.8%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 im (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) im))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) im)))))))
✓	51.0%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (*.f64 im (sqrt.f64 (/.f64 #s(literal 2 binary64) im)))))
	47.7%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 im (exp.f64 (.f64 (log.f64 (/.f64 #s(literal 2 binary64) im)) #s(literal 1/2 binary64))))))
	51.1%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 im #s(approx (sqrt (/ 2 im)) (/.f64 (sqrt.f64 (.f64 #s(literal 2 binary64) im)) im)))))

Compiler

Compiled 950 to 592 computations (37.7% saved)

regimes332.0ms (6.8%)

Memory

-62.5MiB live, 918.3MiB allocated; 142ms collecting garbage

Counts

1 → 1

12 → 2

16 → 3

19 → 3

24 → 3

43 → 2

57 → 3

Calls

Call 1

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

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

Call 2

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

Outputs

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

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

Call 3

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

Outputs

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

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

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

Call 4

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

Outputs

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

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

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

Call 5

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

Outputs

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

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

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

Call 6

Inputs
(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 #s(approx (- im (+ re re)) im) im))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal 2 binary64) im))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64))))))
(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 #s(literal -2 binary64) (-.f64 re im))))) #s(literal 1/2 binary64))
(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (-.f64 im (+.f64 re re)) im))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (+.f64 (.f64 #s(literal -2 binary64) re) (.f64 #s(literal 2 binary64) im))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) #s(approx (/ (sqrt (+ ( im im) (* re re))) (neg re)) #s(literal -1 binary64))) (neg.f64 re)))))
(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (*.f64 im (sqrt.f64 (/.f64 #s(literal 2 binary64) im)))))
(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 im #s(approx (sqrt (/ 2 im)) (/.f64 (sqrt.f64 (.f64 #s(literal 2 binary64) im)) im)))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (/.f64 re im)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im (+.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)))))))
(.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 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) #s(literal 2 binary64)) re) re)))
(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (/.f64 (-.f64 (.f64 im im) (.f64 (+.f64 re re) (+.f64 re re))) (+.f64 im (+.f64 re re))) im))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (.f64 (+.f64 im (.f64 re (/.f64 re im))) im)) re))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 1 binary64)) (+.f64 re re))))
(.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im)))) (sqrt.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(approx (+ 2 ( -2 (/ re im))) #s(literal 2 binary64)) im))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re) #s(literal 1 binary64)) re))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 re (*.f64 im im)) re) #s(literal -1 binary64))) (fabs.f64 im)) re))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) (neg.f64 re))) (neg.f64 re)))))
(.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (.f64 #s(literal -2 binary64) (-.f64 re im)))))) (sqrt.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 #s(literal -2 binary64) (-.f64 re im))))))))
(.f64 (.f64 (sqrt.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (.f64 (-.f64 re im) #s(literal -2 binary64)))))) (sqrt.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (* im (+ 2 (* -2 (/ re im)))) (*.f64 (-.f64 re im) #s(literal -2 binary64))))))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (.f64 re re) (.f64 im im))) (.f64 im im))) re))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 (sqrt.f64 (+.f64 im (.f64 re (/.f64 re im)))) (sqrt.f64 im)) re))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (-.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) #s(literal 2 binary64)) re) re)) (neg.f64 re))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) #s(literal 2 binary64)) re) (neg.f64 re))) (neg.f64 re))))
(.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (-.f64 (/.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 1 binary64))) (sqrt.f64 (+.f64 re re))))
(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 im (.f64 (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) im))) (sqrt.f64 (sqrt.f64 (/.f64 #s(literal 2 binary64) im)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im (.f64 (+.f64 #s(literal 1 binary64) (/.f64 #s(literal 1 binary64) (-.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -1 binary64)))) (-.f64 (.f64 (/.f64 re im) #s(literal -2 binary64)) #s(literal -1 binary64)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 (+.f64 (.f64 im im) (.f64 re re)) (.f64 re re)) (+.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))) re)))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (/.f64 (-.f64 (+.f64 (.f64 re re) (.f64 im im)) (.f64 re re)) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (-.f64 (.f64 (-.f64 (/.f64 im (-.f64 im (+.f64 re re))) #s(literal -1 binary64)) im) (.f64 (*.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (+.f64 re re)) (/.f64 #s(literal -1 binary64) (-.f64 (+.f64 re re) im)))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (/.f64 #s(approx (* (+ (- im (+ re re)) im) (* -2 re)) (.f64 #s(literal -4 binary64) (.f64 im re))) (-.f64 im (+.f64 re re))) (.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64)) im) #s(literal 1 binary64))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (.f64 (sqrt.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re)))) (sqrt.f64 (sqrt.f64 (+.f64 (.f64 im im) (*.f64 re re))))) re))))
(.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im)))) (sqrt.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (-.f64 #s(literal 2 binary64) (/.f64 (+.f64 re re) im)) im))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 (/.f64 (.f64 (+.f64 (-.f64 im (+.f64 re re)) im) (.f64 #s(literal -2 binary64) re)) (-.f64 im (+.f64 re re))) (.f64 (.f64 (-.f64 (/.f64 #s(literal 1 binary64) (/.f64 (-.f64 im (+.f64 re re)) im)) #s(literal -1 binary64)) im) #s(literal 1 binary64))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im (/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (*.f64 (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im)))) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im (/.f64 (-.f64 (.f64 #s(literal 1 binary64) #s(literal 1 binary64)) (/.f64 (*.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (-.f64 im (+.f64 re re))) im)) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (.f64 (/.f64 (.f64 (.f64 (+.f64 (.f64 im im) (.f64 re re)) (.f64 im im)) (/.f64 #s(literal 1 binary64) im)) (.f64 (.f64 im im) im)) (*.f64 im im))) re))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im (/.f64 (/.f64 (-.f64 (+.f64 im im) (.f64 #s(literal 2 binary64) (*.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (-.f64 im (+.f64 re re))))) (+.f64 im im)) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im (/.f64 (/.f64 (-.f64 (.f64 (E.f64) im) (.f64 (E.f64) (.f64 (/.f64 (-.f64 im (+.f64 re re)) im) (-.f64 im (+.f64 re re))))) (*.f64 (E.f64) im)) (-.f64 #s(literal 1 binary64) (-.f64 #s(literal 1 binary64) (/.f64 (+.f64 re re) im))))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (+.f64 #s(literal 1 binary64) (/.f64 (-.f64 (.f64 (.f64 (sqrt.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))) (sqrt.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))))) #s(literal 2 binary64)) re) (neg.f64 re))) (neg.f64 re))))

Outputs

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

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

Call 7

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

Outputs

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

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

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

Calls

31 calls:

36.0ms	(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))
30.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))))
25.0ms	(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)
19.0ms	re
19.0ms	im

Results

Accuracy	Segments	Branch
51.2%	1	`(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`
51.2%	1	`(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))`
51.2%	1	`(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`
51.2%	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))))`
51.2%	1	`(*.f64 im im)`
51.2%	1	`im`
51.2%	1	`re`
56.7%	3	`(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`
56.7%	3	`(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))`
63.9%	2	`re`
55.5%	2	`(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`
55.5%	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))))`
62.9%	2	`(*.f64 im im)`
62.9%	2	`im`
68.4%	3	`im`
68.3%	3	`(*.f64 im im)`
68.4%	3	`im`
69.4%	3	`im`
66.3%	3	`(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`
66.3%	3	`(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))`
65.5%	2	`(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`
65.5%	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))))`
66.9%	3	`re`
72.4%	2	`re`
69.3%	3	`(*.f64 im im)`
71.1%	4	`(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`
71.1%	4	`(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))`
72.0%	4	`(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`
72.0%	4	`(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))`
78.7%	3	`re`
69.4%	3	`im`

Compiler

Compiled 2 105 to 615 computations (70.8% saved)

bsearch58.0ms (1.2%)

Memory

33.0MiB live, 215.1MiB allocated; 34ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
32.0ms	2.7184300714799723e+90	3.2771100600081915e+101
22.0ms	-2.783057975113064e+114	-8.729848470480711e+111

Samples

16.0ms	225×	0	valid
7.0ms	19×	2	valid
4.0ms	33×	1	valid
3.0ms	11×	3	valid

Compiler

Compiled 704 to 582 computations (17.3% saved)

Precisions

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

ival-hypot: 9.0ms (43.5% of total)

adjust: 5.0ms (24.2% of total)

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

ival-mult!: 3.0ms (14.5% of total)

ival-sub!: 1.0ms (4.8% of total)

bsearch2.0ms (0.0%)

Memory

9.9MiB live, 9.9MiB allocated; 0ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
2.0ms	-2.783057975113064e+114	-8.729848470480711e+111

Compiler

Compiled 314 to 262 computations (16.6% saved)

bsearch33.0ms (0.7%)

Memory

13.2MiB live, 98.8MiB allocated; 18ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	predicate-same
1×	narrow-enough

Steps

Time	Left	Right
15.0ms	413189834236979.8	6483970402452140.0
16.0ms	2.965380413563472e-177	3.2087172225193126e-176

Samples

8.0ms	137×	0	valid
7.0ms	10×	2	valid
6.0ms	23×	1	valid
2.0ms	6×	3	valid

Compiler

Compiled 441 to 360 computations (18.4% saved)

Precisions

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

ival-hypot: 8.0ms (43.8% of total)

ival-mult!: 7.0ms (38.3% of total)

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

adjust: 1.0ms (5.5% of total)

ival-sub!: 1.0ms (5.5% of total)

bsearch42.0ms (0.9%)

Memory

-21.1MiB live, 76.8MiB allocated; 35ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
39.0ms	1.5633952297949244e+47	4.477976320585656e+54
1.0ms	2.965380413563472e-177	3.2087172225193126e-176

Samples

16.0ms	20×	1	valid
14.0ms	110×	0	valid
2.0ms	8×	2	valid
1.0ms	6×	3	valid

Compiler

Compiled 624 to 488 computations (21.8% saved)

Precisions

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

ival-hypot: 4.0ms (49.5% of total)

ival-mult!: 2.0ms (24.7% of total)

adjust: 1.0ms (12.4% of total)

ival-sub!: 1.0ms (12.4% of total)

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

bsearch5.0ms (0.1%)

Memory

16.8MiB live, 16.8MiB allocated; 0ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
3.0ms	1.5633952297949244e+47	4.477976320585656e+54
1.0ms	2.965380413563472e-177	3.2087172225193126e-176

Samples

1.0ms	15×	0	valid
0.0ms	1×	3	valid

Compiler

Compiled 564 to 458 computations (18.8% saved)

Precisions

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

adjust: 0.0ms (0.0% of total)

ival-hypot: 0.0ms (0.0% of total)

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

ival-sqrt: 0.0ms (0.0% of total)

ival-mult!: 0.0ms (0.0% of total)

bsearch32.0ms (0.7%)

Memory

-21.5MiB live, 65.8MiB allocated; 18ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
23.0ms	-3.757793665945478e-21	-1.2597007080841543e-24

Samples

12.0ms	90×	0	valid
3.0ms	22×	1	valid
3.0ms	14×	2	valid
1.0ms	2×	3	valid

Compiler

Compiled 370 to 286 computations (22.7% saved)

Precisions

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

ival-hypot: 4.0ms (51.4% of total)

ival-mult!: 2.0ms (25.7% of total)

adjust: 1.0ms (12.9% of total)

ival-sub!: 1.0ms (12.9% of total)

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

derivations169.0ms (3.5%)

Memory

12.1MiB live, 205.8MiB allocated; 30ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 380 to 95 computations (75.0% saved)

preprocess94.0ms (1.9%)

Memory: -13.9MiB live, 238.5MiB allocated; 49ms collecting garbage
Compiler: Compiled 1 155 to 557 computations (51.8% saved)

end0.0ms (0.0%)

Memory: 0.1MiB live, 0.1MiB allocated; 0ms collecting garbage

start0.0ms (0.0%)

analyze235.0ms (4.8%)

sample1.2s (24.5%)

preprocess61.0ms (1.3%)

sample0.0ms (0.0%)

series60.0ms (1.2%)

rewrite176.0ms (3.6%)

eval281.0ms (5.8%)

prune17.0ms (0.4%)

sample0.0ms (0.0%)

series115.0ms (2.4%)

rewrite255.0ms (5.2%)

eval187.0ms (3.8%)

prune72.0ms (1.5%)

sample0.0ms (0.0%)

series121.0ms (2.5%)

rewrite231.0ms (4.7%)

eval149.0ms (3.0%)

prune55.0ms (1.1%)

sample1.0ms (0.0%)

series255.0ms (5.2%)

rewrite305.0ms (6.3%)

eval282.0ms (5.8%)

prune57.0ms (1.2%)

regimes332.0ms (6.8%)

bsearch58.0ms (1.2%)

bsearch2.0ms (0.0%)

bsearch33.0ms (0.7%)

bsearch42.0ms (0.9%)

bsearch5.0ms (0.1%)

bsearch32.0ms (0.7%)

derivations169.0ms (3.5%)

preprocess94.0ms (1.9%)

end0.0ms (0.0%)

Profiling