Metrics for math.sqrt on complex, real part

start0.0ms (0%)

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

analyze99.0ms (2.8%)

Memory

29.6MiB live, 123.1MiB allocated; 21ms collecting garbage

Algorithm

1×

Search

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

Compiler

Compiled 17 to 11 computations (35.3% saved)

sample1.2s (33%)

Memory

17.9MiB live, 1 331.8MiB allocated; 213ms collecting garbage

Samples

418.0ms	6 232×	0	valid
236.0ms	472×	3	valid
150.0ms	765×	2	valid
118.0ms	787×	1	valid

Precisions

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

ival-hypot: 378.0ms (53.1% of total)

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

ival-mult!: 101.0ms (14.2% of total)

adjust: 96.0ms (13.5% of total)

ival-add!: 34.0ms (4.8% of total)

Bogosity

explain160.0ms (4.5%)

Memory

8.3MiB live, 295.6MiB allocated; 12ms collecting garbage

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
120	-	1	(1.1580272118058189e-161 1.978722802286559e-283)	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`
42	-	0	-	`(+.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`
30	-	2	(-1.889019687249918e-100 3.2643939372149976e-206)	`(sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`
0	-	0	-	`(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))`
0	-	0	-	`(*.f64 re re)`
0	-	0	-	`im`
0	-	0	-	`(+.f64 (.f64 re re) (.f64 im im))`
0	-	0	-	`#s(literal 2 binary64)`
0	-	0	-	`(.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))`
0	-	0	-	`re`
0	-	0	-	`#s(literal 1/2 binary64)`
0	-	0	-	`(*.f64 im im)`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`sqrt.f64`	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`	oflow-rescue	111	0
↳	`(+.f64 (.f64 re re) (.f64 im im))`	overflow	111
↳	`(*.f64 re re)`	overflow	61
↳	`(*.f64 im im)`	overflow	64
`+.f64`	`(+.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`	cancellation	42	1
`sqrt.f64`	`(sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`	uflow-rescue	27	0
↳	`(+.f64 (.f64 re re) (.f64 im im))`	underflow	8
↳	`(*.f64 im im)`	underflow	58
↳	`(sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`	underflow	4
↳	`(.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))`	underflow	31
↳	`(*.f64 re re)`	underflow	60
↳	`(+.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`	underflow	31
`sqrt.f64`	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`	uflow-rescue	8	0
↳	`(+.f64 (.f64 re re) (.f64 im im))`	underflow	8
↳	`(*.f64 re re)`	underflow	60
↳	`(*.f64 im im)`	underflow	58
`sqrt.f64`	`(sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`	oflow-rescue	1	0
↳	`(+.f64 (.f64 re re) (.f64 im im))`	overflow	111
↳	`(*.f64 re re)`	overflow	61
↳	`(*.f64 im im)`	overflow	64
↳	`(.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))`	overflow	1

Confusion

	Predicted +	Predicted -
+	159	1
-	0	96

Precision

1.0

Recall

0.99375

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	159	0	1
-	0	1	95

Precision?

0.99375

Recall?

0.99375

Freqs

test

number	freq
0	97
1	129
2	30

Total Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	1	0	0
-	0	0	0

Precision?

1.0

Recall?

1.0

Samples

29.0ms	366×	0	valid
15.0ms	56×	2	valid
12.0ms	62×	1	valid
9.0ms	28×	3	valid

Compiler

Compiled 169 to 40 computations (76.3% saved)

Precisions

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

ival-hypot: 17.0ms (38.4% of total)

ival-mult!: 13.0ms (29.3% of total)

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

adjust: 5.0ms (11.3% of total)

ival-add!: 3.0ms (6.8% of total)

preprocess60.0ms (1.7%)

Memory

-24.5MiB live, 23.6MiB allocated; 4ms collecting garbage

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	36	92
1	117	92
2	257	90
3	448	90
4	943	90
5	3059	90
6	6608	90

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	40.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% saved)

rewrite76.0ms (2.1%)

Memory

34.7MiB live, 80.7MiB allocated; 7ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	12	75
0	20	75
1	74	75
0	635	48

Stop Event

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

Counts

12 → 242

Calls

Call 1

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

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

eval76.0ms (2.1%)

Memory: -1.0MiB live, 45.7MiB allocated; 4ms collecting garbage
Compiler: Compiled 4 012 to 1 297 computations (67.7% saved)

prune26.0ms (0.7%)

Memory

-21.6MiB live, 25.7MiB allocated; 1ms collecting garbage

Pruning

14 alts after pruning (14 fresh and 0 done)

	Pruned	Kept	Total
New	221	14	235
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	222	14	236

Accuracy

75.2%

Counts

236 → 14

Alt Table

Click to see full alt table

Status	Accuracy	Program
	74.5%	(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (+.f64 (hypot.f64 im re) re)))
▶	74.6%	(.f64 (sqrt.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))
	40.4%	(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (+.f64 re (+.f64 (hypot.f64 im re) re)))))
	28.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (/.f64 (.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (*.f64 re re)) #s(literal 2 binary64)) (-.f64 (hypot.f64 im re) re))))
▶	40.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) re))))
	19.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 (hypot.f64 (pow.f64 im #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (sqrt.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))) re))))
▶	6.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im)))) re))))
	40.3%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (*.f64 (pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/4 binary64))) re))))
▶	40.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))
	19.7%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (/.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (*.f64 (+.f64 re im) (-.f64 re im)))) re))))
	13.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64)))))) re))))
	21.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (sqrt.f64 (*.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))) re))))
▶	37.8%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (exp.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) #s(literal 1/2 binary64))) re))))
	69.3%	(.f64 #s(literal 1/2 binary64) (exp.f64 (.f64 (log.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))))

Compiler

Compiled 554 to 390 computations (29.6% saved)

rewrite44.0ms (1.2%)

Memory

11.9MiB live, 59.4MiB allocated; 10ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	44	409
0	85	279
0	310	279

Stop Event

1×	iter-limit
1×	iter-limit
1×	iter-limit
1×	unsound
1×	iter-limit

Counts

44 → 228

Calls

Call 1

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

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

eval27.0ms (0.8%)

Memory: 14.2MiB live, 58.0MiB allocated; 5ms collecting garbage
Compiler: Compiled 3 872 to 1 035 computations (73.3% saved)

prune17.0ms (0.5%)

Memory

-2.1MiB live, 45.1MiB allocated; 2ms collecting garbage

Pruning

17 alts after pruning (15 fresh and 2 done)

	Pruned	Kept	Total
New	180	12	192
Fresh	6	3	9
Picked	3	2	5
Done	0	0	0
Total	189	17	206

Accuracy

75.4%

Counts

206 → 17

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	74.5%	(.f64 (.f64 (sqrt.f64 (+.f64 (hypot.f64 re im) re)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
	28.0%	(.f64 (sqrt.f64 (.f64 (/.f64 (-.f64 (pow.f64 (hypot.f64 re im) #s(literal 2 binary64)) (*.f64 re re)) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64))) #s(literal 1/2 binary64))
✓	74.6%	(.f64 (sqrt.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))
	40.4%	(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (+.f64 re (+.f64 (hypot.f64 im re) re)))))
▶	40.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 1 binary64)) #s(literal 1/4 binary64)) (pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) re))))
	40.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (hypot.f64 re im) #s(literal 1/2 binary64)) re))))
	38.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 re im)) #s(literal 2 binary64))) #s(literal 1/4 binary64)) re))))
	40.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (pow.f64 (hypot.f64 re im) #s(literal 2 binary64)) #s(literal 1/8 binary64)) (pow.f64 (pow.f64 (hypot.f64 re im) #s(literal 2 binary64)) #s(literal 1/8 binary64))) re))))
	72.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (hypot.f64 re im) #s(literal 1/2 binary64)) (pow.f64 (hypot.f64 re im) #s(literal 1/2 binary64)) re))))
	73.7%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (pow.f64 (hypot.f64 re im) #s(literal 1/2 binary64)) #s(literal 2 binary64)) re))))
	37.8%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (exp.f64 (log.f64 (pow.f64 (hypot.f64 re im) #s(literal 2 binary64)))) #s(literal 1/2 binary64)) re))))
	19.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 (hypot.f64 (pow.f64 im #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (sqrt.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))) re))))
▶	6.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 (sqrt.f64 (fma.f64 (.f64 re re) (.f64 re re) (neg.f64 (pow.f64 im #s(literal 4 binary64))))) (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im)))) re))))
✓	40.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))
▶	12.9%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) (pow.f64 (.f64 im im) #s(literal 3 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (*.f64 im im)))))) re))))
▶	67.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 (hypot.f64 re im))) #s(literal 1/2 binary64))) re))))
	69.3%	(.f64 #s(literal 1/2 binary64) (exp.f64 (.f64 (log.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))))

Compiler

Compiled 662 to 462 computations (30.2% saved)

rewrite176.0ms (4.9%)

Memory

-33.3MiB live, 229.6MiB allocated; 79ms collecting garbage

Iterations

Useful iterations: 1 (0.0ms)

Iter	Nodes	Cost
0	60	672
0	116	382
1	473	308
0	3419	308

Stop Event

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

Counts

60 → 2 022

Calls

Call 1

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

Outputs
(.f64 (.f64 (sqrt.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (+.f64 (hypot.f64 im re) re)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (hypot.f64 im re) re))) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (sqrt.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 (hypot.f64 im re) re)) #s(literal 1/2 binary64)))
(.f64 #s(literal 2 binary64) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)))))
(.f64 (sqrt.f64 (+.f64 (hypot.f64 im re) re)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (.f64 (sqrt.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64))
(.f64 (pow.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (+.f64 (hypot.f64 im re) re)))
(*.f64 (sqrt.f64 (+.f64 (hypot.f64 im re) re)) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (pow.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (pow.f64 (+.f64 (hypot.f64 im re) re) #s(literal 1/4 binary64)) (pow.f64 (+.f64 (hypot.f64 im re) re) #s(literal 1/4 binary64)))
(pow.f64 (pow.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(pow.f64 (+.f64 (hypot.f64 im re) re) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (*.f64 re re))) (sqrt.f64 (-.f64 (hypot.f64 im re) re)))
(/.f64 (hypot.f64 (pow.f64 (hypot.f64 im re) #s(literal 3/2 binary64)) (pow.f64 re #s(literal 3/2 binary64))) (sqrt.f64 (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(sqrt.f64 (+.f64 (hypot.f64 im re) re))
(exp.f64 (*.f64 (log.f64 (+.f64 (hypot.f64 im re) re)) #s(literal 1/2 binary64)))
(/.f64 (-.f64 (*.f64 re re) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (-.f64 re (hypot.f64 im re)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (*.f64 re re))) (neg.f64 (-.f64 (hypot.f64 im re) re)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64)))) (neg.f64 (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (*.f64 re re)) (-.f64 (hypot.f64 im re) re))
(/.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (fma.f64 re re (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (*.f64 (hypot.f64 im re) re))))
(/.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(fma.f64 (*.f64 (sqrt.f64 (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64))) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) re)
(fma.f64 (neg.f64 (sqrt.f64 (hypot.f64 im re))) (neg.f64 (sqrt.f64 (hypot.f64 im re))) re)
(fma.f64 (fabs.f64 (sqrt.f64 (hypot.f64 im re))) (fabs.f64 (sqrt.f64 (hypot.f64 im re))) re)
(fma.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (sqrt.f64 (hypot.f64 im re))) re)
(fma.f64 (sqrt.f64 (hypot.f64 im re)) (sqrt.f64 (hypot.f64 im re)) re)
(-.f64 (/.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (-.f64 (hypot.f64 im re) re)) (/.f64 (*.f64 re re) (-.f64 (hypot.f64 im re) re)))
(-.f64 re (*.f64 (neg.f64 (sqrt.f64 (hypot.f64 im re))) (sqrt.f64 (hypot.f64 im re))))
(+.f64 (+.f64 re (cosh.f64 (log.f64 (hypot.f64 im re)))) (sinh.f64 (log.f64 (hypot.f64 im re))))
(+.f64 (/.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))) (/.f64 (pow.f64 re #s(literal 3 binary64)) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(+.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (+.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) re))
(+.f64 (hypot.f64 im re) re)
(+.f64 re (hypot.f64 im re))
(.f64 (.f64 (sqrt.f64 (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64))) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)))
(*.f64 (neg.f64 (sqrt.f64 (hypot.f64 im re))) (neg.f64 (sqrt.f64 (hypot.f64 im re))))
(*.f64 (fabs.f64 (sqrt.f64 (hypot.f64 im re))) (fabs.f64 (sqrt.f64 (hypot.f64 im re))))
(.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (sqrt.f64 (hypot.f64 im re))))
(*.f64 (sqrt.f64 (hypot.f64 im re)) (sqrt.f64 (hypot.f64 im re)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (*.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 4 binary64)) #s(literal 1/4 binary64))
(pow.f64 (sqrt.f64 (hypot.f64 im re)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (hypot.f64 im re) #s(literal 1 binary64))
(/.f64 (/.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (+.f64 im re))) (sqrt.f64 (-.f64 re im)))
(/.f64 (-.f64 (.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (cosh.f64 (log.f64 (hypot.f64 im re)))) (.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) (sinh.f64 (log.f64 (hypot.f64 im re))))) (-.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (sinh.f64 (log.f64 (hypot.f64 im re)))))
(/.f64 (+.f64 (pow.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) #s(literal 3 binary64))) (fma.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (cosh.f64 (log.f64 (hypot.f64 im re))) (-.f64 (.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) (sinh.f64 (log.f64 (hypot.f64 im re)))) (.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (sinh.f64 (log.f64 (hypot.f64 im re)))))))
(/.f64 (neg.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 (-.f64 re im) (+.f64 im re))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (sqrt.f64 (*.f64 (+.f64 im re) (-.f64 im re))))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (neg.f64 (sqrt.f64 (*.f64 (-.f64 re im) (+.f64 im re)))))
(/.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (*.f64 (-.f64 re im) (+.f64 im re))))
(neg.f64 (/.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (sqrt.f64 (*.f64 (-.f64 re im) (+.f64 im re)))))
(neg.f64 (/.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (neg.f64 (sqrt.f64 (*.f64 (-.f64 re im) (+.f64 im re))))))
(fma.f64 #s(literal 2 binary64) (.f64 (sinh.f64 (.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64))) (cosh.f64 (*.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)))) (cosh.f64 (log.f64 (hypot.f64 im re))))
(sqrt.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))
(fabs.f64 (hypot.f64 im re))
(hypot.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 re)))
(hypot.f64 (neg.f64 (neg.f64 im)) (neg.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 (neg.f64 im)) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 (neg.f64 im)) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (neg.f64 im)) (neg.f64 re))
(hypot.f64 (neg.f64 (neg.f64 im)) (fabs.f64 re))
(hypot.f64 (neg.f64 (neg.f64 im)) re)
(hypot.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (neg.f64 re)))
(hypot.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 (fabs.f64 im)) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (fabs.f64 im)) (neg.f64 re))
(hypot.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 re))
(hypot.f64 (neg.f64 (fabs.f64 im)) re)
(hypot.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 im)))
(hypot.f64 (neg.f64 (neg.f64 re)) (neg.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 (neg.f64 re)) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 (neg.f64 re)) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (neg.f64 re)) (neg.f64 im))
(hypot.f64 (neg.f64 (neg.f64 re)) (fabs.f64 im))
(hypot.f64 (neg.f64 (neg.f64 re)) im)
(hypot.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (neg.f64 im)))
(hypot.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 (fabs.f64 re)) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (fabs.f64 re)) (neg.f64 im))
(hypot.f64 (neg.f64 (fabs.f64 re)) (fabs.f64 im))
(hypot.f64 (neg.f64 (fabs.f64 re)) im)
(hypot.f64 (fabs.f64 (fabs.f64 im)) (neg.f64 (neg.f64 re)))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 re)))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (neg.f64 re))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (fabs.f64 re))
(hypot.f64 (fabs.f64 (fabs.f64 im)) re)
(hypot.f64 (fabs.f64 (fabs.f64 re)) (neg.f64 (neg.f64 im)))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 im)))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (neg.f64 im))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 im))
(hypot.f64 (fabs.f64 (fabs.f64 re)) im)
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (neg.f64 (neg.f64 re)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (neg.f64 (fabs.f64 re)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (neg.f64 re))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (fabs.f64 re))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) re)
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (neg.f64 (neg.f64 im)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (neg.f64 (fabs.f64 im)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (neg.f64 im))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (fabs.f64 im))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) im)
(hypot.f64 (neg.f64 im) (neg.f64 (neg.f64 re)))
(hypot.f64 (neg.f64 im) (neg.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 im) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 im) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (neg.f64 im) (neg.f64 re))
(hypot.f64 (neg.f64 im) (fabs.f64 re))
(hypot.f64 (neg.f64 im) re)
(hypot.f64 (neg.f64 re) (neg.f64 (neg.f64 im)))
(hypot.f64 (neg.f64 re) (neg.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 re) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 re) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (neg.f64 re) (neg.f64 im))
(hypot.f64 (neg.f64 re) (fabs.f64 im))
(hypot.f64 (neg.f64 re) im)
(hypot.f64 (fabs.f64 im) (neg.f64 (neg.f64 re)))
(hypot.f64 (fabs.f64 im) (neg.f64 (fabs.f64 re)))
(hypot.f64 (fabs.f64 im) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (fabs.f64 im) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 im) (neg.f64 re))
(hypot.f64 (fabs.f64 im) (fabs.f64 re))
(hypot.f64 (fabs.f64 im) re)
(hypot.f64 (fabs.f64 re) (neg.f64 (neg.f64 im)))
(hypot.f64 (fabs.f64 re) (neg.f64 (fabs.f64 im)))
(hypot.f64 (fabs.f64 re) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (fabs.f64 re) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 re) (neg.f64 im))
(hypot.f64 (fabs.f64 re) (fabs.f64 im))
(hypot.f64 (fabs.f64 re) im)
(hypot.f64 im (neg.f64 (neg.f64 re)))
(hypot.f64 im (neg.f64 (fabs.f64 re)))
(hypot.f64 im (fabs.f64 (fabs.f64 re)))
(hypot.f64 im (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 im (neg.f64 re))
(hypot.f64 im (fabs.f64 re))
(hypot.f64 im re)
(hypot.f64 re (neg.f64 (neg.f64 im)))
(hypot.f64 re (neg.f64 (fabs.f64 im)))
(hypot.f64 re (fabs.f64 (fabs.f64 im)))
(hypot.f64 re (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 re (neg.f64 im))
(hypot.f64 re (fabs.f64 im))
(hypot.f64 re im)
(exp.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 4 binary64))) #s(literal 1/4 binary64)))
(exp.f64 (log.f64 (hypot.f64 im re)))
(+.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) (cosh.f64 (log.f64 (hypot.f64 im re))))
(+.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (sinh.f64 (log.f64 (hypot.f64 im re))))
re
im
(*.f64 (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 1/4 binary64)))
(pow.f64 #s(literal 4 binary64) #s(literal 1/4 binary64))
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(/.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))
(sqrt.f64 #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
#s(literal 2 binary64)
#s(literal 1/2 binary64)
(.f64 (.f64 (sqrt.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (+.f64 (hypot.f64 im re) re)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (hypot.f64 im re) re))) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (sqrt.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 (hypot.f64 im re) re)) #s(literal 1/2 binary64)))
(.f64 #s(literal 2 binary64) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)))))
(.f64 (sqrt.f64 (+.f64 (hypot.f64 im re) re)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (.f64 (sqrt.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64))
(.f64 (pow.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (+.f64 (hypot.f64 im re) re)))
(*.f64 (sqrt.f64 (+.f64 (hypot.f64 im re) re)) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (pow.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (+.f64 (hypot.f64 im re) re))
(/.f64 (.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)) #s(literal 2 binary64)) (-.f64 (hypot.f64 im re) re))
(/.f64 (*.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) #s(literal 2 binary64)) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 4 binary64) (+.f64 (hypot.f64 im re) re)) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 4 binary64)) #s(literal 2 binary64))
(/.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re))) (-.f64 (hypot.f64 im re) re))
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64)))) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 #s(literal 2 binary64) (hypot.f64 im re))) (.f64 (.f64 #s(literal 2 binary64) re) (.f64 #s(literal 2 binary64) re))) (-.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 #s(literal 2 binary64) re)))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 2 binary64) re) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (-.f64 (.f64 (.f64 #s(literal 2 binary64) re) (.f64 #s(literal 2 binary64) re)) (.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 #s(literal 2 binary64) re)))))
(/.f64 (-.f64 (.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re)) (.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re))) (-.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re)))
(/.f64 (+.f64 (pow.f64 (+.f64 (hypot.f64 im re) re) #s(literal 3 binary64)) (pow.f64 (+.f64 (hypot.f64 im re) re) #s(literal 3 binary64))) (fma.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re) (-.f64 (.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re)) (.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re)))))
(/.f64 (+.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)) (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re))) (-.f64 (hypot.f64 im re) re))
(/.f64 (+.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64)))) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(/.f64 (.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)) #s(literal 4 binary64)) (*.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) #s(literal 4 binary64)) (.f64 (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re))) (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 im re) re)))
(/.f64 (.f64 #s(literal 4 binary64) (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)) (-.f64 (hypot.f64 im re) re) (.f64 (-.f64 (hypot.f64 im re) re) (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)))) (.f64 (-.f64 (hypot.f64 im re) re) (-.f64 (hypot.f64 im re) re)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (.f64 (-.f64 (hypot.f64 im re) re) (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))))) (*.f64 (-.f64 (hypot.f64 im re) re) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (-.f64 (hypot.f64 im re) re) (.f64 (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)))) (*.f64 (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (-.f64 (hypot.f64 im re) re)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (.f64 (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))))) (.f64 (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(fma.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (hypot.f64 im re))) (sqrt.f64 (hypot.f64 im re)) (.f64 #s(literal 2 binary64) re))
(fma.f64 (*.f64 (sqrt.f64 (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64))) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (+.f64 re (+.f64 (hypot.f64 im re) re)))
(fma.f64 (neg.f64 (sqrt.f64 (hypot.f64 im re))) (neg.f64 (sqrt.f64 (hypot.f64 im re))) (+.f64 re (+.f64 (hypot.f64 im re) re)))
(fma.f64 (fabs.f64 (sqrt.f64 (hypot.f64 im re))) (fabs.f64 (sqrt.f64 (hypot.f64 im re))) (+.f64 re (+.f64 (hypot.f64 im re) re)))
(fma.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (sqrt.f64 (hypot.f64 im re))) (+.f64 re (+.f64 (hypot.f64 im re) re)))
(fma.f64 (sqrt.f64 (hypot.f64 im re)) (.f64 (sqrt.f64 (hypot.f64 im re)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) re))
(fma.f64 (sqrt.f64 (hypot.f64 im re)) (sqrt.f64 (hypot.f64 im re)) (+.f64 re (+.f64 (hypot.f64 im re) re)))
(fma.f64 #s(literal 1 binary64) (+.f64 (hypot.f64 im re) re) (*.f64 #s(literal 1 binary64) (+.f64 (hypot.f64 im re) re)))
(fma.f64 (+.f64 (hypot.f64 im re) re) #s(literal 1 binary64) (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 1 binary64)))
(fma.f64 #s(literal 2 binary64) (hypot.f64 im re) (*.f64 #s(literal 2 binary64) re))
(fma.f64 #s(literal 2 binary64) re (*.f64 #s(literal 2 binary64) (hypot.f64 im re)))
(fma.f64 (hypot.f64 im re) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) re))
(fma.f64 re #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (hypot.f64 im re)))
(-.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 (neg.f64 re) #s(literal 2 binary64)))
(-.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 #s(literal -2 binary64) re))
(+.f64 (+.f64 (+.f64 (hypot.f64 im re) re) (hypot.f64 im re)) re)
(+.f64 (+.f64 (+.f64 (hypot.f64 im re) re) re) (hypot.f64 im re))
(+.f64 (.f64 #s(literal 1 binary64) (+.f64 (hypot.f64 im re) re)) (.f64 #s(literal 1 binary64) (+.f64 (hypot.f64 im re) re)))
(+.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 1 binary64)) (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 #s(literal 2 binary64) re))
(+.f64 (.f64 #s(literal 2 binary64) re) (.f64 #s(literal 2 binary64) (hypot.f64 im re)))
(+.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re))
(+.f64 (hypot.f64 im re) (+.f64 re (+.f64 (hypot.f64 im re) re)))
(+.f64 re (+.f64 (hypot.f64 im re) (+.f64 (hypot.f64 im re) re)))
(/.f64 (-.f64 (*.f64 re re) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (-.f64 re (hypot.f64 im re)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (*.f64 re re))) (neg.f64 (-.f64 (hypot.f64 im re) re)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64)))) (neg.f64 (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (*.f64 re re)) (-.f64 (hypot.f64 im re) re))
(/.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (fma.f64 re re (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (*.f64 (hypot.f64 im re) re))))
(/.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(fma.f64 (*.f64 (sqrt.f64 (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64))) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) re)
(fma.f64 (neg.f64 (sqrt.f64 (hypot.f64 im re))) (neg.f64 (sqrt.f64 (hypot.f64 im re))) re)
(fma.f64 (fabs.f64 (sqrt.f64 (hypot.f64 im re))) (fabs.f64 (sqrt.f64 (hypot.f64 im re))) re)
(fma.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (sqrt.f64 (hypot.f64 im re))) re)
(fma.f64 (sqrt.f64 (hypot.f64 im re)) (sqrt.f64 (hypot.f64 im re)) re)
(-.f64 (/.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (-.f64 (hypot.f64 im re) re)) (/.f64 (*.f64 re re) (-.f64 (hypot.f64 im re) re)))
(-.f64 re (*.f64 (neg.f64 (sqrt.f64 (hypot.f64 im re))) (sqrt.f64 (hypot.f64 im re))))
(+.f64 (+.f64 re (cosh.f64 (log.f64 (hypot.f64 im re)))) (sinh.f64 (log.f64 (hypot.f64 im re))))
(+.f64 (/.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))) (/.f64 (pow.f64 re #s(literal 3 binary64)) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(+.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (+.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) re))
(+.f64 (hypot.f64 im re) re)
(+.f64 re (hypot.f64 im re))
(.f64 (.f64 (sqrt.f64 (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64))) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)))
(*.f64 (neg.f64 (sqrt.f64 (hypot.f64 im re))) (neg.f64 (sqrt.f64 (hypot.f64 im re))))
(*.f64 (fabs.f64 (sqrt.f64 (hypot.f64 im re))) (fabs.f64 (sqrt.f64 (hypot.f64 im re))))
(.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (sqrt.f64 (hypot.f64 im re))))
(*.f64 (sqrt.f64 (hypot.f64 im re)) (sqrt.f64 (hypot.f64 im re)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (*.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 4 binary64)) #s(literal 1/4 binary64))
(pow.f64 (sqrt.f64 (hypot.f64 im re)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (hypot.f64 im re) #s(literal 1 binary64))
(/.f64 (/.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (+.f64 im re))) (sqrt.f64 (-.f64 re im)))
(/.f64 (-.f64 (.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (cosh.f64 (log.f64 (hypot.f64 im re)))) (.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) (sinh.f64 (log.f64 (hypot.f64 im re))))) (-.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (sinh.f64 (log.f64 (hypot.f64 im re)))))
(/.f64 (+.f64 (pow.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) #s(literal 3 binary64))) (fma.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (cosh.f64 (log.f64 (hypot.f64 im re))) (-.f64 (.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) (sinh.f64 (log.f64 (hypot.f64 im re)))) (.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (sinh.f64 (log.f64 (hypot.f64 im re)))))))
(/.f64 (neg.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 (-.f64 re im) (+.f64 im re))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (sqrt.f64 (*.f64 (+.f64 im re) (-.f64 im re))))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (neg.f64 (sqrt.f64 (*.f64 (-.f64 re im) (+.f64 im re)))))
(/.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (*.f64 (-.f64 re im) (+.f64 im re))))
(neg.f64 (/.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (sqrt.f64 (*.f64 (-.f64 re im) (+.f64 im re)))))
(neg.f64 (/.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (neg.f64 (sqrt.f64 (*.f64 (-.f64 re im) (+.f64 im re))))))
(fma.f64 #s(literal 2 binary64) (.f64 (sinh.f64 (.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64))) (cosh.f64 (*.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)))) (cosh.f64 (log.f64 (hypot.f64 im re))))
(sqrt.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))
(fabs.f64 (hypot.f64 im re))
(hypot.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 re)))
(hypot.f64 (neg.f64 (neg.f64 im)) (neg.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 (neg.f64 im)) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 (neg.f64 im)) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (neg.f64 im)) (neg.f64 re))
(hypot.f64 (neg.f64 (neg.f64 im)) (fabs.f64 re))
(hypot.f64 (neg.f64 (neg.f64 im)) re)
(hypot.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (neg.f64 re)))
(hypot.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 (fabs.f64 im)) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (fabs.f64 im)) (neg.f64 re))
(hypot.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 re))
(hypot.f64 (neg.f64 (fabs.f64 im)) re)
(hypot.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 im)))
(hypot.f64 (neg.f64 (neg.f64 re)) (neg.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 (neg.f64 re)) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 (neg.f64 re)) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (neg.f64 re)) (neg.f64 im))
(hypot.f64 (neg.f64 (neg.f64 re)) (fabs.f64 im))
(hypot.f64 (neg.f64 (neg.f64 re)) im)
(hypot.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (neg.f64 im)))
(hypot.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 (fabs.f64 re)) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (fabs.f64 re)) (neg.f64 im))
(hypot.f64 (neg.f64 (fabs.f64 re)) (fabs.f64 im))
(hypot.f64 (neg.f64 (fabs.f64 re)) im)
(hypot.f64 (fabs.f64 (fabs.f64 im)) (neg.f64 (neg.f64 re)))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 re)))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (neg.f64 re))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (fabs.f64 re))
(hypot.f64 (fabs.f64 (fabs.f64 im)) re)
(hypot.f64 (fabs.f64 (fabs.f64 re)) (neg.f64 (neg.f64 im)))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 im)))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (neg.f64 im))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 im))
(hypot.f64 (fabs.f64 (fabs.f64 re)) im)
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (neg.f64 (neg.f64 re)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (neg.f64 (fabs.f64 re)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (neg.f64 re))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (fabs.f64 re))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) re)
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (neg.f64 (neg.f64 im)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (neg.f64 (fabs.f64 im)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (neg.f64 im))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (fabs.f64 im))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) im)
(hypot.f64 (neg.f64 im) (neg.f64 (neg.f64 re)))
(hypot.f64 (neg.f64 im) (neg.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 im) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 im) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (neg.f64 im) (neg.f64 re))
(hypot.f64 (neg.f64 im) (fabs.f64 re))
(hypot.f64 (neg.f64 im) re)
(hypot.f64 (neg.f64 re) (neg.f64 (neg.f64 im)))
(hypot.f64 (neg.f64 re) (neg.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 re) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 re) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (neg.f64 re) (neg.f64 im))
(hypot.f64 (neg.f64 re) (fabs.f64 im))
(hypot.f64 (neg.f64 re) im)
(hypot.f64 (fabs.f64 im) (neg.f64 (neg.f64 re)))
(hypot.f64 (fabs.f64 im) (neg.f64 (fabs.f64 re)))
(hypot.f64 (fabs.f64 im) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (fabs.f64 im) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 im) (neg.f64 re))
(hypot.f64 (fabs.f64 im) (fabs.f64 re))
(hypot.f64 (fabs.f64 im) re)
(hypot.f64 (fabs.f64 re) (neg.f64 (neg.f64 im)))
(hypot.f64 (fabs.f64 re) (neg.f64 (fabs.f64 im)))
(hypot.f64 (fabs.f64 re) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (fabs.f64 re) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 re) (neg.f64 im))
(hypot.f64 (fabs.f64 re) (fabs.f64 im))
(hypot.f64 (fabs.f64 re) im)
(hypot.f64 im (neg.f64 (neg.f64 re)))
(hypot.f64 im (neg.f64 (fabs.f64 re)))
(hypot.f64 im (fabs.f64 (fabs.f64 re)))
(hypot.f64 im (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 im (neg.f64 re))
(hypot.f64 im (fabs.f64 re))
(hypot.f64 im re)
(hypot.f64 re (neg.f64 (neg.f64 im)))
(hypot.f64 re (neg.f64 (fabs.f64 im)))
(hypot.f64 re (fabs.f64 (fabs.f64 im)))
(hypot.f64 re (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 re (neg.f64 im))
(hypot.f64 re (fabs.f64 im))
(hypot.f64 re im)
(exp.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 4 binary64))) #s(literal 1/4 binary64)))
(exp.f64 (log.f64 (hypot.f64 im re)))
(+.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) (cosh.f64 (log.f64 (hypot.f64 im re))))
(+.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (sinh.f64 (log.f64 (hypot.f64 im re))))
(*.f64 (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal 1/4 binary64)) (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal 1/4 binary64)))
(pow.f64 (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 im #s(literal 8 binary64)))) (hypot.f64 (.f64 im im) (.f64 re re)))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64)))) (sqrt.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 8 binary64)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (neg.f64 (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 8 binary64)))))
(sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))
(exp.f64 (*.f64 (log.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) #s(literal 1/2 binary64)))
(.f64 (fma.f64 (neg.f64 re) re (.f64 im im)) (-.f64 (.f64 (neg.f64 re) re) (.f64 im im)))
(.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 (-.f64 re im) (+.f64 im re)))
(/.f64 (-.f64 (pow.f64 im #s(literal 8 binary64)) (pow.f64 re #s(literal 8 binary64))) (-.f64 (neg.f64 (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64)))) (neg.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 8 binary64)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (neg.f64 (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 8 binary64)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 im #s(literal 8 binary64)))) (neg.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))
(/.f64 (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 im #s(literal 8 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))
(/.f64 (-.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) (+.f64 (pow.f64 re #s(literal 8 binary64)) (+.f64 (pow.f64 im #s(literal 8 binary64)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))))
(/.f64 (-.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) (+.f64 (pow.f64 im #s(literal 8 binary64)) (-.f64 (pow.f64 re #s(literal 8 binary64)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (neg.f64 (pow.f64 im #s(literal 4 binary64)))))))
(/.f64 (-.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 8 binary64)) (*.f64 (pow.f64 re #s(literal 4 binary64)) (neg.f64 (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 8 binary64))))
(fma.f64 (.f64 (.f64 re re) (neg.f64 re)) (neg.f64 re) (neg.f64 (pow.f64 im #s(literal 4 binary64))))
(fma.f64 (.f64 (.f64 re re) (fabs.f64 re)) (fabs.f64 re) (neg.f64 (pow.f64 im #s(literal 4 binary64))))
(fma.f64 (.f64 (neg.f64 re) (fabs.f64 re)) (.f64 (neg.f64 re) (fabs.f64 re)) (neg.f64 (pow.f64 im #s(literal 4 binary64))))
(fma.f64 (.f64 (fabs.f64 re) (neg.f64 re)) (.f64 (fabs.f64 re) (neg.f64 re)) (neg.f64 (pow.f64 im #s(literal 4 binary64))))
(fma.f64 (.f64 (fabs.f64 re) re) (.f64 (fabs.f64 re) re) (neg.f64 (pow.f64 im #s(literal 4 binary64))))
(fma.f64 (.f64 re (fabs.f64 re)) (.f64 re (fabs.f64 re)) (neg.f64 (pow.f64 im #s(literal 4 binary64))))
(fma.f64 (.f64 (neg.f64 im) im) (.f64 im im) (pow.f64 re #s(literal 4 binary64)))
(fma.f64 (pow.f64 (.f64 re re) #s(literal 1 binary64)) (pow.f64 (.f64 re re) #s(literal 1 binary64)) (neg.f64 (pow.f64 im #s(literal 4 binary64))))
(fma.f64 (pow.f64 (.f64 re re) #s(literal 1 binary64)) (.f64 re re) (neg.f64 (pow.f64 im #s(literal 4 binary64))))
(fma.f64 (neg.f64 re) (.f64 (neg.f64 re) (.f64 re re)) (neg.f64 (pow.f64 im #s(literal 4 binary64))))
(fma.f64 (.f64 (neg.f64 re) re) (.f64 (neg.f64 re) re) (neg.f64 (pow.f64 im #s(literal 4 binary64))))
(fma.f64 (fabs.f64 re) (.f64 (fabs.f64 re) (.f64 re re)) (neg.f64 (pow.f64 im #s(literal 4 binary64))))
(fma.f64 (pow.f64 re #s(literal 3 binary64)) re (neg.f64 (pow.f64 im #s(literal 4 binary64))))
(fma.f64 (.f64 im im) (.f64 (neg.f64 im) im) (pow.f64 re #s(literal 4 binary64)))
(fma.f64 (.f64 re re) (.f64 re re) (neg.f64 (pow.f64 im #s(literal 4 binary64))))
(fma.f64 re (pow.f64 re #s(literal 3 binary64)) (neg.f64 (pow.f64 im #s(literal 4 binary64))))
(-.f64 (/.f64 (pow.f64 re #s(literal 8 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (/.f64 (pow.f64 im #s(literal 8 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))
(-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))
(-.f64 (neg.f64 (pow.f64 im #s(literal 4 binary64))) (*.f64 (neg.f64 (pow.f64 re #s(literal 3 binary64))) re))
(-.f64 (neg.f64 (pow.f64 im #s(literal 4 binary64))) (*.f64 (neg.f64 re) (pow.f64 re #s(literal 3 binary64))))
(-.f64 (neg.f64 (pow.f64 im #s(literal 4 binary64))) (.f64 (.f64 (neg.f64 re) re) (*.f64 re re)))
(-.f64 (neg.f64 (pow.f64 im #s(literal 4 binary64))) (.f64 (.f64 re re) (*.f64 (neg.f64 re) re)))
(+.f64 (/.f64 (pow.f64 re #s(literal 12 binary64)) (+.f64 (-.f64 (pow.f64 im #s(literal 8 binary64)) (.f64 (pow.f64 re #s(literal 4 binary64)) (neg.f64 (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 8 binary64)))) (/.f64 (neg.f64 (pow.f64 im #s(literal 12 binary64))) (+.f64 (-.f64 (pow.f64 im #s(literal 8 binary64)) (.f64 (pow.f64 re #s(literal 4 binary64)) (neg.f64 (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 8 binary64)))))
(+.f64 (pow.f64 re #s(literal 4 binary64)) (neg.f64 (pow.f64 im #s(literal 4 binary64))))
(+.f64 (neg.f64 (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64)))
(*.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 re)))
(*.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 re)))
(*.f64 (fabs.f64 (fabs.f64 re)) (fabs.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 (neg.f64 re) (neg.f64 re))
(*.f64 (fabs.f64 re) (fabs.f64 re))
(*.f64 re re)
(pow.f64 (neg.f64 re) #s(literal 2 binary64))
(pow.f64 (fabs.f64 re) #s(literal 2 binary64))
(pow.f64 re #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 re) re))
(sqrt.f64 (pow.f64 re #s(literal 4 binary64)))
(fabs.f64 (*.f64 (neg.f64 re) re))
(fabs.f64 (*.f64 re re))
(exp.f64 (*.f64 (log.f64 re) #s(literal 2 binary64)))
(.f64 (.f64 (neg.f64 im) im) (*.f64 im im))
(.f64 (.f64 im im) (*.f64 (neg.f64 im) im))
(neg.f64 (pow.f64 im #s(literal 4 binary64)))
(.f64 (.f64 (neg.f64 im) (fabs.f64 im)) (*.f64 (neg.f64 im) (fabs.f64 im)))
(.f64 (.f64 (fabs.f64 im) (neg.f64 im)) (*.f64 (fabs.f64 im) (neg.f64 im)))
(.f64 (.f64 (fabs.f64 im) im) (*.f64 (fabs.f64 im) im))
(.f64 (.f64 im (fabs.f64 im)) (*.f64 im (fabs.f64 im)))
(.f64 (.f64 (*.f64 im im) (neg.f64 im)) (neg.f64 im))
(.f64 (.f64 (*.f64 im im) (fabs.f64 im)) (fabs.f64 im))
(.f64 (.f64 (neg.f64 im) im) (*.f64 (neg.f64 im) im))
(.f64 (neg.f64 im) (.f64 (neg.f64 im) (*.f64 im im)))
(.f64 (fabs.f64 im) (.f64 (fabs.f64 im) (*.f64 im im)))
(*.f64 (pow.f64 im #s(literal 3 binary64)) im)
(.f64 (.f64 im im) (*.f64 im im))
(*.f64 im (pow.f64 im #s(literal 3 binary64)))
(pow.f64 (exp.f64 (log.f64 im)) #s(literal 4 binary64))
(pow.f64 (*.f64 im im) #s(literal 2 binary64))
(pow.f64 im #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 im) #s(literal 4 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 im) #s(literal 4 binary64))) (sinh.f64 (.f64 (log.f64 im) #s(literal 4 binary64))))
#s(literal 4 binary64)
(.f64 (pow.f64 (.f64 (-.f64 re im) (+.f64 im re)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 (-.f64 re im) (+.f64 im re)) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 (-.f64 re im)) (sqrt.f64 (+.f64 im re)))
(*.f64 (sqrt.f64 (+.f64 im re)) (sqrt.f64 (-.f64 re im)))
(pow.f64 (pow.f64 (*.f64 (-.f64 re im) (+.f64 im re)) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (-.f64 re im) (+.f64 im re)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (-.f64 re im) (+.f64 im re)))
(exp.f64 (.f64 (log.f64 (.f64 (-.f64 re im) (+.f64 im re))) #s(literal 1/2 binary64)))
(*.f64 (+.f64 (neg.f64 re) (neg.f64 im)) (-.f64 (neg.f64 re) (neg.f64 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 (fabs.f64 re) (neg.f64 im)) (-.f64 (fabs.f64 re) (neg.f64 im)))
(*.f64 (+.f64 (fabs.f64 re) (fabs.f64 im)) (-.f64 (fabs.f64 re) (fabs.f64 im)))
(*.f64 (+.f64 (fabs.f64 re) im) (-.f64 (fabs.f64 re) im))
(*.f64 (+.f64 re (fabs.f64 im)) (-.f64 re (fabs.f64 im)))
(*.f64 (-.f64 re im) (-.f64 re (neg.f64 im)))
(*.f64 (-.f64 re im) (+.f64 im re))
(*.f64 (+.f64 im re) (-.f64 re im))
(/.f64 (.f64 (-.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (+.f64 im re)) (fma.f64 im (+.f64 im re) (.f64 re re)))
(/.f64 (.f64 (.f64 (-.f64 re im) (+.f64 im re)) (+.f64 im re)) (+.f64 im re))
(/.f64 (.f64 (+.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (-.f64 re im)) (fma.f64 im (-.f64 im re) (.f64 re re)))
(/.f64 (.f64 (.f64 (-.f64 re im) (+.f64 im re)) (-.f64 re im)) (-.f64 re im))
(/.f64 (.f64 (-.f64 re im) (+.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))) (fma.f64 im (-.f64 im re) (.f64 re re)))
(/.f64 (.f64 (-.f64 re im) (.f64 (-.f64 re im) (+.f64 im re))) (-.f64 re im))
(/.f64 (.f64 (+.f64 im re) (-.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))) (fma.f64 im (+.f64 im re) (.f64 re re)))
(/.f64 (.f64 (+.f64 im re) (.f64 (-.f64 re im) (+.f64 im re))) (+.f64 im re))
(/.f64 (.f64 (-.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (+.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))) (.f64 (fma.f64 im (+.f64 im re) (.f64 re re)) (fma.f64 im (-.f64 im re) (.f64 re re))))
(/.f64 (.f64 (-.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (.f64 (-.f64 re im) (+.f64 im re))) (-.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))))
(/.f64 (.f64 (.f64 (-.f64 re im) (+.f64 im re)) (+.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))) (.f64 (+.f64 im re) (fma.f64 im (-.f64 im re) (.f64 re re))))
(/.f64 (.f64 (+.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (.f64 (-.f64 re im) (+.f64 im re))) (+.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))))
(/.f64 (.f64 (.f64 (-.f64 re im) (+.f64 im re)) (-.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))) (.f64 (-.f64 re im) (fma.f64 im (+.f64 im re) (.f64 re re))))
(/.f64 (.f64 (.f64 (-.f64 re im) (+.f64 im re)) (.f64 (-.f64 re im) (+.f64 im re))) (.f64 (-.f64 re im) (+.f64 im re)))
(/.f64 (-.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (.f64 im im) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (.f64 (fma.f64 im (-.f64 im re) (.f64 re re)) (fma.f64 im (+.f64 im re) (*.f64 re re))))
(/.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))
(fma.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 re)) (*.f64 (neg.f64 (neg.f64 im)) (neg.f64 im)))
(fma.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 re)) (*.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 im)))
(fma.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 re)) (*.f64 (neg.f64 im) im))
(fma.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 re)) (*.f64 (neg.f64 (neg.f64 im)) (neg.f64 im)))
(fma.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 re)) (*.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 im)))
(fma.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 re)) (*.f64 (neg.f64 im) im))
(fma.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 re)) (*.f64 (neg.f64 (neg.f64 im)) (neg.f64 im)))
(fma.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 re)) (*.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 im)))
(fma.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 re)) (*.f64 (neg.f64 im) im))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)) (*.f64 (neg.f64 (neg.f64 im)) (neg.f64 im)))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)) (*.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 im)))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)) (*.f64 (neg.f64 im) im))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) re (*.f64 (neg.f64 (neg.f64 im)) (neg.f64 im)))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) re (*.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 im)))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) re (*.f64 (neg.f64 im) im))
(fma.f64 (neg.f64 re) (neg.f64 re) (*.f64 (neg.f64 (neg.f64 im)) (neg.f64 im)))
(fma.f64 (neg.f64 re) (neg.f64 re) (*.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 im)))
(fma.f64 (neg.f64 re) (neg.f64 re) (*.f64 (neg.f64 im) im))
(fma.f64 (fabs.f64 re) (fabs.f64 re) (*.f64 (neg.f64 (neg.f64 im)) (neg.f64 im)))
(fma.f64 (fabs.f64 re) (fabs.f64 re) (*.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 im)))
(fma.f64 (fabs.f64 re) (fabs.f64 re) (*.f64 (neg.f64 im) im))
(fma.f64 (-.f64 re im) im (*.f64 (-.f64 re im) re))
(fma.f64 (-.f64 re im) re (*.f64 (-.f64 re im) im))
(fma.f64 (+.f64 im re) re (*.f64 (+.f64 im re) (neg.f64 im)))
(fma.f64 im (-.f64 re im) (*.f64 re (-.f64 re im)))
(fma.f64 re (-.f64 re im) (*.f64 im (-.f64 re im)))
(fma.f64 re (+.f64 im re) (*.f64 (neg.f64 im) (+.f64 im re)))
(fma.f64 re re (*.f64 (neg.f64 (neg.f64 im)) (neg.f64 im)))
(fma.f64 re re (*.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 im)))
(fma.f64 re re (*.f64 (neg.f64 im) im))
(-.f64 (.f64 re re) (.f64 im im))
(+.f64 (.f64 im (-.f64 re im)) (.f64 re (-.f64 re im)))
(+.f64 (.f64 re (-.f64 re im)) (.f64 im (-.f64 re im)))
(+.f64 (.f64 re (+.f64 im re)) (.f64 (neg.f64 im) (+.f64 im re)))
(+.f64 (.f64 (-.f64 re im) im) (.f64 (-.f64 re im) re))
(+.f64 (.f64 (-.f64 re im) re) (.f64 (-.f64 re im) im))
(+.f64 (.f64 (+.f64 im re) re) (.f64 (+.f64 im re) (neg.f64 im)))
(+.f64 (.f64 re re) (.f64 (neg.f64 (neg.f64 im)) (neg.f64 im)))
(+.f64 (.f64 re re) (.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 im)))
(+.f64 (.f64 re re) (.f64 (neg.f64 im) im))
(.f64 (/.f64 (.f64 (-.f64 re im) (+.f64 im re)) (-.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))) (fma.f64 im (+.f64 im re) (*.f64 re re)))
(.f64 (/.f64 (.f64 (-.f64 re im) (+.f64 im re)) (*.f64 (-.f64 re im) (+.f64 im re))) (+.f64 im re))
(*.f64 (-.f64 re im) (/.f64 (+.f64 im re) (-.f64 re im)))
(*.f64 (+.f64 im re) (/.f64 (-.f64 re im) (-.f64 re im)))
(/.f64 (neg.f64 (+.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))) (neg.f64 (fma.f64 im (-.f64 im re) (*.f64 re re))))
(/.f64 (neg.f64 (*.f64 (-.f64 re im) (+.f64 im re))) (neg.f64 (-.f64 re im)))
(/.f64 (*.f64 (+.f64 im re) (-.f64 im re)) (-.f64 im re))
(/.f64 (+.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (fma.f64 im im (-.f64 (.f64 re re) (.f64 im re))))
(/.f64 (+.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (fma.f64 im (-.f64 im re) (*.f64 re re)))
(/.f64 (*.f64 (-.f64 re im) (+.f64 im re)) (-.f64 re im))
(-.f64 (/.f64 (.f64 re re) (-.f64 re im)) (/.f64 (.f64 im im) (-.f64 re im)))
(+.f64 (/.f64 (pow.f64 re #s(literal 3 binary64)) (fma.f64 im (-.f64 im re) (.f64 re re))) (/.f64 (pow.f64 im #s(literal 3 binary64)) (fma.f64 im (-.f64 im re) (.f64 re re))))
(+.f64 im re)
(+.f64 re im)
(.f64 (/.f64 (.f64 (-.f64 re im) (+.f64 im re)) (+.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))) (fma.f64 im (-.f64 im re) (*.f64 re re)))
(.f64 (/.f64 (.f64 (-.f64 re im) (+.f64 im re)) (*.f64 (-.f64 re im) (+.f64 im re))) (-.f64 re im))
(*.f64 (-.f64 re im) (/.f64 (+.f64 im re) (+.f64 im re)))
(*.f64 (+.f64 im re) (/.f64 (-.f64 re im) (+.f64 im re)))
(/.f64 (+.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 (neg.f64 im) #s(literal 3 binary64))) (fma.f64 re re (-.f64 (.f64 im im) (.f64 re (neg.f64 im)))))
(/.f64 (neg.f64 (-.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))) (neg.f64 (fma.f64 im (+.f64 im re) (*.f64 re re))))
(/.f64 (neg.f64 (*.f64 (-.f64 re im) (+.f64 im re))) (neg.f64 (+.f64 im re)))
(/.f64 (-.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (fma.f64 im (+.f64 im re) (*.f64 re re)))
(/.f64 (*.f64 (-.f64 re im) (+.f64 im re)) (-.f64 re (neg.f64 im)))
(/.f64 (*.f64 (-.f64 re im) (+.f64 im re)) (+.f64 im re))
(-.f64 (/.f64 (pow.f64 re #s(literal 3 binary64)) (fma.f64 im (+.f64 im re) (.f64 re re))) (/.f64 (pow.f64 im #s(literal 3 binary64)) (fma.f64 im (+.f64 im re) (.f64 re re))))
(-.f64 (/.f64 (.f64 re re) (+.f64 im re)) (/.f64 (.f64 im im) (+.f64 im re)))
(-.f64 re im)
(+.f64 (neg.f64 im) re)
(+.f64 re (neg.f64 im))
(.f64 (.f64 (sqrt.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (+.f64 (hypot.f64 im re) re)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (hypot.f64 im re) re))) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (sqrt.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 (hypot.f64 im re) re)) #s(literal 1/2 binary64)))
(.f64 #s(literal 2 binary64) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)))))
(.f64 (sqrt.f64 (+.f64 (hypot.f64 im re) re)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (.f64 (sqrt.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64))
(.f64 (pow.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (+.f64 (hypot.f64 im re) re)))
(*.f64 (sqrt.f64 (+.f64 (hypot.f64 im re) re)) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (pow.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (+.f64 (hypot.f64 im re) re))
(/.f64 (.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)) #s(literal 2 binary64)) (-.f64 (hypot.f64 im re) re))
(/.f64 (*.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) #s(literal 2 binary64)) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 4 binary64) (+.f64 (hypot.f64 im re) re)) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 4 binary64)) #s(literal 2 binary64))
(/.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re))) (-.f64 (hypot.f64 im re) re))
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64)))) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 #s(literal 2 binary64) (hypot.f64 im re))) (.f64 (.f64 #s(literal 2 binary64) re) (.f64 #s(literal 2 binary64) re))) (-.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 #s(literal 2 binary64) re)))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 2 binary64) re) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (-.f64 (.f64 (.f64 #s(literal 2 binary64) re) (.f64 #s(literal 2 binary64) re)) (.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 #s(literal 2 binary64) re)))))
(/.f64 (-.f64 (.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re)) (.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re))) (-.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re)))
(/.f64 (+.f64 (pow.f64 (+.f64 (hypot.f64 im re) re) #s(literal 3 binary64)) (pow.f64 (+.f64 (hypot.f64 im re) re) #s(literal 3 binary64))) (fma.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re) (-.f64 (.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re)) (.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re)))))
(/.f64 (+.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)) (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re))) (-.f64 (hypot.f64 im re) re))
(/.f64 (+.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64)))) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(/.f64 (.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)) #s(literal 4 binary64)) (*.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) #s(literal 4 binary64)) (.f64 (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re))) (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 im re) re)))
(/.f64 (.f64 #s(literal 4 binary64) (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)) (-.f64 (hypot.f64 im re) re) (.f64 (-.f64 (hypot.f64 im re) re) (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)))) (.f64 (-.f64 (hypot.f64 im re) re) (-.f64 (hypot.f64 im re) re)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (.f64 (-.f64 (hypot.f64 im re) re) (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))))) (*.f64 (-.f64 (hypot.f64 im re) re) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (-.f64 (hypot.f64 im re) re) (.f64 (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)))) (*.f64 (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (-.f64 (hypot.f64 im re) re)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (.f64 (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))))) (.f64 (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(fma.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (hypot.f64 im re))) (sqrt.f64 (hypot.f64 im re)) (.f64 #s(literal 2 binary64) re))
(fma.f64 (*.f64 (sqrt.f64 (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64))) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (+.f64 re (+.f64 (hypot.f64 im re) re)))
(fma.f64 (neg.f64 (sqrt.f64 (hypot.f64 im re))) (neg.f64 (sqrt.f64 (hypot.f64 im re))) (+.f64 re (+.f64 (hypot.f64 im re) re)))
(fma.f64 (fabs.f64 (sqrt.f64 (hypot.f64 im re))) (fabs.f64 (sqrt.f64 (hypot.f64 im re))) (+.f64 re (+.f64 (hypot.f64 im re) re)))
(fma.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (sqrt.f64 (hypot.f64 im re))) (+.f64 re (+.f64 (hypot.f64 im re) re)))
(fma.f64 (sqrt.f64 (hypot.f64 im re)) (.f64 (sqrt.f64 (hypot.f64 im re)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) re))
(fma.f64 (sqrt.f64 (hypot.f64 im re)) (sqrt.f64 (hypot.f64 im re)) (+.f64 re (+.f64 (hypot.f64 im re) re)))
(fma.f64 #s(literal 1 binary64) (+.f64 (hypot.f64 im re) re) (*.f64 #s(literal 1 binary64) (+.f64 (hypot.f64 im re) re)))
(fma.f64 (+.f64 (hypot.f64 im re) re) #s(literal 1 binary64) (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 1 binary64)))
(fma.f64 #s(literal 2 binary64) (hypot.f64 im re) (*.f64 #s(literal 2 binary64) re))
(fma.f64 #s(literal 2 binary64) re (*.f64 #s(literal 2 binary64) (hypot.f64 im re)))
(fma.f64 (hypot.f64 im re) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) re))
(fma.f64 re #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (hypot.f64 im re)))
(-.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 (neg.f64 re) #s(literal 2 binary64)))
(-.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 #s(literal -2 binary64) re))
(+.f64 (+.f64 (+.f64 (hypot.f64 im re) re) (hypot.f64 im re)) re)
(+.f64 (+.f64 (+.f64 (hypot.f64 im re) re) re) (hypot.f64 im re))
(+.f64 (.f64 #s(literal 1 binary64) (+.f64 (hypot.f64 im re) re)) (.f64 #s(literal 1 binary64) (+.f64 (hypot.f64 im re) re)))
(+.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 1 binary64)) (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 #s(literal 2 binary64) re))
(+.f64 (.f64 #s(literal 2 binary64) re) (.f64 #s(literal 2 binary64) (hypot.f64 im re)))
(+.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re))
(+.f64 (hypot.f64 im re) (+.f64 re (+.f64 (hypot.f64 im re) re)))
(+.f64 re (+.f64 (hypot.f64 im re) (+.f64 (hypot.f64 im re) re)))
(/.f64 (-.f64 (*.f64 re re) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (-.f64 re (hypot.f64 im re)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (*.f64 re re))) (neg.f64 (-.f64 (hypot.f64 im re) re)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64)))) (neg.f64 (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (*.f64 re re)) (-.f64 (hypot.f64 im re) re))
(/.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (fma.f64 re re (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (*.f64 (hypot.f64 im re) re))))
(/.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(fma.f64 (*.f64 (sqrt.f64 (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64))) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) re)
(fma.f64 (neg.f64 (sqrt.f64 (hypot.f64 im re))) (neg.f64 (sqrt.f64 (hypot.f64 im re))) re)
(fma.f64 (fabs.f64 (sqrt.f64 (hypot.f64 im re))) (fabs.f64 (sqrt.f64 (hypot.f64 im re))) re)
(fma.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (sqrt.f64 (hypot.f64 im re))) re)
(fma.f64 (sqrt.f64 (hypot.f64 im re)) (sqrt.f64 (hypot.f64 im re)) re)
(-.f64 (/.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (-.f64 (hypot.f64 im re) re)) (/.f64 (*.f64 re re) (-.f64 (hypot.f64 im re) re)))
(-.f64 re (*.f64 (neg.f64 (sqrt.f64 (hypot.f64 im re))) (sqrt.f64 (hypot.f64 im re))))
(+.f64 (+.f64 re (cosh.f64 (log.f64 (hypot.f64 im re)))) (sinh.f64 (log.f64 (hypot.f64 im re))))
(+.f64 (/.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))) (/.f64 (pow.f64 re #s(literal 3 binary64)) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(+.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (+.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) re))
(+.f64 (hypot.f64 im re) re)
(+.f64 re (hypot.f64 im re))
(.f64 (.f64 (sqrt.f64 (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64))) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)))
(*.f64 (neg.f64 (sqrt.f64 (hypot.f64 im re))) (neg.f64 (sqrt.f64 (hypot.f64 im re))))
(*.f64 (fabs.f64 (sqrt.f64 (hypot.f64 im re))) (fabs.f64 (sqrt.f64 (hypot.f64 im re))))
(.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (sqrt.f64 (hypot.f64 im re))))
(*.f64 (sqrt.f64 (hypot.f64 im re)) (sqrt.f64 (hypot.f64 im re)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (*.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 4 binary64)) #s(literal 1/4 binary64))
(pow.f64 (sqrt.f64 (hypot.f64 im re)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (hypot.f64 im re) #s(literal 1 binary64))
(/.f64 (/.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (+.f64 im re))) (sqrt.f64 (-.f64 re im)))
(/.f64 (-.f64 (.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (cosh.f64 (log.f64 (hypot.f64 im re)))) (.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) (sinh.f64 (log.f64 (hypot.f64 im re))))) (-.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (sinh.f64 (log.f64 (hypot.f64 im re)))))
(/.f64 (+.f64 (pow.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) #s(literal 3 binary64))) (fma.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (cosh.f64 (log.f64 (hypot.f64 im re))) (-.f64 (.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) (sinh.f64 (log.f64 (hypot.f64 im re)))) (.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (sinh.f64 (log.f64 (hypot.f64 im re)))))))
(/.f64 (neg.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 (-.f64 re im) (+.f64 im re))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (sqrt.f64 (*.f64 (+.f64 im re) (-.f64 im re))))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (neg.f64 (sqrt.f64 (*.f64 (-.f64 re im) (+.f64 im re)))))
(/.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (*.f64 (-.f64 re im) (+.f64 im re))))
(neg.f64 (/.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (sqrt.f64 (*.f64 (-.f64 re im) (+.f64 im re)))))
(neg.f64 (/.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (neg.f64 (sqrt.f64 (*.f64 (-.f64 re im) (+.f64 im re))))))
(fma.f64 #s(literal 2 binary64) (.f64 (sinh.f64 (.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64))) (cosh.f64 (*.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)))) (cosh.f64 (log.f64 (hypot.f64 im re))))
(sqrt.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))
(fabs.f64 (hypot.f64 im re))
(hypot.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 re)))
(hypot.f64 (neg.f64 (neg.f64 im)) (neg.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 (neg.f64 im)) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 (neg.f64 im)) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (neg.f64 im)) (neg.f64 re))
(hypot.f64 (neg.f64 (neg.f64 im)) (fabs.f64 re))
(hypot.f64 (neg.f64 (neg.f64 im)) re)
(hypot.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (neg.f64 re)))
(hypot.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 (fabs.f64 im)) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (fabs.f64 im)) (neg.f64 re))
(hypot.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 re))
(hypot.f64 (neg.f64 (fabs.f64 im)) re)
(hypot.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 im)))
(hypot.f64 (neg.f64 (neg.f64 re)) (neg.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 (neg.f64 re)) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 (neg.f64 re)) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (neg.f64 re)) (neg.f64 im))
(hypot.f64 (neg.f64 (neg.f64 re)) (fabs.f64 im))
(hypot.f64 (neg.f64 (neg.f64 re)) im)
(hypot.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (neg.f64 im)))
(hypot.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 (fabs.f64 re)) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (fabs.f64 re)) (neg.f64 im))
(hypot.f64 (neg.f64 (fabs.f64 re)) (fabs.f64 im))
(hypot.f64 (neg.f64 (fabs.f64 re)) im)
(hypot.f64 (fabs.f64 (fabs.f64 im)) (neg.f64 (neg.f64 re)))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 re)))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (neg.f64 re))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (fabs.f64 re))
(hypot.f64 (fabs.f64 (fabs.f64 im)) re)
(hypot.f64 (fabs.f64 (fabs.f64 re)) (neg.f64 (neg.f64 im)))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 im)))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (neg.f64 im))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 im))
(hypot.f64 (fabs.f64 (fabs.f64 re)) im)
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (neg.f64 (neg.f64 re)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (neg.f64 (fabs.f64 re)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (neg.f64 re))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (fabs.f64 re))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) re)
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (neg.f64 (neg.f64 im)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (neg.f64 (fabs.f64 im)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (neg.f64 im))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (fabs.f64 im))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) im)
(hypot.f64 (neg.f64 im) (neg.f64 (neg.f64 re)))
(hypot.f64 (neg.f64 im) (neg.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 im) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 im) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (neg.f64 im) (neg.f64 re))
(hypot.f64 (neg.f64 im) (fabs.f64 re))
(hypot.f64 (neg.f64 im) re)
(hypot.f64 (neg.f64 re) (neg.f64 (neg.f64 im)))
(hypot.f64 (neg.f64 re) (neg.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 re) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 re) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (neg.f64 re) (neg.f64 im))
(hypot.f64 (neg.f64 re) (fabs.f64 im))
(hypot.f64 (neg.f64 re) im)
(hypot.f64 (fabs.f64 im) (neg.f64 (neg.f64 re)))
(hypot.f64 (fabs.f64 im) (neg.f64 (fabs.f64 re)))
(hypot.f64 (fabs.f64 im) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (fabs.f64 im) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 im) (neg.f64 re))
(hypot.f64 (fabs.f64 im) (fabs.f64 re))
(hypot.f64 (fabs.f64 im) re)
(hypot.f64 (fabs.f64 re) (neg.f64 (neg.f64 im)))
(hypot.f64 (fabs.f64 re) (neg.f64 (fabs.f64 im)))
(hypot.f64 (fabs.f64 re) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (fabs.f64 re) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 re) (neg.f64 im))
(hypot.f64 (fabs.f64 re) (fabs.f64 im))
(hypot.f64 (fabs.f64 re) im)
(hypot.f64 im (neg.f64 (neg.f64 re)))
(hypot.f64 im (neg.f64 (fabs.f64 re)))
(hypot.f64 im (fabs.f64 (fabs.f64 re)))
(hypot.f64 im (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 im (neg.f64 re))
(hypot.f64 im (fabs.f64 re))
(hypot.f64 im re)
(hypot.f64 re (neg.f64 (neg.f64 im)))
(hypot.f64 re (neg.f64 (fabs.f64 im)))
(hypot.f64 re (fabs.f64 (fabs.f64 im)))
(hypot.f64 re (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 re (neg.f64 im))
(hypot.f64 re (fabs.f64 im))
(hypot.f64 re im)
(exp.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 4 binary64))) #s(literal 1/4 binary64)))
(exp.f64 (log.f64 (hypot.f64 im re)))
(+.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) (cosh.f64 (log.f64 (hypot.f64 im re))))
(+.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (sinh.f64 (log.f64 (hypot.f64 im re))))
(.f64 (.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(.f64 (.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(*.f64 #s(literal 1 binary64) (log.f64 (hypot.f64 im re)))
(*.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(*.f64 (log.f64 (hypot.f64 im re)) #s(literal 1 binary64))
(*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(.f64 #s(literal 2 binary64) (.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(/.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64))
(fma.f64 #s(literal 1/4 binary64) (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (*.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)))
(fma.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)))
(fma.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64) (*.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (log.f64 (hypot.f64 im re)) (*.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 2 binary64) (.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/4 binary64)) (.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)))
(-.f64 (log.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))))
(+.f64 (.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)) (.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)))
(log.f64 (hypot.f64 im re))
(*.f64 #s(literal 1 binary64) (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(*.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) #s(literal 1 binary64))
(*.f64 (log.f64 (hypot.f64 im re)) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (log.f64 (hypot.f64 im re)))
(/.f64 (*.f64 #s(literal 4 binary64) (log.f64 (hypot.f64 im re))) #s(literal 2 binary64))
(/.f64 (*.f64 (log.f64 (hypot.f64 im re)) #s(literal 4 binary64)) #s(literal 2 binary64))
(/.f64 (-.f64 (.f64 (log.f64 (hypot.f64 im re)) (log.f64 (hypot.f64 im re))) (.f64 (log.f64 (hypot.f64 im re)) (log.f64 (hypot.f64 im re)))) (-.f64 (log.f64 (hypot.f64 im re)) (log.f64 (hypot.f64 im re))))
(/.f64 (+.f64 (pow.f64 (log.f64 (hypot.f64 im re)) #s(literal 3 binary64)) (pow.f64 (log.f64 (hypot.f64 im re)) #s(literal 3 binary64))) (fma.f64 (log.f64 (hypot.f64 im re)) (log.f64 (hypot.f64 im re)) (-.f64 (.f64 (log.f64 (hypot.f64 im re)) (log.f64 (hypot.f64 im re))) (.f64 (log.f64 (hypot.f64 im re)) (log.f64 (hypot.f64 im re))))))
(/.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 2 binary64))
(fma.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1/4 binary64) (log.f64 (hypot.f64 im re)))
(fma.f64 (*.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)) #s(literal 2 binary64) (log.f64 (hypot.f64 im re)))
(fma.f64 #s(literal 1 binary64) (log.f64 (hypot.f64 im re)) (log.f64 (hypot.f64 im re)))
(fma.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) #s(literal 1/2 binary64) (log.f64 (hypot.f64 im re)))
(fma.f64 (log.f64 (hypot.f64 im re)) #s(literal 1 binary64) (log.f64 (hypot.f64 im re)))
(fma.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (log.f64 (hypot.f64 im re)))
(fma.f64 #s(literal 2 binary64) (*.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)) (log.f64 (hypot.f64 im re)))
(-.f64 (log.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (log.f64 (*.f64 (+.f64 im re) (-.f64 im re))))
(-.f64 (log.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (log.f64 (*.f64 (-.f64 re im) (+.f64 im re))))
(-.f64 (log.f64 (neg.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))) (log.f64 (neg.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))))
(-.f64 (log.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (log.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(+.f64 (log.f64 (hypot.f64 im re)) (log.f64 (hypot.f64 im re)))
(log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))
(.f64 (.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(.f64 (.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)) #s(literal 2 binary64))
(*.f64 #s(literal 1 binary64) (log.f64 (hypot.f64 im re)))
(*.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(*.f64 (log.f64 (hypot.f64 im re)) #s(literal 1 binary64))
(*.f64 #s(literal 1/2 binary64) (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(.f64 #s(literal 2 binary64) (.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)))
(/.f64 (.f64 #s(literal 4 binary64) (.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64))) #s(literal 2 binary64))
(/.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64))
(fma.f64 #s(literal 1/4 binary64) (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (*.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)))
(fma.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) #s(literal 1/4 binary64) (*.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)))
(fma.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64) (*.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 1/2 binary64) (log.f64 (hypot.f64 im re)) (*.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)))
(fma.f64 #s(literal 2 binary64) (.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/4 binary64)) (.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)))
(-.f64 (log.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))) (log.f64 (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))))
(+.f64 (.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)) (.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)))
(log.f64 (hypot.f64 im re))
(.f64 (.f64 (sqrt.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (+.f64 (hypot.f64 im re) re)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (hypot.f64 im re) re))) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (sqrt.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 (hypot.f64 im re) re)) #s(literal 1/2 binary64)))
(.f64 #s(literal 2 binary64) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)))))
(.f64 (sqrt.f64 (+.f64 (hypot.f64 im re) re)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (.f64 (sqrt.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64))
(.f64 (pow.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (+.f64 (hypot.f64 im re) re)))
(*.f64 (sqrt.f64 (+.f64 (hypot.f64 im re) re)) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (pow.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (+.f64 (hypot.f64 im re) re))
(/.f64 (.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)) #s(literal 2 binary64)) (-.f64 (hypot.f64 im re) re))
(/.f64 (*.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) #s(literal 2 binary64)) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 4 binary64) (+.f64 (hypot.f64 im re) re)) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 4 binary64)) #s(literal 2 binary64))
(/.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re))) (-.f64 (hypot.f64 im re) re))
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64)))) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 #s(literal 2 binary64) (hypot.f64 im re))) (.f64 (.f64 #s(literal 2 binary64) re) (.f64 #s(literal 2 binary64) re))) (-.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 #s(literal 2 binary64) re)))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 2 binary64) re) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (-.f64 (.f64 (.f64 #s(literal 2 binary64) re) (.f64 #s(literal 2 binary64) re)) (.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 #s(literal 2 binary64) re)))))
(/.f64 (-.f64 (.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re)) (.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re))) (-.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re)))
(/.f64 (+.f64 (pow.f64 (+.f64 (hypot.f64 im re) re) #s(literal 3 binary64)) (pow.f64 (+.f64 (hypot.f64 im re) re) #s(literal 3 binary64))) (fma.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re) (-.f64 (.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re)) (.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re)))))
(/.f64 (+.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)) (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re))) (-.f64 (hypot.f64 im re) re))
(/.f64 (+.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64)))) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(/.f64 (.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)) #s(literal 4 binary64)) (*.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) #s(literal 4 binary64)) (.f64 (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re))) (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 im re) re)))
(/.f64 (.f64 #s(literal 4 binary64) (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)) (-.f64 (hypot.f64 im re) re) (.f64 (-.f64 (hypot.f64 im re) re) (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)))) (.f64 (-.f64 (hypot.f64 im re) re) (-.f64 (hypot.f64 im re) re)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (.f64 (-.f64 (hypot.f64 im re) re) (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))))) (*.f64 (-.f64 (hypot.f64 im re) re) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (-.f64 (hypot.f64 im re) re) (.f64 (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)))) (*.f64 (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (-.f64 (hypot.f64 im re) re)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (.f64 (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))))) (.f64 (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(fma.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (hypot.f64 im re))) (sqrt.f64 (hypot.f64 im re)) (.f64 #s(literal 2 binary64) re))
(fma.f64 (*.f64 (sqrt.f64 (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64))) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (+.f64 re (+.f64 (hypot.f64 im re) re)))
(fma.f64 (neg.f64 (sqrt.f64 (hypot.f64 im re))) (neg.f64 (sqrt.f64 (hypot.f64 im re))) (+.f64 re (+.f64 (hypot.f64 im re) re)))
(fma.f64 (fabs.f64 (sqrt.f64 (hypot.f64 im re))) (fabs.f64 (sqrt.f64 (hypot.f64 im re))) (+.f64 re (+.f64 (hypot.f64 im re) re)))
(fma.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (sqrt.f64 (hypot.f64 im re))) (+.f64 re (+.f64 (hypot.f64 im re) re)))
(fma.f64 (sqrt.f64 (hypot.f64 im re)) (.f64 (sqrt.f64 (hypot.f64 im re)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) re))
(fma.f64 (sqrt.f64 (hypot.f64 im re)) (sqrt.f64 (hypot.f64 im re)) (+.f64 re (+.f64 (hypot.f64 im re) re)))
(fma.f64 #s(literal 1 binary64) (+.f64 (hypot.f64 im re) re) (*.f64 #s(literal 1 binary64) (+.f64 (hypot.f64 im re) re)))
(fma.f64 (+.f64 (hypot.f64 im re) re) #s(literal 1 binary64) (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 1 binary64)))
(fma.f64 #s(literal 2 binary64) (hypot.f64 im re) (*.f64 #s(literal 2 binary64) re))
(fma.f64 #s(literal 2 binary64) re (*.f64 #s(literal 2 binary64) (hypot.f64 im re)))
(fma.f64 (hypot.f64 im re) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) re))
(fma.f64 re #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (hypot.f64 im re)))
(-.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 (neg.f64 re) #s(literal 2 binary64)))
(-.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 #s(literal -2 binary64) re))
(+.f64 (+.f64 (+.f64 (hypot.f64 im re) re) (hypot.f64 im re)) re)
(+.f64 (+.f64 (+.f64 (hypot.f64 im re) re) re) (hypot.f64 im re))
(+.f64 (.f64 #s(literal 1 binary64) (+.f64 (hypot.f64 im re) re)) (.f64 #s(literal 1 binary64) (+.f64 (hypot.f64 im re) re)))
(+.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 1 binary64)) (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 #s(literal 2 binary64) re))
(+.f64 (.f64 #s(literal 2 binary64) re) (.f64 #s(literal 2 binary64) (hypot.f64 im re)))
(+.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re))
(+.f64 (hypot.f64 im re) (+.f64 re (+.f64 (hypot.f64 im re) re)))
(+.f64 re (+.f64 (hypot.f64 im re) (+.f64 (hypot.f64 im re) re)))
(/.f64 (-.f64 (*.f64 re re) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (-.f64 re (hypot.f64 im re)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (*.f64 re re))) (neg.f64 (-.f64 (hypot.f64 im re) re)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64)))) (neg.f64 (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (*.f64 re re)) (-.f64 (hypot.f64 im re) re))
(/.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (fma.f64 re re (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (*.f64 (hypot.f64 im re) re))))
(/.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(fma.f64 (*.f64 (sqrt.f64 (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64))) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) re)
(fma.f64 (neg.f64 (sqrt.f64 (hypot.f64 im re))) (neg.f64 (sqrt.f64 (hypot.f64 im re))) re)
(fma.f64 (fabs.f64 (sqrt.f64 (hypot.f64 im re))) (fabs.f64 (sqrt.f64 (hypot.f64 im re))) re)
(fma.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (sqrt.f64 (hypot.f64 im re))) re)
(fma.f64 (sqrt.f64 (hypot.f64 im re)) (sqrt.f64 (hypot.f64 im re)) re)
(-.f64 (/.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (-.f64 (hypot.f64 im re) re)) (/.f64 (*.f64 re re) (-.f64 (hypot.f64 im re) re)))
(-.f64 re (*.f64 (neg.f64 (sqrt.f64 (hypot.f64 im re))) (sqrt.f64 (hypot.f64 im re))))
(+.f64 (+.f64 re (cosh.f64 (log.f64 (hypot.f64 im re)))) (sinh.f64 (log.f64 (hypot.f64 im re))))
(+.f64 (/.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))) (/.f64 (pow.f64 re #s(literal 3 binary64)) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(+.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (+.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) re))
(+.f64 (hypot.f64 im re) re)
(+.f64 re (hypot.f64 im re))
(.f64 (.f64 (sqrt.f64 (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64))) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)))
(*.f64 (neg.f64 (sqrt.f64 (hypot.f64 im re))) (neg.f64 (sqrt.f64 (hypot.f64 im re))))
(*.f64 (fabs.f64 (sqrt.f64 (hypot.f64 im re))) (fabs.f64 (sqrt.f64 (hypot.f64 im re))))
(.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (sqrt.f64 (hypot.f64 im re))))
(*.f64 (sqrt.f64 (hypot.f64 im re)) (sqrt.f64 (hypot.f64 im re)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (*.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 4 binary64)) #s(literal 1/4 binary64))
(pow.f64 (sqrt.f64 (hypot.f64 im re)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (hypot.f64 im re) #s(literal 1 binary64))
(/.f64 (/.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (+.f64 im re))) (sqrt.f64 (-.f64 re im)))
(/.f64 (-.f64 (.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (cosh.f64 (log.f64 (hypot.f64 im re)))) (.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) (sinh.f64 (log.f64 (hypot.f64 im re))))) (-.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (sinh.f64 (log.f64 (hypot.f64 im re)))))
(/.f64 (+.f64 (pow.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) #s(literal 3 binary64))) (fma.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (cosh.f64 (log.f64 (hypot.f64 im re))) (-.f64 (.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) (sinh.f64 (log.f64 (hypot.f64 im re)))) (.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (sinh.f64 (log.f64 (hypot.f64 im re)))))))
(/.f64 (neg.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 (-.f64 re im) (+.f64 im re))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (sqrt.f64 (*.f64 (+.f64 im re) (-.f64 im re))))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (neg.f64 (sqrt.f64 (*.f64 (-.f64 re im) (+.f64 im re)))))
(/.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (*.f64 (-.f64 re im) (+.f64 im re))))
(neg.f64 (/.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (sqrt.f64 (*.f64 (-.f64 re im) (+.f64 im re)))))
(neg.f64 (/.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (neg.f64 (sqrt.f64 (*.f64 (-.f64 re im) (+.f64 im re))))))
(fma.f64 #s(literal 2 binary64) (.f64 (sinh.f64 (.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64))) (cosh.f64 (*.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)))) (cosh.f64 (log.f64 (hypot.f64 im re))))
(sqrt.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))
(fabs.f64 (hypot.f64 im re))
(hypot.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 re)))
(hypot.f64 (neg.f64 (neg.f64 im)) (neg.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 (neg.f64 im)) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 (neg.f64 im)) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (neg.f64 im)) (neg.f64 re))
(hypot.f64 (neg.f64 (neg.f64 im)) (fabs.f64 re))
(hypot.f64 (neg.f64 (neg.f64 im)) re)
(hypot.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (neg.f64 re)))
(hypot.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 (fabs.f64 im)) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (fabs.f64 im)) (neg.f64 re))
(hypot.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 re))
(hypot.f64 (neg.f64 (fabs.f64 im)) re)
(hypot.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 im)))
(hypot.f64 (neg.f64 (neg.f64 re)) (neg.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 (neg.f64 re)) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 (neg.f64 re)) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (neg.f64 re)) (neg.f64 im))
(hypot.f64 (neg.f64 (neg.f64 re)) (fabs.f64 im))
(hypot.f64 (neg.f64 (neg.f64 re)) im)
(hypot.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (neg.f64 im)))
(hypot.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 (fabs.f64 re)) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (fabs.f64 re)) (neg.f64 im))
(hypot.f64 (neg.f64 (fabs.f64 re)) (fabs.f64 im))
(hypot.f64 (neg.f64 (fabs.f64 re)) im)
(hypot.f64 (fabs.f64 (fabs.f64 im)) (neg.f64 (neg.f64 re)))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 re)))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (neg.f64 re))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (fabs.f64 re))
(hypot.f64 (fabs.f64 (fabs.f64 im)) re)
(hypot.f64 (fabs.f64 (fabs.f64 re)) (neg.f64 (neg.f64 im)))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 im)))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (neg.f64 im))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 im))
(hypot.f64 (fabs.f64 (fabs.f64 re)) im)
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (neg.f64 (neg.f64 re)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (neg.f64 (fabs.f64 re)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (neg.f64 re))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (fabs.f64 re))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) re)
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (neg.f64 (neg.f64 im)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (neg.f64 (fabs.f64 im)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (neg.f64 im))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (fabs.f64 im))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) im)
(hypot.f64 (neg.f64 im) (neg.f64 (neg.f64 re)))
(hypot.f64 (neg.f64 im) (neg.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 im) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 im) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (neg.f64 im) (neg.f64 re))
(hypot.f64 (neg.f64 im) (fabs.f64 re))
(hypot.f64 (neg.f64 im) re)
(hypot.f64 (neg.f64 re) (neg.f64 (neg.f64 im)))
(hypot.f64 (neg.f64 re) (neg.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 re) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 re) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (neg.f64 re) (neg.f64 im))
(hypot.f64 (neg.f64 re) (fabs.f64 im))
(hypot.f64 (neg.f64 re) im)
(hypot.f64 (fabs.f64 im) (neg.f64 (neg.f64 re)))
(hypot.f64 (fabs.f64 im) (neg.f64 (fabs.f64 re)))
(hypot.f64 (fabs.f64 im) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (fabs.f64 im) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 im) (neg.f64 re))
(hypot.f64 (fabs.f64 im) (fabs.f64 re))
(hypot.f64 (fabs.f64 im) re)
(hypot.f64 (fabs.f64 re) (neg.f64 (neg.f64 im)))
(hypot.f64 (fabs.f64 re) (neg.f64 (fabs.f64 im)))
(hypot.f64 (fabs.f64 re) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (fabs.f64 re) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 re) (neg.f64 im))
(hypot.f64 (fabs.f64 re) (fabs.f64 im))
(hypot.f64 (fabs.f64 re) im)
(hypot.f64 im (neg.f64 (neg.f64 re)))
(hypot.f64 im (neg.f64 (fabs.f64 re)))
(hypot.f64 im (fabs.f64 (fabs.f64 re)))
(hypot.f64 im (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 im (neg.f64 re))
(hypot.f64 im (fabs.f64 re))
(hypot.f64 im re)
(hypot.f64 re (neg.f64 (neg.f64 im)))
(hypot.f64 re (neg.f64 (fabs.f64 im)))
(hypot.f64 re (fabs.f64 (fabs.f64 im)))
(hypot.f64 re (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 re (neg.f64 im))
(hypot.f64 re (fabs.f64 im))
(hypot.f64 re im)
(exp.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 4 binary64))) #s(literal 1/4 binary64)))
(exp.f64 (log.f64 (hypot.f64 im re)))
(+.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) (cosh.f64 (log.f64 (hypot.f64 im re))))
(+.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (sinh.f64 (log.f64 (hypot.f64 im re))))
(.f64 (/.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))
(.f64 (/.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (+.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 re #s(literal 12 binary64)))) (fma.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (-.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64))))
(.f64 (.f64 (hypot.f64 im re) (sqrt.f64 (hypot.f64 im re))) (sqrt.f64 (hypot.f64 im re)))
(*.f64 (neg.f64 (hypot.f64 im re)) (neg.f64 (hypot.f64 im re)))
(.f64 (sqrt.f64 (hypot.f64 im re)) (.f64 (sqrt.f64 (hypot.f64 im re)) (hypot.f64 im re)))
(.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (/.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(*.f64 (hypot.f64 im re) (hypot.f64 im re))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (hypot.f64 im re)))
(pow.f64 (*.f64 (pow.f64 (hypot.f64 im re) #s(literal 4 binary64)) (pow.f64 (hypot.f64 im re) #s(literal 4 binary64))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 4 binary64)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (hypot.f64 im re) #s(literal 2 binary64))
(/.f64 (/.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (-.f64 re im)) (+.f64 im re))
(/.f64 (/.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (+.f64 im re)) (-.f64 re im))
(/.f64 (.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (hypot.f64 im re)) (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(/.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (hypot.f64 im re)) (neg.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re)))))
(/.f64 (.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (hypot.f64 im re)) (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re))))
(/.f64 (.f64 (hypot.f64 im re) (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(/.f64 (.f64 (hypot.f64 im re) (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (neg.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re)))))
(/.f64 (.f64 (hypot.f64 im re) (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re))))
(/.f64 (-.f64 (.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))) (.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (-.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 (.f64 (neg.f64 re) re) #s(literal 3 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 (.f64 (neg.f64 im) im) #s(literal 3 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (-.f64 (.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))) (.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (neg.f64 (*.f64 (+.f64 im re) (-.f64 im re))))
(/.f64 (neg.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (neg.f64 (*.f64 (-.f64 re im) (+.f64 im re))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))) (neg.f64 (neg.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))) (.f64 (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (.f64 (neg.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re)))) (neg.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re))))))
(/.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 (neg.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re)))) (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re)))))
(/.f64 (.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re))) (neg.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re))))))
(/.f64 (.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re))) (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re)))))
(/.f64 (fma.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (pow.f64 im #s(literal 6 binary64)))) (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (*.f64 (+.f64 im re) (-.f64 im re)))
(/.f64 (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 im #s(literal 8 binary64))) (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (.f64 (-.f64 re im) (+.f64 im re))))
(/.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (*.f64 (-.f64 re im) (+.f64 im re)))
(/.f64 (+.f64 (pow.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 3 binary64))) (.f64 (fma.f64 (pow.f64 im #s(literal 6 binary64)) (-.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (pow.f64 re #s(literal 12 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) (.f64 (-.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) (.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 8 binary64)) (.f64 (pow.f64 re #s(literal 4 binary64)) (neg.f64 (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 8 binary64))) (*.f64 (-.f64 re im) (+.f64 im re))))
(/.f64 (neg.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (neg.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))
(neg.f64 (/.f64 (neg.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(neg.f64 (/.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (neg.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))))
(fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 re #s(literal 12 binary64)))) (fma.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (-.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 re #s(literal 12 binary64)))) (fma.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (-.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 im)) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 im)) (*.f64 re re))
(fma.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 im)) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 im)) (*.f64 re re))
(fma.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 re)) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 re)) (*.f64 im im))
(fma.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 re)) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 re)) (*.f64 im im))
(fma.f64 (fabs.f64 (fabs.f64 im)) (fabs.f64 (fabs.f64 im)) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (fabs.f64 (fabs.f64 im)) (fabs.f64 (fabs.f64 im)) (*.f64 re re))
(fma.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 re)) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 re)) (*.f64 im im))
(fma.f64 (pow.f64 im #s(literal 1 binary64)) (pow.f64 im #s(literal 1 binary64)) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (pow.f64 im #s(literal 1 binary64)) (pow.f64 im #s(literal 1 binary64)) (*.f64 re re))
(fma.f64 (pow.f64 im #s(literal 1 binary64)) im (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (pow.f64 im #s(literal 1 binary64)) im (*.f64 re re))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)) (*.f64 im im))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) re (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) re (*.f64 im im))
(fma.f64 (neg.f64 im) (neg.f64 im) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (neg.f64 im) (neg.f64 im) (*.f64 re re))
(fma.f64 (neg.f64 re) (neg.f64 re) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (neg.f64 re) (neg.f64 re) (*.f64 im im))
(fma.f64 (fabs.f64 im) (fabs.f64 im) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (fabs.f64 im) (fabs.f64 im) (*.f64 re re))
(fma.f64 (fabs.f64 re) (fabs.f64 re) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (fabs.f64 re) (fabs.f64 re) (*.f64 im im))
(fma.f64 (pow.f64 re #s(literal 3 binary64)) (/.f64 (pow.f64 re #s(literal 3 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) (/.f64 (pow.f64 im #s(literal 3 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (hypot.f64 im re) (*.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) (hypot.f64 im re)))
(fma.f64 (pow.f64 re #s(literal 4 binary64)) (/.f64 (.f64 re re) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (.f64 im im) (/.f64 (pow.f64 im #s(literal 4 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (pow.f64 im #s(literal 4 binary64)) (/.f64 (.f64 im im) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (.f64 re re) (/.f64 (pow.f64 re #s(literal 4 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (hypot.f64 im re) (cosh.f64 (log.f64 (hypot.f64 im re))) (*.f64 (hypot.f64 im re) (sinh.f64 (log.f64 (hypot.f64 im re)))))
(fma.f64 im im (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 im im (*.f64 re re))
(fma.f64 re re (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 re re (*.f64 im im))
(sqrt.f64 (pow.f64 (hypot.f64 im re) #s(literal 4 binary64)))
(-.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (+.f64 im re) (-.f64 im re))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (+.f64 im re) (-.f64 im re))))
(-.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (-.f64 re im) (+.f64 im re))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (-.f64 re im) (+.f64 im re))))
(-.f64 (.f64 im im) (.f64 (neg.f64 re) re))
(-.f64 (.f64 re re) (.f64 (neg.f64 (neg.f64 im)) (neg.f64 im)))
(-.f64 (.f64 re re) (.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 im)))
(-.f64 (.f64 re re) (.f64 (neg.f64 im) im))
(exp.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(+.f64 (.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (hypot.f64 im re)) (.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) (hypot.f64 im re)))
(+.f64 (.f64 (hypot.f64 im re) (cosh.f64 (log.f64 (hypot.f64 im re)))) (.f64 (hypot.f64 im re) (sinh.f64 (log.f64 (hypot.f64 im re)))))
(+.f64 (/.f64 (neg.f64 (pow.f64 im #s(literal 4 binary64))) (.f64 (-.f64 re im) (+.f64 im re))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (-.f64 re im) (+.f64 im re))))
(+.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (-.f64 re im) (+.f64 im re))) (/.f64 (neg.f64 (pow.f64 im #s(literal 4 binary64))) (.f64 (-.f64 re im) (+.f64 im re))))
(+.f64 (cosh.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))) (sinh.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(+.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(+.f64 (.f64 im im) (.f64 (neg.f64 (neg.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 (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))) (hypot.f64 im re)) (hypot.f64 im re))
(.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))
(.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))
(/.f64 (.f64 (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64))) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (-.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))
(/.f64 (.f64 (+.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 re #s(literal 12 binary64))) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (fma.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (-.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64))))
(/.f64 (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (*.f64 (+.f64 im re) (-.f64 im re)))
(/.f64 (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (*.f64 (-.f64 re im) (+.f64 im re)))
(/.f64 (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (neg.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))) (neg.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(/.f64 (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 re #s(literal 12 binary64))) (-.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))
(/.f64 (neg.f64 (-.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64)))) (neg.f64 (-.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 3 binary64)))) (neg.f64 (fma.f64 (pow.f64 im #s(literal 6 binary64)) (-.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (pow.f64 re #s(literal 12 binary64)))))
(/.f64 (.f64 (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (*.f64 (+.f64 im re) (-.f64 im re))))
(/.f64 (.f64 (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (*.f64 (-.f64 re im) (+.f64 im re))))
(/.f64 (.f64 (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64))) (neg.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))) (.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (neg.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (.f64 (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64))) (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(/.f64 (.f64 (+.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 re #s(literal 12 binary64))) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (.f64 (fma.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (-.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64))) (.f64 (+.f64 im re) (-.f64 im re))))
(/.f64 (.f64 (+.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 re #s(literal 12 binary64))) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (.f64 (fma.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (-.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64))) (.f64 (-.f64 re im) (+.f64 im re))))
(/.f64 (.f64 (+.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 re #s(literal 12 binary64))) (neg.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))) (.f64 (fma.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (-.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64))) (neg.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (.f64 (+.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 re #s(literal 12 binary64))) (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (+.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 re #s(literal 12 binary64))))
(/.f64 (+.f64 (pow.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 3 binary64))) (+.f64 (pow.f64 im #s(literal 12 binary64)) (-.f64 (pow.f64 re #s(literal 12 binary64)) (*.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))))
(/.f64 (+.f64 (pow.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 im #s(literal 6 binary64)) (-.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (pow.f64 re #s(literal 12 binary64))))
(/.f64 (-.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) (-.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))
(fma.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) (neg.f64 im)) (neg.f64 im) (pow.f64 re #s(literal 6 binary64)))
(fma.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) (fabs.f64 im)) (fabs.f64 im) (pow.f64 re #s(literal 6 binary64)))
(fma.f64 (*.f64 (pow.f64 im #s(literal 4 binary64)) im) im (pow.f64 re #s(literal 6 binary64)))
(fma.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) (neg.f64 re)) (neg.f64 re) (pow.f64 im #s(literal 6 binary64)))
(fma.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) (fabs.f64 re)) (fabs.f64 re) (pow.f64 im #s(literal 6 binary64)))
(fma.f64 (*.f64 (pow.f64 re #s(literal 4 binary64)) re) re (pow.f64 im #s(literal 6 binary64)))
(fma.f64 (.f64 (.f64 re re) (pow.f64 re #s(literal 3 binary64))) re (pow.f64 im #s(literal 6 binary64)))
(fma.f64 (.f64 (neg.f64 im) (.f64 im im)) (.f64 (neg.f64 im) (.f64 im im)) (pow.f64 re #s(literal 6 binary64)))
(fma.f64 (.f64 (fabs.f64 im) (.f64 im im)) (.f64 (fabs.f64 im) (.f64 im im)) (pow.f64 re #s(literal 6 binary64)))
(fma.f64 (.f64 (.f64 im im) (neg.f64 im)) (.f64 (.f64 im im) (neg.f64 im)) (pow.f64 re #s(literal 6 binary64)))
(fma.f64 (.f64 (.f64 im im) (fabs.f64 im)) (.f64 (.f64 im im) (fabs.f64 im)) (pow.f64 re #s(literal 6 binary64)))
(fma.f64 (.f64 (.f64 re re) (.f64 (neg.f64 re) re)) (.f64 (neg.f64 re) re) (pow.f64 im #s(literal 6 binary64)))
(fma.f64 (.f64 (.f64 (neg.f64 re) re) (fabs.f64 re)) (.f64 (.f64 (neg.f64 re) re) (fabs.f64 re)) (pow.f64 im #s(literal 6 binary64)))
(fma.f64 (.f64 (.f64 (neg.f64 re) re) re) (.f64 (.f64 (neg.f64 re) re) re) (pow.f64 im #s(literal 6 binary64)))
(fma.f64 (.f64 (.f64 re re) (neg.f64 re)) (.f64 (.f64 re re) (neg.f64 re)) (pow.f64 im #s(literal 6 binary64)))
(fma.f64 (.f64 (.f64 re re) (fabs.f64 re)) (.f64 (.f64 re re) (fabs.f64 re)) (pow.f64 im #s(literal 6 binary64)))
(fma.f64 (.f64 (neg.f64 re) (.f64 re re)) (.f64 (neg.f64 re) (.f64 re re)) (pow.f64 im #s(literal 6 binary64)))
(fma.f64 (.f64 (fabs.f64 re) (.f64 (neg.f64 re) re)) (.f64 (fabs.f64 re) (.f64 (neg.f64 re) re)) (pow.f64 im #s(literal 6 binary64)))
(fma.f64 (.f64 (fabs.f64 re) (.f64 re re)) (.f64 (fabs.f64 re) (.f64 re re)) (pow.f64 im #s(literal 6 binary64)))
(fma.f64 (.f64 re (.f64 (neg.f64 re) re)) (.f64 re (.f64 (neg.f64 re) re)) (pow.f64 im #s(literal 6 binary64)))
(fma.f64 (neg.f64 (pow.f64 im #s(literal 3 binary64))) (neg.f64 (pow.f64 im #s(literal 3 binary64))) (pow.f64 re #s(literal 6 binary64)))
(fma.f64 (neg.f64 (pow.f64 re #s(literal 3 binary64))) (neg.f64 (pow.f64 re #s(literal 3 binary64))) (pow.f64 im #s(literal 6 binary64)))
(fma.f64 (fabs.f64 (pow.f64 im #s(literal 3 binary64))) (fabs.f64 (pow.f64 im #s(literal 3 binary64))) (pow.f64 re #s(literal 6 binary64)))
(fma.f64 (fabs.f64 (pow.f64 re #s(literal 3 binary64))) (fabs.f64 (pow.f64 re #s(literal 3 binary64))) (pow.f64 im #s(literal 6 binary64)))
(fma.f64 (pow.f64 (neg.f64 im) #s(literal 3 binary64)) (pow.f64 (neg.f64 im) #s(literal 3 binary64)) (pow.f64 re #s(literal 6 binary64)))
(fma.f64 (pow.f64 (fabs.f64 im) #s(literal 3 binary64)) (pow.f64 (fabs.f64 im) #s(literal 3 binary64)) (pow.f64 re #s(literal 6 binary64)))
(fma.f64 (pow.f64 (neg.f64 re) #s(literal 3 binary64)) (pow.f64 (neg.f64 re) #s(literal 3 binary64)) (pow.f64 im #s(literal 6 binary64)))
(fma.f64 (pow.f64 (fabs.f64 re) #s(literal 3 binary64)) (pow.f64 (fabs.f64 re) #s(literal 3 binary64)) (pow.f64 im #s(literal 6 binary64)))
(fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (neg.f64 im) (*.f64 (neg.f64 im) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 6 binary64)))
(fma.f64 (neg.f64 re) (*.f64 (neg.f64 re) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 6 binary64)))
(fma.f64 (.f64 (neg.f64 re) re) (.f64 (.f64 (neg.f64 re) re) (.f64 re re)) (pow.f64 im #s(literal 6 binary64)))
(fma.f64 (fabs.f64 im) (*.f64 (fabs.f64 im) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 6 binary64)))
(fma.f64 (fabs.f64 re) (*.f64 (fabs.f64 re) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 6 binary64)))
(fma.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 6 binary64)))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)) (pow.f64 re #s(literal 6 binary64)))
(fma.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 re re) (pow.f64 im #s(literal 6 binary64)))
(fma.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))))
(fma.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (.f64 im im) (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (*.f64 re re)))
(fma.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (.f64 re re) (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (*.f64 im im)))
(fma.f64 (.f64 im im) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (.f64 (.f64 re re) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (*.f64 im im) (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 6 binary64)))
(fma.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 im im) (pow.f64 re #s(literal 6 binary64)))
(fma.f64 (*.f64 re re) (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 6 binary64)))
(fma.f64 (.f64 re re) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (.f64 (.f64 im im) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 im (*.f64 im (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 6 binary64)))
(fma.f64 re (.f64 (pow.f64 re #s(literal 3 binary64)) (.f64 re re)) (pow.f64 im #s(literal 6 binary64)))
(fma.f64 re (*.f64 re (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 6 binary64)))
(-.f64 (/.f64 (pow.f64 re #s(literal 12 binary64)) (-.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))) (/.f64 (pow.f64 im #s(literal 12 binary64)) (-.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))))
(-.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 (neg.f64 (pow.f64 re #s(literal 3 binary64))) (pow.f64 re #s(literal 3 binary64))))
(-.f64 (pow.f64 im #s(literal 6 binary64)) (.f64 (neg.f64 (pow.f64 re #s(literal 4 binary64))) (.f64 re re)))
(-.f64 (pow.f64 im #s(literal 6 binary64)) (.f64 (.f64 (neg.f64 re) re) (pow.f64 re #s(literal 4 binary64))))
(-.f64 (pow.f64 re #s(literal 6 binary64)) (*.f64 (neg.f64 (pow.f64 im #s(literal 3 binary64))) (pow.f64 im #s(literal 3 binary64))))
(-.f64 (pow.f64 re #s(literal 6 binary64)) (.f64 (.f64 (neg.f64 im) im) (pow.f64 im #s(literal 4 binary64))))
(-.f64 (pow.f64 re #s(literal 6 binary64)) (.f64 (neg.f64 (pow.f64 im #s(literal 4 binary64))) (.f64 im im)))
(+.f64 (.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(+.f64 (.f64 (.f64 im im) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (.f64 (.f64 re re) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(+.f64 (.f64 (.f64 re re) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (.f64 (.f64 im im) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(+.f64 (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))) (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))))
(+.f64 (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (.f64 im im)) (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (.f64 re re)))
(+.f64 (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (.f64 re re)) (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (.f64 im im)))
(+.f64 (/.f64 (pow.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 3 binary64)) (fma.f64 (pow.f64 im #s(literal 6 binary64)) (-.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (pow.f64 re #s(literal 12 binary64)))) (/.f64 (pow.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 3 binary64)) (fma.f64 (pow.f64 im #s(literal 6 binary64)) (-.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (pow.f64 re #s(literal 12 binary64)))))
(+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))
(+.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64)))
(.f64 (.f64 (pow.f64 re #s(literal 4 binary64)) (neg.f64 re)) (neg.f64 re))
(.f64 (.f64 (pow.f64 re #s(literal 4 binary64)) (fabs.f64 re)) (fabs.f64 re))
(.f64 (.f64 (pow.f64 re #s(literal 4 binary64)) re) re)
(.f64 (.f64 (*.f64 re re) (pow.f64 re #s(literal 3 binary64))) re)
(.f64 (.f64 (.f64 re re) (.f64 (neg.f64 re) re)) (*.f64 (neg.f64 re) re))
(.f64 (.f64 (.f64 (neg.f64 re) re) (fabs.f64 re)) (.f64 (*.f64 (neg.f64 re) re) (fabs.f64 re)))
(.f64 (.f64 (.f64 (neg.f64 re) re) re) (.f64 (*.f64 (neg.f64 re) re) re))
(.f64 (.f64 (.f64 re re) (neg.f64 re)) (.f64 (*.f64 re re) (neg.f64 re)))
(.f64 (.f64 (.f64 re re) (fabs.f64 re)) (.f64 (*.f64 re re) (fabs.f64 re)))
(.f64 (.f64 (neg.f64 re) (.f64 re re)) (.f64 (neg.f64 re) (*.f64 re re)))
(.f64 (.f64 (fabs.f64 re) (.f64 (neg.f64 re) re)) (.f64 (fabs.f64 re) (*.f64 (neg.f64 re) re)))
(.f64 (.f64 (fabs.f64 re) (.f64 re re)) (.f64 (fabs.f64 re) (*.f64 re re)))
(.f64 (.f64 re (.f64 (neg.f64 re) re)) (.f64 re (*.f64 (neg.f64 re) re)))
(*.f64 (neg.f64 (pow.f64 re #s(literal 3 binary64))) (neg.f64 (pow.f64 re #s(literal 3 binary64))))
(*.f64 (fabs.f64 (pow.f64 re #s(literal 3 binary64))) (fabs.f64 (pow.f64 re #s(literal 3 binary64))))
(*.f64 (pow.f64 (neg.f64 re) #s(literal 3 binary64)) (pow.f64 (neg.f64 re) #s(literal 3 binary64)))
(*.f64 (pow.f64 (fabs.f64 re) #s(literal 3 binary64)) (pow.f64 (fabs.f64 re) #s(literal 3 binary64)))
(.f64 (neg.f64 re) (.f64 (neg.f64 re) (pow.f64 re #s(literal 4 binary64))))
(.f64 (.f64 (neg.f64 re) re) (.f64 (.f64 (neg.f64 re) re) (*.f64 re re)))
(.f64 (fabs.f64 re) (.f64 (fabs.f64 re) (pow.f64 re #s(literal 4 binary64))))
(*.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64)))
(.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 re re))
(.f64 (.f64 re re) (pow.f64 re #s(literal 4 binary64)))
(.f64 re (.f64 (pow.f64 re #s(literal 3 binary64)) (*.f64 re re)))
(.f64 re (.f64 re (pow.f64 re #s(literal 4 binary64))))
(pow.f64 (exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 re))) #s(literal 3 binary64))
(pow.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 3/2 binary64))
(pow.f64 (*.f64 re re) #s(literal 3 binary64))
(pow.f64 re #s(literal 6 binary64))
(exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 re)) #s(literal 3 binary64)))
(+.f64 (cosh.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 re)) #s(literal 3 binary64))) (sinh.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 re)) #s(literal 3 binary64))))
#s(literal 3 binary64)
(.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) (neg.f64 im)) (neg.f64 im))
(.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) (fabs.f64 im)) (fabs.f64 im))
(.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) im) im)
(.f64 (.f64 (neg.f64 im) (.f64 im im)) (.f64 (neg.f64 im) (*.f64 im im)))
(.f64 (.f64 (fabs.f64 im) (.f64 im im)) (.f64 (fabs.f64 im) (*.f64 im im)))
(.f64 (.f64 (.f64 im im) (neg.f64 im)) (.f64 (*.f64 im im) (neg.f64 im)))
(.f64 (.f64 (.f64 im im) (fabs.f64 im)) (.f64 (*.f64 im im) (fabs.f64 im)))
(*.f64 (neg.f64 (pow.f64 im #s(literal 3 binary64))) (neg.f64 (pow.f64 im #s(literal 3 binary64))))
(*.f64 (fabs.f64 (pow.f64 im #s(literal 3 binary64))) (fabs.f64 (pow.f64 im #s(literal 3 binary64))))
(*.f64 (pow.f64 (neg.f64 im) #s(literal 3 binary64)) (pow.f64 (neg.f64 im) #s(literal 3 binary64)))
(*.f64 (pow.f64 (fabs.f64 im) #s(literal 3 binary64)) (pow.f64 (fabs.f64 im) #s(literal 3 binary64)))
(.f64 (neg.f64 im) (.f64 (neg.f64 im) (pow.f64 im #s(literal 4 binary64))))
(.f64 (fabs.f64 im) (.f64 (fabs.f64 im) (pow.f64 im #s(literal 4 binary64))))
(*.f64 (pow.f64 im #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))
(.f64 (.f64 im im) (pow.f64 im #s(literal 4 binary64)))
(.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 im im))
(.f64 im (.f64 im (pow.f64 im #s(literal 4 binary64))))
(pow.f64 (exp.f64 (*.f64 #s(literal 2 binary64) (log.f64 im))) #s(literal 3 binary64))
(pow.f64 (pow.f64 im #s(literal 3 binary64)) #s(literal 2 binary64))
(pow.f64 (*.f64 im im) #s(literal 3 binary64))
(pow.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 3/2 binary64))
(pow.f64 im #s(literal 6 binary64))
(exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) #s(literal 3 binary64)))
(+.f64 (cosh.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) #s(literal 3 binary64))) (sinh.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 im)) #s(literal 3 binary64))))
(*.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 im)))
(*.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 im)))
(*.f64 (fabs.f64 (fabs.f64 im)) (fabs.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 (neg.f64 im) (neg.f64 im))
(*.f64 (fabs.f64 im) (fabs.f64 im))
(*.f64 im im)
(pow.f64 (neg.f64 im) #s(literal 2 binary64))
(pow.f64 (fabs.f64 im) #s(literal 2 binary64))
(pow.f64 im #s(literal 2 binary64))
(neg.f64 (*.f64 (neg.f64 im) im))
(fabs.f64 (*.f64 im im))
(exp.f64 (*.f64 (log.f64 im) #s(literal 2 binary64)))
(/.f64 (-.f64 (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (+.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(/.f64 (-.f64 (pow.f64 im #s(literal 8 binary64)) (.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (-.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 re #s(literal 8 binary64))) (-.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))
(/.f64 (-.f64 (pow.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal 3 binary64)) (.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (fma.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (fma.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)) (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 im #s(literal 8 binary64)) (-.f64 (.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)))) (neg.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 re #s(literal 12 binary64)))) (neg.f64 (fma.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (-.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64)))))
(/.f64 (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64))) (-.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 re #s(literal 12 binary64))) (+.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 re #s(literal 8 binary64)) (.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (+.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 re #s(literal 12 binary64))) (fma.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (-.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64))))
(fma.f64 (fma.f64 (neg.f64 re) re (.f64 im re)) (-.f64 (.f64 (neg.f64 re) re) (*.f64 im re)) (pow.f64 im #s(literal 4 binary64)))
(fma.f64 (fma.f64 re re (.f64 im re)) (-.f64 (.f64 re re) (*.f64 im re)) (pow.f64 im #s(literal 4 binary64)))
(fma.f64 (.f64 (neg.f64 im) (fabs.f64 im)) (.f64 (neg.f64 im) (fabs.f64 im)) (+.f64 (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))
(fma.f64 (.f64 (neg.f64 im) (fabs.f64 im)) (.f64 (neg.f64 im) (fabs.f64 im)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 (fabs.f64 im) (neg.f64 im)) (.f64 (fabs.f64 im) (neg.f64 im)) (+.f64 (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))
(fma.f64 (.f64 (fabs.f64 im) (neg.f64 im)) (.f64 (fabs.f64 im) (neg.f64 im)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 (fabs.f64 im) im) (.f64 (fabs.f64 im) im) (+.f64 (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))
(fma.f64 (.f64 (fabs.f64 im) im) (.f64 (fabs.f64 im) im) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 im (fabs.f64 im)) (.f64 im (fabs.f64 im)) (+.f64 (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))
(fma.f64 (.f64 im (fabs.f64 im)) (.f64 im (fabs.f64 im)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 (.f64 im im) (neg.f64 im)) (neg.f64 im) (+.f64 (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))
(fma.f64 (.f64 (.f64 im im) (neg.f64 im)) (neg.f64 im) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 (.f64 im im) (fabs.f64 im)) (fabs.f64 im) (+.f64 (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))
(fma.f64 (.f64 (.f64 im im) (fabs.f64 im)) (fabs.f64 im) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 (.f64 re re) (neg.f64 re)) (neg.f64 re) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 (.f64 re re) (fabs.f64 re)) (fabs.f64 re) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 (neg.f64 re) (fabs.f64 re)) (.f64 (neg.f64 re) (fabs.f64 re)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 (fabs.f64 re) (neg.f64 re)) (.f64 (fabs.f64 re) (neg.f64 re)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 (fabs.f64 re) re) (.f64 (fabs.f64 re) re) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 re (fabs.f64 re)) (.f64 re (fabs.f64 re)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 (neg.f64 im) im) (.f64 (neg.f64 im) im) (+.f64 (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))
(fma.f64 (.f64 (neg.f64 im) im) (.f64 (neg.f64 im) im) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (.f64 re re) #s(literal 1 binary64)) (pow.f64 (.f64 re re) #s(literal 1 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (pow.f64 (.f64 re re) #s(literal 1 binary64)) (.f64 re re) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 im (+.f64 im re)) (.f64 im (-.f64 im re)) (pow.f64 re #s(literal 4 binary64)))
(fma.f64 (neg.f64 im) (.f64 (neg.f64 im) (.f64 im im)) (+.f64 (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))
(fma.f64 (neg.f64 im) (.f64 (neg.f64 im) (.f64 im im)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (neg.f64 re) (.f64 (neg.f64 re) (.f64 re re)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 (neg.f64 re) re) (.f64 (neg.f64 re) re) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (fabs.f64 im) (.f64 (fabs.f64 im) (.f64 im im)) (+.f64 (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))
(fma.f64 (fabs.f64 im) (.f64 (fabs.f64 im) (.f64 im im)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (fabs.f64 re) (.f64 (fabs.f64 re) (.f64 re re)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (pow.f64 re #s(literal 3 binary64)) re (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) im (+.f64 (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) im (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 im im) (.f64 (+.f64 im re) (-.f64 im re)) (pow.f64 re #s(literal 4 binary64)))
(fma.f64 (.f64 im im) (.f64 im im) (+.f64 (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))
(fma.f64 (.f64 im im) (.f64 im im) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 re re) (.f64 (-.f64 re im) (+.f64 im re)) (pow.f64 im #s(literal 4 binary64)))
(fma.f64 (.f64 re re) (.f64 re re) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 im (pow.f64 im #s(literal 3 binary64)) (+.f64 (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))
(fma.f64 im (pow.f64 im #s(literal 3 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 re (-.f64 (pow.f64 re #s(literal 3 binary64)) (.f64 (.f64 im re) im)) (pow.f64 im #s(literal 4 binary64)))
(fma.f64 re (pow.f64 re #s(literal 3 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(-.f64 (/.f64 (pow.f64 re #s(literal 8 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(-.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))
(-.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (.f64 (neg.f64 (pow.f64 re #s(literal 3 binary64))) re))
(-.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (.f64 (neg.f64 re) (pow.f64 re #s(literal 3 binary64))))
(-.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (.f64 (.f64 (neg.f64 re) re) (.f64 re re)))
(-.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (.f64 (.f64 re re) (.f64 (neg.f64 re) re)))
(-.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64))))
(+.f64 (/.f64 (pow.f64 re #s(literal 12 binary64)) (fma.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (-.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64)))) (/.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (fma.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (-.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64)))))
(+.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(+.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))
(+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))
(+.f64 (pow.f64 im #s(literal 4 binary64)) (+.f64 (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))
(+.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(.f64 (.f64 (*.f64 re re) (neg.f64 re)) (neg.f64 re))
(.f64 (.f64 (*.f64 re re) (fabs.f64 re)) (fabs.f64 re))
(.f64 (.f64 (neg.f64 re) (fabs.f64 re)) (*.f64 (neg.f64 re) (fabs.f64 re)))
(.f64 (.f64 (fabs.f64 re) (neg.f64 re)) (*.f64 (fabs.f64 re) (neg.f64 re)))
(.f64 (.f64 (fabs.f64 re) re) (*.f64 (fabs.f64 re) re))
(.f64 (.f64 re (fabs.f64 re)) (*.f64 re (fabs.f64 re)))
(.f64 (pow.f64 (.f64 re re) #s(literal 1 binary64)) (pow.f64 (*.f64 re re) #s(literal 1 binary64)))
(.f64 (pow.f64 (.f64 re re) #s(literal 1 binary64)) (*.f64 re re))
(.f64 (neg.f64 re) (.f64 (neg.f64 re) (*.f64 re re)))
(.f64 (.f64 (neg.f64 re) re) (*.f64 (neg.f64 re) re))
(.f64 (fabs.f64 re) (.f64 (fabs.f64 re) (*.f64 re re)))
(*.f64 (pow.f64 re #s(literal 3 binary64)) re)
(.f64 (.f64 re re) (*.f64 re re))
(*.f64 re (pow.f64 re #s(literal 3 binary64)))
(pow.f64 (exp.f64 (log.f64 re)) #s(literal 4 binary64))
(pow.f64 (*.f64 (neg.f64 re) re) #s(literal 2 binary64))
(pow.f64 (*.f64 re re) #s(literal 2 binary64))
(pow.f64 re #s(literal 4 binary64))
(neg.f64 (.f64 (.f64 (neg.f64 re) re) (*.f64 re re)))
(neg.f64 (.f64 (.f64 re re) (*.f64 (neg.f64 re) re)))
(fabs.f64 (pow.f64 re #s(literal 4 binary64)))
(exp.f64 (.f64 (.f64 #s(literal 2 binary64) (log.f64 re)) #s(literal 2 binary64)))
(exp.f64 (*.f64 (log.f64 re) #s(literal 4 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 re) #s(literal 4 binary64))) (sinh.f64 (.f64 (log.f64 re) #s(literal 4 binary64))))
(.f64 (.f64 im (+.f64 im re)) (*.f64 im (-.f64 im re)))
(.f64 (.f64 im im) (*.f64 (+.f64 im re) (-.f64 im re)))
(/.f64 (+.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 (neg.f64 (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64))) (+.f64 (pow.f64 im #s(literal 8 binary64)) (-.f64 (.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (.f64 (pow.f64 im #s(literal 4 binary64)) (neg.f64 (pow.f64 (.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 im #s(literal 8 binary64)) (.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (neg.f64 (.f64 (*.f64 im im) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(/.f64 (neg.f64 (.f64 (pow.f64 im #s(literal 6 binary64)) (-.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))) (neg.f64 (+.f64 (fma.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)) (.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 re re))) (pow.f64 im #s(literal 8 binary64)))))
(/.f64 (-.f64 (pow.f64 im #s(literal 8 binary64)) (.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (.f64 (*.f64 im im) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(/.f64 (.f64 (pow.f64 im #s(literal 6 binary64)) (-.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (+.f64 (fma.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)) (.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 re re))) (pow.f64 im #s(literal 8 binary64))))
(fma.f64 (.f64 (.f64 (neg.f64 re) re) (neg.f64 im)) (neg.f64 im) (pow.f64 im #s(literal 4 binary64)))
(fma.f64 (.f64 (.f64 (neg.f64 re) re) (fabs.f64 im)) (fabs.f64 im) (pow.f64 im #s(literal 4 binary64)))
(fma.f64 (.f64 (.f64 (neg.f64 re) re) im) im (pow.f64 im #s(literal 4 binary64)))
(fma.f64 (neg.f64 (.f64 (.f64 re re) im)) im (pow.f64 im #s(literal 4 binary64)))
(fma.f64 (.f64 (neg.f64 im) (fabs.f64 im)) (.f64 (neg.f64 im) (fabs.f64 im)) (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 (fabs.f64 im) (neg.f64 im)) (.f64 (fabs.f64 im) (neg.f64 im)) (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 (fabs.f64 im) im) (.f64 (fabs.f64 im) im) (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 im (fabs.f64 im)) (.f64 im (fabs.f64 im)) (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 (.f64 im im) (neg.f64 im)) (neg.f64 im) (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 (.f64 im im) (fabs.f64 im)) (fabs.f64 im) (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 (neg.f64 im) im) (.f64 (neg.f64 im) im) (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 (neg.f64 im) im) (.f64 re re) (pow.f64 im #s(literal 4 binary64)))
(fma.f64 (neg.f64 (.f64 im re)) (.f64 im re) (pow.f64 im #s(literal 4 binary64)))
(fma.f64 (.f64 (.f64 re re) im) (neg.f64 im) (pow.f64 im #s(literal 4 binary64)))
(fma.f64 (.f64 im re) (neg.f64 (.f64 im re)) (pow.f64 im #s(literal 4 binary64)))
(fma.f64 (neg.f64 im) (.f64 (neg.f64 im) (.f64 im im)) (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (neg.f64 re) (.f64 (.f64 im re) im) (pow.f64 im #s(literal 4 binary64)))
(fma.f64 (.f64 (neg.f64 re) re) (.f64 im im) (pow.f64 im #s(literal 4 binary64)))
(fma.f64 (fabs.f64 im) (.f64 (fabs.f64 im) (.f64 im im)) (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) im (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 im im) (.f64 (neg.f64 re) re) (pow.f64 im #s(literal 4 binary64)))
(fma.f64 (.f64 im im) (.f64 im im) (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 (.f64 re re) (.f64 (neg.f64 im) im) (pow.f64 im #s(literal 4 binary64)))
(fma.f64 im (pow.f64 im #s(literal 3 binary64)) (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(fma.f64 re (neg.f64 (.f64 (.f64 im re) im)) (pow.f64 im #s(literal 4 binary64)))
(-.f64 (/.f64 (pow.f64 im #s(literal 8 binary64)) (.f64 (.f64 im im) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))) (/.f64 (.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (.f64 (*.f64 im im) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(-.f64 (/.f64 (pow.f64 im #s(literal 12 binary64)) (+.f64 (fma.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)) (.f64 (pow.f64 im #s(literal 6 binary64)) (.f64 re re))) (pow.f64 im #s(literal 8 binary64)))) (/.f64 (.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (+.f64 (fma.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)) (.f64 (pow.f64 im #s(literal 6 binary64)) (*.f64 re re))) (pow.f64 im #s(literal 8 binary64)))))
(-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))
(+.f64 (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))) (pow.f64 im #s(literal 4 binary64)))
(+.f64 (pow.f64 im #s(literal 4 binary64)) (neg.f64 (pow.f64 (*.f64 im re) #s(literal 2 binary64))))
(.f64 (.f64 (*.f64 im re) re) im)
(.f64 (.f64 (*.f64 im im) (neg.f64 re)) (neg.f64 re))
(.f64 (.f64 (*.f64 im im) (fabs.f64 re)) (fabs.f64 re))
(.f64 (.f64 (*.f64 re re) (neg.f64 im)) (neg.f64 im))
(.f64 (.f64 (*.f64 re re) (fabs.f64 im)) (fabs.f64 im))
(.f64 (.f64 (neg.f64 im) (neg.f64 re)) (*.f64 (neg.f64 im) (neg.f64 re)))
(.f64 (.f64 (neg.f64 im) (fabs.f64 re)) (*.f64 (neg.f64 im) (fabs.f64 re)))
(.f64 (.f64 (neg.f64 im) re) (*.f64 (neg.f64 im) re))
(.f64 (.f64 (fabs.f64 im) (neg.f64 re)) (*.f64 (fabs.f64 im) (neg.f64 re)))
(.f64 (.f64 (fabs.f64 im) (fabs.f64 re)) (*.f64 (fabs.f64 im) (fabs.f64 re)))
(.f64 (.f64 (fabs.f64 im) re) (*.f64 (fabs.f64 im) re))
(.f64 (.f64 im (neg.f64 re)) (*.f64 im (neg.f64 re)))
(.f64 (.f64 im (fabs.f64 re)) (*.f64 im (fabs.f64 re)))
(.f64 (.f64 (neg.f64 re) (neg.f64 im)) (*.f64 (neg.f64 re) (neg.f64 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 (fabs.f64 re) (neg.f64 im)) (*.f64 (fabs.f64 re) (neg.f64 im)))
(.f64 (.f64 (fabs.f64 re) (fabs.f64 im)) (*.f64 (fabs.f64 re) (fabs.f64 im)))
(.f64 (.f64 (fabs.f64 re) im) (*.f64 (fabs.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 im re)) (neg.f64 (*.f64 im re)))
(.f64 (fabs.f64 (.f64 im re)) (fabs.f64 (*.f64 im re)))
(.f64 (.f64 (*.f64 im re) im) re)
(.f64 (.f64 (*.f64 re re) im) im)
(.f64 (.f64 im re) (*.f64 im re))
(.f64 (neg.f64 im) (.f64 (neg.f64 im) (*.f64 re re)))
(.f64 (neg.f64 re) (.f64 (neg.f64 re) (*.f64 im im)))
(.f64 (fabs.f64 im) (.f64 (fabs.f64 im) (*.f64 re re)))
(.f64 (fabs.f64 re) (.f64 (fabs.f64 re) (*.f64 im im)))
(.f64 (.f64 im im) (*.f64 re re))
(.f64 (.f64 re re) (*.f64 im im))
(.f64 im (.f64 (*.f64 re re) im))
(.f64 re (.f64 im (*.f64 im re)))
(.f64 re (.f64 (*.f64 im re) im))
(pow.f64 (*.f64 im re) #s(literal 2 binary64))
(.f64 (.f64 (sqrt.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (+.f64 (hypot.f64 im re) re)))
(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 (+.f64 (hypot.f64 im re) re))) (sqrt.f64 #s(literal 2 binary64)))
(.f64 (sqrt.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 (+.f64 (hypot.f64 im re) re)) #s(literal 1/2 binary64)))
(.f64 #s(literal 2 binary64) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)))))
(.f64 (sqrt.f64 (+.f64 (hypot.f64 im re) re)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(/.f64 (.f64 #s(literal 1 binary64) (sqrt.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)))) #s(literal 2 binary64))
(/.f64 (.f64 (sqrt.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1 binary64)) #s(literal 2 binary64))
(.f64 (pow.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #s(literal 1/4 binary64)))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (+.f64 (hypot.f64 im re) re)))
(*.f64 (sqrt.f64 (+.f64 (hypot.f64 im re) re)) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (pow.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(pow.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64)))
(exp.f64 (.f64 (log.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))
(*.f64 #s(literal 2 binary64) (+.f64 (hypot.f64 im re) re))
(/.f64 (.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)) #s(literal 2 binary64)) (-.f64 (hypot.f64 im re) re))
(/.f64 (*.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) #s(literal 2 binary64)) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(/.f64 (*.f64 #s(literal 4 binary64) (+.f64 (hypot.f64 im re) re)) #s(literal 2 binary64))
(/.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 4 binary64)) #s(literal 2 binary64))
(/.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re))) (-.f64 (hypot.f64 im re) re))
(/.f64 (*.f64 #s(literal 2 binary64) (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64)))) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(/.f64 (-.f64 (.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 #s(literal 2 binary64) (hypot.f64 im re))) (.f64 (.f64 #s(literal 2 binary64) re) (.f64 #s(literal 2 binary64) re))) (-.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 #s(literal 2 binary64) re)))
(/.f64 (+.f64 (pow.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) #s(literal 3 binary64)) (pow.f64 (.f64 #s(literal 2 binary64) re) #s(literal 3 binary64))) (fma.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (-.f64 (.f64 (.f64 #s(literal 2 binary64) re) (.f64 #s(literal 2 binary64) re)) (.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 #s(literal 2 binary64) re)))))
(/.f64 (-.f64 (.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re)) (.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re))) (-.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re)))
(/.f64 (+.f64 (pow.f64 (+.f64 (hypot.f64 im re) re) #s(literal 3 binary64)) (pow.f64 (+.f64 (hypot.f64 im re) re) #s(literal 3 binary64))) (fma.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re) (-.f64 (.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re)) (.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re)))))
(/.f64 (+.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)) (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re))) (-.f64 (hypot.f64 im re) re))
(/.f64 (+.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64)))) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(/.f64 (.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)) #s(literal 4 binary64)) (*.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)))
(/.f64 (.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) #s(literal 4 binary64)) (.f64 (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)))
(/.f64 (.f64 #s(literal 4 binary64) (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re))) (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 im re) re)))
(/.f64 (.f64 #s(literal 4 binary64) (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64)))) (.f64 #s(literal 2 binary64) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)) (-.f64 (hypot.f64 im re) re) (.f64 (-.f64 (hypot.f64 im re) re) (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)))) (.f64 (-.f64 (hypot.f64 im re) re) (-.f64 (hypot.f64 im re) re)))
(/.f64 (fma.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (.f64 (-.f64 (hypot.f64 im re) re) (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))))) (*.f64 (-.f64 (hypot.f64 im re) re) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(/.f64 (fma.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (-.f64 (hypot.f64 im re) re) (.f64 (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (.f64 re re)))) (*.f64 (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (-.f64 (hypot.f64 im re) re)))
(/.f64 (fma.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (.f64 (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))))) (.f64 (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(fma.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (hypot.f64 im re))) (sqrt.f64 (hypot.f64 im re)) (.f64 #s(literal 2 binary64) re))
(fma.f64 (*.f64 (sqrt.f64 (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64))) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (+.f64 re (+.f64 (hypot.f64 im re) re)))
(fma.f64 (neg.f64 (sqrt.f64 (hypot.f64 im re))) (neg.f64 (sqrt.f64 (hypot.f64 im re))) (+.f64 re (+.f64 (hypot.f64 im re) re)))
(fma.f64 (fabs.f64 (sqrt.f64 (hypot.f64 im re))) (fabs.f64 (sqrt.f64 (hypot.f64 im re))) (+.f64 re (+.f64 (hypot.f64 im re) re)))
(fma.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (sqrt.f64 (hypot.f64 im re))) (+.f64 re (+.f64 (hypot.f64 im re) re)))
(fma.f64 (sqrt.f64 (hypot.f64 im re)) (.f64 (sqrt.f64 (hypot.f64 im re)) #s(literal 2 binary64)) (.f64 #s(literal 2 binary64) re))
(fma.f64 (sqrt.f64 (hypot.f64 im re)) (sqrt.f64 (hypot.f64 im re)) (+.f64 re (+.f64 (hypot.f64 im re) re)))
(fma.f64 #s(literal 1 binary64) (+.f64 (hypot.f64 im re) re) (*.f64 #s(literal 1 binary64) (+.f64 (hypot.f64 im re) re)))
(fma.f64 (+.f64 (hypot.f64 im re) re) #s(literal 1 binary64) (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 1 binary64)))
(fma.f64 #s(literal 2 binary64) (hypot.f64 im re) (*.f64 #s(literal 2 binary64) re))
(fma.f64 #s(literal 2 binary64) re (*.f64 #s(literal 2 binary64) (hypot.f64 im re)))
(fma.f64 (hypot.f64 im re) #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) re))
(fma.f64 re #s(literal 2 binary64) (*.f64 #s(literal 2 binary64) (hypot.f64 im re)))
(-.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 (neg.f64 re) #s(literal 2 binary64)))
(-.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 #s(literal -2 binary64) re))
(+.f64 (+.f64 (+.f64 (hypot.f64 im re) re) (hypot.f64 im re)) re)
(+.f64 (+.f64 (+.f64 (hypot.f64 im re) re) re) (hypot.f64 im re))
(+.f64 (.f64 #s(literal 1 binary64) (+.f64 (hypot.f64 im re) re)) (.f64 #s(literal 1 binary64) (+.f64 (hypot.f64 im re) re)))
(+.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 1 binary64)) (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 1 binary64)))
(+.f64 (.f64 #s(literal 2 binary64) (hypot.f64 im re)) (.f64 #s(literal 2 binary64) re))
(+.f64 (.f64 #s(literal 2 binary64) re) (.f64 #s(literal 2 binary64) (hypot.f64 im re)))
(+.f64 (+.f64 (hypot.f64 im re) re) (+.f64 (hypot.f64 im re) re))
(+.f64 (hypot.f64 im re) (+.f64 re (+.f64 (hypot.f64 im re) re)))
(+.f64 re (+.f64 (hypot.f64 im re) (+.f64 (hypot.f64 im re) re)))
(/.f64 (-.f64 (*.f64 re re) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) (-.f64 re (hypot.f64 im re)))
(/.f64 (neg.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (*.f64 re re))) (neg.f64 (-.f64 (hypot.f64 im re) re)))
(/.f64 (neg.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64)))) (neg.f64 (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (*.f64 re re)) (-.f64 (hypot.f64 im re) re))
(/.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (fma.f64 re re (-.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (*.f64 (hypot.f64 im re) re))))
(/.f64 (+.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(fma.f64 (*.f64 (sqrt.f64 (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64))) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) re)
(fma.f64 (neg.f64 (sqrt.f64 (hypot.f64 im re))) (neg.f64 (sqrt.f64 (hypot.f64 im re))) re)
(fma.f64 (fabs.f64 (sqrt.f64 (hypot.f64 im re))) (fabs.f64 (sqrt.f64 (hypot.f64 im re))) re)
(fma.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (sqrt.f64 (hypot.f64 im re))) re)
(fma.f64 (sqrt.f64 (hypot.f64 im re)) (sqrt.f64 (hypot.f64 im re)) re)
(-.f64 (/.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (-.f64 (hypot.f64 im re) re)) (/.f64 (*.f64 re re) (-.f64 (hypot.f64 im re) re)))
(-.f64 re (*.f64 (neg.f64 (sqrt.f64 (hypot.f64 im re))) (sqrt.f64 (hypot.f64 im re))))
(+.f64 (+.f64 re (cosh.f64 (log.f64 (hypot.f64 im re)))) (sinh.f64 (log.f64 (hypot.f64 im re))))
(+.f64 (/.f64 (pow.f64 (hypot.f64 im re) #s(literal 3 binary64)) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))) (/.f64 (pow.f64 re #s(literal 3 binary64)) (fma.f64 re (-.f64 re (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(+.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (+.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) re))
(+.f64 (hypot.f64 im re) re)
(+.f64 re (hypot.f64 im re))
(*.f64 (neg.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64))) (neg.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64))))
(*.f64 (fabs.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64))) (fabs.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 4 binary64)) #s(literal 1/8 binary64))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(pow.f64 (hypot.f64 im re) #s(literal 1/2 binary64))
(sqrt.f64 (hypot.f64 im re))
(exp.f64 (*.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64))) (sinh.f64 (.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64))))
(.f64 (/.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))
(.f64 (/.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (+.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 re #s(literal 12 binary64)))) (fma.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (-.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64))))
(.f64 (.f64 (hypot.f64 im re) (sqrt.f64 (hypot.f64 im re))) (sqrt.f64 (hypot.f64 im re)))
(*.f64 (neg.f64 (hypot.f64 im re)) (neg.f64 (hypot.f64 im re)))
(.f64 (sqrt.f64 (hypot.f64 im re)) (.f64 (sqrt.f64 (hypot.f64 im re)) (hypot.f64 im re)))
(.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (/.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(*.f64 (hypot.f64 im re) (hypot.f64 im re))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (hypot.f64 im re)))
(pow.f64 (*.f64 (pow.f64 (hypot.f64 im re) #s(literal 4 binary64)) (pow.f64 (hypot.f64 im re) #s(literal 4 binary64))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 4 binary64)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (hypot.f64 im re) #s(literal 2 binary64))
(/.f64 (/.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (-.f64 re im)) (+.f64 im re))
(/.f64 (/.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (+.f64 im re)) (-.f64 re im))
(/.f64 (.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (hypot.f64 im re)) (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(/.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (hypot.f64 im re)) (neg.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re)))))
(/.f64 (.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (hypot.f64 im re)) (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re))))
(/.f64 (.f64 (hypot.f64 im re) (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(/.f64 (.f64 (hypot.f64 im re) (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (neg.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re)))))
(/.f64 (.f64 (hypot.f64 im re) (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re))))
(/.f64 (-.f64 (.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))) (.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (-.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 (.f64 (neg.f64 re) re) #s(literal 3 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 (.f64 (neg.f64 im) im) #s(literal 3 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (-.f64 (.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))) (.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (neg.f64 (*.f64 (+.f64 im re) (-.f64 im re))))
(/.f64 (neg.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (neg.f64 (*.f64 (-.f64 re im) (+.f64 im re))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))) (neg.f64 (neg.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))) (.f64 (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (.f64 (neg.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re)))) (neg.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re))))))
(/.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 (neg.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re)))) (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re)))))
(/.f64 (.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re))) (neg.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re))))))
(/.f64 (.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re))) (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re)))))
(/.f64 (fma.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (pow.f64 im #s(literal 6 binary64)))) (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (*.f64 (+.f64 im re) (-.f64 im re)))
(/.f64 (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 im #s(literal 8 binary64))) (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (.f64 (-.f64 re im) (+.f64 im re))))
(/.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (*.f64 (-.f64 re im) (+.f64 im re)))
(/.f64 (+.f64 (pow.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 3 binary64))) (.f64 (fma.f64 (pow.f64 im #s(literal 6 binary64)) (-.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (pow.f64 re #s(literal 12 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) (.f64 (-.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) (.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 8 binary64)) (.f64 (pow.f64 re #s(literal 4 binary64)) (neg.f64 (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 8 binary64))) (*.f64 (-.f64 re im) (+.f64 im re))))
(/.f64 (neg.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (neg.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))
(neg.f64 (/.f64 (neg.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(neg.f64 (/.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (neg.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))))
(fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 re #s(literal 12 binary64)))) (fma.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (-.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 re #s(literal 12 binary64)))) (fma.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (-.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 im)) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 im)) (*.f64 re re))
(fma.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 im)) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 im)) (*.f64 re re))
(fma.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 re)) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 re)) (*.f64 im im))
(fma.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 re)) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 re)) (*.f64 im im))
(fma.f64 (fabs.f64 (fabs.f64 im)) (fabs.f64 (fabs.f64 im)) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (fabs.f64 (fabs.f64 im)) (fabs.f64 (fabs.f64 im)) (*.f64 re re))
(fma.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 re)) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 re)) (*.f64 im im))
(fma.f64 (pow.f64 im #s(literal 1 binary64)) (pow.f64 im #s(literal 1 binary64)) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (pow.f64 im #s(literal 1 binary64)) (pow.f64 im #s(literal 1 binary64)) (*.f64 re re))
(fma.f64 (pow.f64 im #s(literal 1 binary64)) im (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (pow.f64 im #s(literal 1 binary64)) im (*.f64 re re))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)) (*.f64 im im))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) re (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) re (*.f64 im im))
(fma.f64 (neg.f64 im) (neg.f64 im) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (neg.f64 im) (neg.f64 im) (*.f64 re re))
(fma.f64 (neg.f64 re) (neg.f64 re) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (neg.f64 re) (neg.f64 re) (*.f64 im im))
(fma.f64 (fabs.f64 im) (fabs.f64 im) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (fabs.f64 im) (fabs.f64 im) (*.f64 re re))
(fma.f64 (fabs.f64 re) (fabs.f64 re) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (fabs.f64 re) (fabs.f64 re) (*.f64 im im))
(fma.f64 (pow.f64 re #s(literal 3 binary64)) (/.f64 (pow.f64 re #s(literal 3 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) (/.f64 (pow.f64 im #s(literal 3 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (hypot.f64 im re) (*.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) (hypot.f64 im re)))
(fma.f64 (pow.f64 re #s(literal 4 binary64)) (/.f64 (.f64 re re) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (.f64 im im) (/.f64 (pow.f64 im #s(literal 4 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (pow.f64 im #s(literal 4 binary64)) (/.f64 (.f64 im im) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (.f64 re re) (/.f64 (pow.f64 re #s(literal 4 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (hypot.f64 im re) (cosh.f64 (log.f64 (hypot.f64 im re))) (*.f64 (hypot.f64 im re) (sinh.f64 (log.f64 (hypot.f64 im re)))))
(fma.f64 im im (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 im im (*.f64 re re))
(fma.f64 re re (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 re re (*.f64 im im))
(sqrt.f64 (pow.f64 (hypot.f64 im re) #s(literal 4 binary64)))
(-.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (+.f64 im re) (-.f64 im re))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (+.f64 im re) (-.f64 im re))))
(-.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (-.f64 re im) (+.f64 im re))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (-.f64 re im) (+.f64 im re))))
(-.f64 (.f64 im im) (.f64 (neg.f64 re) re))
(-.f64 (.f64 re re) (.f64 (neg.f64 (neg.f64 im)) (neg.f64 im)))
(-.f64 (.f64 re re) (.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 im)))
(-.f64 (.f64 re re) (.f64 (neg.f64 im) im))
(exp.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(+.f64 (.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (hypot.f64 im re)) (.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) (hypot.f64 im re)))
(+.f64 (.f64 (hypot.f64 im re) (cosh.f64 (log.f64 (hypot.f64 im re)))) (.f64 (hypot.f64 im re) (sinh.f64 (log.f64 (hypot.f64 im re)))))
(+.f64 (/.f64 (neg.f64 (pow.f64 im #s(literal 4 binary64))) (.f64 (-.f64 re im) (+.f64 im re))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (-.f64 re im) (+.f64 im re))))
(+.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (-.f64 re im) (+.f64 im re))) (/.f64 (neg.f64 (pow.f64 im #s(literal 4 binary64))) (.f64 (-.f64 re im) (+.f64 im re))))
(+.f64 (cosh.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))) (sinh.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(+.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(+.f64 (.f64 im im) (.f64 (neg.f64 (neg.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 (/.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))
(.f64 (/.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (+.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 re #s(literal 12 binary64)))) (fma.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (-.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64))))
(.f64 (.f64 (hypot.f64 im re) (sqrt.f64 (hypot.f64 im re))) (sqrt.f64 (hypot.f64 im re)))
(*.f64 (neg.f64 (hypot.f64 im re)) (neg.f64 (hypot.f64 im re)))
(.f64 (sqrt.f64 (hypot.f64 im re)) (.f64 (sqrt.f64 (hypot.f64 im re)) (hypot.f64 im re)))
(.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (/.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(*.f64 (hypot.f64 im re) (hypot.f64 im re))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (hypot.f64 im re)))
(pow.f64 (*.f64 (pow.f64 (hypot.f64 im re) #s(literal 4 binary64)) (pow.f64 (hypot.f64 im re) #s(literal 4 binary64))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 4 binary64)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (hypot.f64 im re) #s(literal 2 binary64))
(/.f64 (/.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (-.f64 re im)) (+.f64 im re))
(/.f64 (/.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (+.f64 im re)) (-.f64 re im))
(/.f64 (.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (hypot.f64 im re)) (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(/.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (hypot.f64 im re)) (neg.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re)))))
(/.f64 (.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (hypot.f64 im re)) (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re))))
(/.f64 (.f64 (hypot.f64 im re) (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(/.f64 (.f64 (hypot.f64 im re) (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (neg.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re)))))
(/.f64 (.f64 (hypot.f64 im re) (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re))))
(/.f64 (-.f64 (.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))) (.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (-.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 (.f64 (neg.f64 re) re) #s(literal 3 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 (.f64 (neg.f64 im) im) #s(literal 3 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (-.f64 (.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))) (.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (neg.f64 (*.f64 (+.f64 im re) (-.f64 im re))))
(/.f64 (neg.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (neg.f64 (*.f64 (-.f64 re im) (+.f64 im re))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))) (neg.f64 (neg.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))) (.f64 (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (.f64 (neg.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re)))) (neg.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re))))))
(/.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 (neg.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re)))) (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re)))))
(/.f64 (.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re))) (neg.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re))))))
(/.f64 (.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re))) (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re)))))
(/.f64 (fma.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (pow.f64 im #s(literal 6 binary64)))) (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (*.f64 (+.f64 im re) (-.f64 im re)))
(/.f64 (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 im #s(literal 8 binary64))) (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (.f64 (-.f64 re im) (+.f64 im re))))
(/.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (*.f64 (-.f64 re im) (+.f64 im re)))
(/.f64 (+.f64 (pow.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 3 binary64))) (.f64 (fma.f64 (pow.f64 im #s(literal 6 binary64)) (-.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (pow.f64 re #s(literal 12 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) (.f64 (-.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) (.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 8 binary64)) (.f64 (pow.f64 re #s(literal 4 binary64)) (neg.f64 (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 8 binary64))) (*.f64 (-.f64 re im) (+.f64 im re))))
(/.f64 (neg.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (neg.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))
(neg.f64 (/.f64 (neg.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(neg.f64 (/.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (neg.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))))
(fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 re #s(literal 12 binary64)))) (fma.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (-.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 re #s(literal 12 binary64)))) (fma.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (-.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 im)) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 im)) (*.f64 re re))
(fma.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 im)) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 im)) (*.f64 re re))
(fma.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 re)) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 re)) (*.f64 im im))
(fma.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 re)) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 re)) (*.f64 im im))
(fma.f64 (fabs.f64 (fabs.f64 im)) (fabs.f64 (fabs.f64 im)) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (fabs.f64 (fabs.f64 im)) (fabs.f64 (fabs.f64 im)) (*.f64 re re))
(fma.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 re)) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 re)) (*.f64 im im))
(fma.f64 (pow.f64 im #s(literal 1 binary64)) (pow.f64 im #s(literal 1 binary64)) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (pow.f64 im #s(literal 1 binary64)) (pow.f64 im #s(literal 1 binary64)) (*.f64 re re))
(fma.f64 (pow.f64 im #s(literal 1 binary64)) im (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (pow.f64 im #s(literal 1 binary64)) im (*.f64 re re))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)) (*.f64 im im))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) re (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) re (*.f64 im im))
(fma.f64 (neg.f64 im) (neg.f64 im) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (neg.f64 im) (neg.f64 im) (*.f64 re re))
(fma.f64 (neg.f64 re) (neg.f64 re) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (neg.f64 re) (neg.f64 re) (*.f64 im im))
(fma.f64 (fabs.f64 im) (fabs.f64 im) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (fabs.f64 im) (fabs.f64 im) (*.f64 re re))
(fma.f64 (fabs.f64 re) (fabs.f64 re) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (fabs.f64 re) (fabs.f64 re) (*.f64 im im))
(fma.f64 (pow.f64 re #s(literal 3 binary64)) (/.f64 (pow.f64 re #s(literal 3 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) (/.f64 (pow.f64 im #s(literal 3 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (hypot.f64 im re) (*.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) (hypot.f64 im re)))
(fma.f64 (pow.f64 re #s(literal 4 binary64)) (/.f64 (.f64 re re) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (.f64 im im) (/.f64 (pow.f64 im #s(literal 4 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (pow.f64 im #s(literal 4 binary64)) (/.f64 (.f64 im im) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (.f64 re re) (/.f64 (pow.f64 re #s(literal 4 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (hypot.f64 im re) (cosh.f64 (log.f64 (hypot.f64 im re))) (*.f64 (hypot.f64 im re) (sinh.f64 (log.f64 (hypot.f64 im re)))))
(fma.f64 im im (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 im im (*.f64 re re))
(fma.f64 re re (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 re re (*.f64 im im))
(sqrt.f64 (pow.f64 (hypot.f64 im re) #s(literal 4 binary64)))
(-.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (+.f64 im re) (-.f64 im re))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (+.f64 im re) (-.f64 im re))))
(-.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (-.f64 re im) (+.f64 im re))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (-.f64 re im) (+.f64 im re))))
(-.f64 (.f64 im im) (.f64 (neg.f64 re) re))
(-.f64 (.f64 re re) (.f64 (neg.f64 (neg.f64 im)) (neg.f64 im)))
(-.f64 (.f64 re re) (.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 im)))
(-.f64 (.f64 re re) (.f64 (neg.f64 im) im))
(exp.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(+.f64 (.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (hypot.f64 im re)) (.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) (hypot.f64 im re)))
(+.f64 (.f64 (hypot.f64 im re) (cosh.f64 (log.f64 (hypot.f64 im re)))) (.f64 (hypot.f64 im re) (sinh.f64 (log.f64 (hypot.f64 im re)))))
(+.f64 (/.f64 (neg.f64 (pow.f64 im #s(literal 4 binary64))) (.f64 (-.f64 re im) (+.f64 im re))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (-.f64 re im) (+.f64 im re))))
(+.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (-.f64 re im) (+.f64 im re))) (/.f64 (neg.f64 (pow.f64 im #s(literal 4 binary64))) (.f64 (-.f64 re im) (+.f64 im re))))
(+.f64 (cosh.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))) (sinh.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(+.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(+.f64 (.f64 im im) (.f64 (neg.f64 (neg.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))
#s(literal 1 binary64)
#s(literal 1/4 binary64)
(*.f64 (neg.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64))) (neg.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64))))
(*.f64 (fabs.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64))) (fabs.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64))))
(*.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 4 binary64)) #s(literal 1/8 binary64))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(pow.f64 (hypot.f64 im re) #s(literal 1/2 binary64))
(sqrt.f64 (hypot.f64 im re))
(exp.f64 (*.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)))
(+.f64 (cosh.f64 (.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64))) (sinh.f64 (.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64))))
(.f64 (/.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))
(.f64 (/.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (+.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 re #s(literal 12 binary64)))) (fma.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (-.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64))))
(.f64 (.f64 (hypot.f64 im re) (sqrt.f64 (hypot.f64 im re))) (sqrt.f64 (hypot.f64 im re)))
(*.f64 (neg.f64 (hypot.f64 im re)) (neg.f64 (hypot.f64 im re)))
(.f64 (sqrt.f64 (hypot.f64 im re)) (.f64 (sqrt.f64 (hypot.f64 im re)) (hypot.f64 im re)))
(.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (/.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(*.f64 (hypot.f64 im re) (hypot.f64 im re))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (hypot.f64 im re)))
(pow.f64 (*.f64 (pow.f64 (hypot.f64 im re) #s(literal 4 binary64)) (pow.f64 (hypot.f64 im re) #s(literal 4 binary64))) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 4 binary64)) #s(literal 1/2 binary64))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1 binary64))
(pow.f64 (hypot.f64 im re) #s(literal 2 binary64))
(/.f64 (/.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (-.f64 re im)) (+.f64 im re))
(/.f64 (/.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (+.f64 im re)) (-.f64 re im))
(/.f64 (.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (hypot.f64 im re)) (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(/.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (hypot.f64 im re)) (neg.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re)))))
(/.f64 (.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (hypot.f64 im re)) (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re))))
(/.f64 (.f64 (hypot.f64 im re) (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))) (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(/.f64 (.f64 (hypot.f64 im re) (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (neg.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re)))))
(/.f64 (.f64 (hypot.f64 im re) (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re))))
(/.f64 (-.f64 (.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))) (.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))) (-.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (-.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 (.f64 (neg.f64 re) re) #s(literal 3 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))
(/.f64 (-.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 (.f64 (neg.f64 im) im) #s(literal 3 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))
(/.f64 (+.f64 (pow.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) #s(literal 3 binary64)) (pow.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) #s(literal 3 binary64))) (fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (-.f64 (.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))) (.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))))))
(/.f64 (neg.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (neg.f64 (*.f64 (+.f64 im re) (-.f64 im re))))
(/.f64 (neg.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (neg.f64 (*.f64 (-.f64 re im) (+.f64 im re))))
(/.f64 (neg.f64 (neg.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))) (neg.f64 (neg.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))) (.f64 (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (.f64 (neg.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re)))) (neg.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re))))))
(/.f64 (.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 (neg.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re)))) (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re)))))
(/.f64 (.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re))) (neg.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re))))))
(/.f64 (.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re))) (sqrt.f64 (.f64 (-.f64 re im) (+.f64 im re)))))
(/.f64 (fma.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (pow.f64 im #s(literal 6 binary64)))) (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (*.f64 (+.f64 im re) (-.f64 im re)))
(/.f64 (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 im #s(literal 8 binary64))) (.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (.f64 (-.f64 re im) (+.f64 im re))))
(/.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (*.f64 (-.f64 re im) (+.f64 im re)))
(/.f64 (+.f64 (pow.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 re #s(literal 6 binary64)) #s(literal 3 binary64))) (.f64 (fma.f64 (pow.f64 im #s(literal 6 binary64)) (-.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (pow.f64 re #s(literal 12 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) (.f64 (-.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(/.f64 (-.f64 (pow.f64 re #s(literal 12 binary64)) (pow.f64 im #s(literal 12 binary64))) (.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 8 binary64)) (.f64 (pow.f64 re #s(literal 4 binary64)) (neg.f64 (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 8 binary64))) (*.f64 (-.f64 re im) (+.f64 im re))))
(/.f64 (neg.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (neg.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(/.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))
(neg.f64 (/.f64 (neg.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64)))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(neg.f64 (/.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (neg.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))))
(fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 re #s(literal 12 binary64)))) (fma.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (-.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (-.f64 (pow.f64 re #s(literal 8 binary64)) (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)))) (-.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64)))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 3 binary64)) (pow.f64 re #s(literal 12 binary64)))) (fma.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (-.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))) (pow.f64 re #s(literal 8 binary64))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 im)) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 im)) (*.f64 re re))
(fma.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 im)) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 im)) (*.f64 re re))
(fma.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 re)) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 re)) (*.f64 im im))
(fma.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 re)) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 re)) (*.f64 im im))
(fma.f64 (fabs.f64 (fabs.f64 im)) (fabs.f64 (fabs.f64 im)) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (fabs.f64 (fabs.f64 im)) (fabs.f64 (fabs.f64 im)) (*.f64 re re))
(fma.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 re)) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 re)) (*.f64 im im))
(fma.f64 (pow.f64 im #s(literal 1 binary64)) (pow.f64 im #s(literal 1 binary64)) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (pow.f64 im #s(literal 1 binary64)) (pow.f64 im #s(literal 1 binary64)) (*.f64 re re))
(fma.f64 (pow.f64 im #s(literal 1 binary64)) im (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (pow.f64 im #s(literal 1 binary64)) im (*.f64 re re))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)) (*.f64 im im))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) re (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (pow.f64 re #s(literal 1 binary64)) re (*.f64 im im))
(fma.f64 (neg.f64 im) (neg.f64 im) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (neg.f64 im) (neg.f64 im) (*.f64 re re))
(fma.f64 (neg.f64 re) (neg.f64 re) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (neg.f64 re) (neg.f64 re) (*.f64 im im))
(fma.f64 (fabs.f64 im) (fabs.f64 im) (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 (fabs.f64 im) (fabs.f64 im) (*.f64 re re))
(fma.f64 (fabs.f64 re) (fabs.f64 re) (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 (fabs.f64 re) (fabs.f64 re) (*.f64 im im))
(fma.f64 (pow.f64 re #s(literal 3 binary64)) (/.f64 (pow.f64 re #s(literal 3 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (pow.f64 im #s(literal 3 binary64)) (/.f64 (pow.f64 im #s(literal 3 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (hypot.f64 im re) (*.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) (hypot.f64 im re)))
(fma.f64 (pow.f64 re #s(literal 4 binary64)) (/.f64 (.f64 re re) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (.f64 im im) (/.f64 (pow.f64 im #s(literal 4 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (pow.f64 im #s(literal 4 binary64)) (/.f64 (.f64 im im) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (.f64 re re) (/.f64 (pow.f64 re #s(literal 4 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(fma.f64 (hypot.f64 im re) (cosh.f64 (log.f64 (hypot.f64 im re))) (*.f64 (hypot.f64 im re) (sinh.f64 (log.f64 (hypot.f64 im re)))))
(fma.f64 im im (*.f64 (neg.f64 (neg.f64 re)) re))
(fma.f64 im im (*.f64 re re))
(fma.f64 re re (*.f64 (neg.f64 (neg.f64 im)) im))
(fma.f64 re re (*.f64 im im))
(sqrt.f64 (pow.f64 (hypot.f64 im re) #s(literal 4 binary64)))
(-.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (+.f64 im re) (-.f64 im re))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (+.f64 im re) (-.f64 im re))))
(-.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (-.f64 re im) (+.f64 im re))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (-.f64 re im) (+.f64 im re))))
(-.f64 (.f64 im im) (.f64 (neg.f64 re) re))
(-.f64 (.f64 re re) (.f64 (neg.f64 (neg.f64 im)) (neg.f64 im)))
(-.f64 (.f64 re re) (.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 im)))
(-.f64 (.f64 re re) (.f64 (neg.f64 im) im))
(exp.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(+.f64 (.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (hypot.f64 im re)) (.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) (hypot.f64 im re)))
(+.f64 (.f64 (hypot.f64 im re) (cosh.f64 (log.f64 (hypot.f64 im re)))) (.f64 (hypot.f64 im re) (sinh.f64 (log.f64 (hypot.f64 im re)))))
(+.f64 (/.f64 (neg.f64 (pow.f64 im #s(literal 4 binary64))) (.f64 (-.f64 re im) (+.f64 im re))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (-.f64 re im) (+.f64 im re))))
(+.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (-.f64 re im) (+.f64 im re))) (/.f64 (neg.f64 (pow.f64 im #s(literal 4 binary64))) (.f64 (-.f64 re im) (+.f64 im re))))
(+.f64 (cosh.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))) (sinh.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))))
(+.f64 (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(+.f64 (/.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))))))
(+.f64 (.f64 im im) (.f64 (neg.f64 (neg.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 (.f64 (sqrt.f64 (hypot.f64 im re)) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64))) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)))
(*.f64 (neg.f64 (sqrt.f64 (hypot.f64 im re))) (neg.f64 (sqrt.f64 (hypot.f64 im re))))
(*.f64 (fabs.f64 (sqrt.f64 (hypot.f64 im re))) (fabs.f64 (sqrt.f64 (hypot.f64 im re))))
(.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (sqrt.f64 (hypot.f64 im re))))
(*.f64 (sqrt.f64 (hypot.f64 im re)) (sqrt.f64 (hypot.f64 im re)))
(pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))))
(pow.f64 (exp.f64 #s(literal 2 binary64)) (*.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 4 binary64)) #s(literal 1/4 binary64))
(pow.f64 (sqrt.f64 (hypot.f64 im re)) #s(literal 2 binary64))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(pow.f64 (hypot.f64 im re) #s(literal 1 binary64))
(/.f64 (/.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (+.f64 im re))) (sqrt.f64 (-.f64 re im)))
(/.f64 (-.f64 (.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (cosh.f64 (log.f64 (hypot.f64 im re)))) (.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) (sinh.f64 (log.f64 (hypot.f64 im re))))) (-.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (sinh.f64 (log.f64 (hypot.f64 im re)))))
(/.f64 (+.f64 (pow.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) #s(literal 3 binary64)) (pow.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) #s(literal 3 binary64))) (fma.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (cosh.f64 (log.f64 (hypot.f64 im re))) (-.f64 (.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) (sinh.f64 (log.f64 (hypot.f64 im re)))) (.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (sinh.f64 (log.f64 (hypot.f64 im re)))))))
(/.f64 (neg.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64)))) (neg.f64 (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (neg.f64 (neg.f64 (sqrt.f64 (*.f64 (-.f64 re im) (+.f64 im re))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (sqrt.f64 (*.f64 (+.f64 im re) (-.f64 im re))))
(/.f64 (sqrt.f64 (neg.f64 (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))) (sqrt.f64 (neg.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))))))
(/.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (neg.f64 (sqrt.f64 (*.f64 (-.f64 re im) (+.f64 im re)))))
(/.f64 (hypot.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 im re) #s(literal 2 binary64))))))
(/.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (sqrt.f64 (*.f64 (-.f64 re im) (+.f64 im re))))
(neg.f64 (/.f64 (neg.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (sqrt.f64 (*.f64 (-.f64 re im) (+.f64 im re)))))
(neg.f64 (/.f64 (sqrt.f64 (-.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (neg.f64 (sqrt.f64 (*.f64 (-.f64 re im) (+.f64 im re))))))
(fma.f64 #s(literal 2 binary64) (.f64 (sinh.f64 (.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64))) (cosh.f64 (*.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64)))) (cosh.f64 (log.f64 (hypot.f64 im re))))
(sqrt.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))
(fabs.f64 (hypot.f64 im re))
(hypot.f64 (neg.f64 (neg.f64 im)) (neg.f64 (neg.f64 re)))
(hypot.f64 (neg.f64 (neg.f64 im)) (neg.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 (neg.f64 im)) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 (neg.f64 im)) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (neg.f64 im)) (neg.f64 re))
(hypot.f64 (neg.f64 (neg.f64 im)) (fabs.f64 re))
(hypot.f64 (neg.f64 (neg.f64 im)) re)
(hypot.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (neg.f64 re)))
(hypot.f64 (neg.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 (fabs.f64 im)) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (fabs.f64 im)) (neg.f64 re))
(hypot.f64 (neg.f64 (fabs.f64 im)) (fabs.f64 re))
(hypot.f64 (neg.f64 (fabs.f64 im)) re)
(hypot.f64 (neg.f64 (neg.f64 re)) (neg.f64 (neg.f64 im)))
(hypot.f64 (neg.f64 (neg.f64 re)) (neg.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 (neg.f64 re)) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 (neg.f64 re)) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (neg.f64 re)) (neg.f64 im))
(hypot.f64 (neg.f64 (neg.f64 re)) (fabs.f64 im))
(hypot.f64 (neg.f64 (neg.f64 re)) im)
(hypot.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (neg.f64 im)))
(hypot.f64 (neg.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 (fabs.f64 re)) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (neg.f64 (fabs.f64 re)) (neg.f64 im))
(hypot.f64 (neg.f64 (fabs.f64 re)) (fabs.f64 im))
(hypot.f64 (neg.f64 (fabs.f64 re)) im)
(hypot.f64 (fabs.f64 (fabs.f64 im)) (neg.f64 (neg.f64 re)))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (neg.f64 (fabs.f64 re)))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (neg.f64 re))
(hypot.f64 (fabs.f64 (fabs.f64 im)) (fabs.f64 re))
(hypot.f64 (fabs.f64 (fabs.f64 im)) re)
(hypot.f64 (fabs.f64 (fabs.f64 re)) (neg.f64 (neg.f64 im)))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (neg.f64 (fabs.f64 im)))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (neg.f64 im))
(hypot.f64 (fabs.f64 (fabs.f64 re)) (fabs.f64 im))
(hypot.f64 (fabs.f64 (fabs.f64 re)) im)
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (neg.f64 (neg.f64 re)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (neg.f64 (fabs.f64 re)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (neg.f64 re))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) (fabs.f64 re))
(hypot.f64 (pow.f64 im #s(literal 1 binary64)) re)
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (neg.f64 (neg.f64 im)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (neg.f64 (fabs.f64 im)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (neg.f64 im))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) (fabs.f64 im))
(hypot.f64 (pow.f64 re #s(literal 1 binary64)) im)
(hypot.f64 (neg.f64 im) (neg.f64 (neg.f64 re)))
(hypot.f64 (neg.f64 im) (neg.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 im) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (neg.f64 im) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (neg.f64 im) (neg.f64 re))
(hypot.f64 (neg.f64 im) (fabs.f64 re))
(hypot.f64 (neg.f64 im) re)
(hypot.f64 (neg.f64 re) (neg.f64 (neg.f64 im)))
(hypot.f64 (neg.f64 re) (neg.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 re) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (neg.f64 re) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (neg.f64 re) (neg.f64 im))
(hypot.f64 (neg.f64 re) (fabs.f64 im))
(hypot.f64 (neg.f64 re) im)
(hypot.f64 (fabs.f64 im) (neg.f64 (neg.f64 re)))
(hypot.f64 (fabs.f64 im) (neg.f64 (fabs.f64 re)))
(hypot.f64 (fabs.f64 im) (fabs.f64 (fabs.f64 re)))
(hypot.f64 (fabs.f64 im) (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 im) (neg.f64 re))
(hypot.f64 (fabs.f64 im) (fabs.f64 re))
(hypot.f64 (fabs.f64 im) re)
(hypot.f64 (fabs.f64 re) (neg.f64 (neg.f64 im)))
(hypot.f64 (fabs.f64 re) (neg.f64 (fabs.f64 im)))
(hypot.f64 (fabs.f64 re) (fabs.f64 (fabs.f64 im)))
(hypot.f64 (fabs.f64 re) (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 (fabs.f64 re) (neg.f64 im))
(hypot.f64 (fabs.f64 re) (fabs.f64 im))
(hypot.f64 (fabs.f64 re) im)
(hypot.f64 im (neg.f64 (neg.f64 re)))
(hypot.f64 im (neg.f64 (fabs.f64 re)))
(hypot.f64 im (fabs.f64 (fabs.f64 re)))
(hypot.f64 im (pow.f64 re #s(literal 1 binary64)))
(hypot.f64 im (neg.f64 re))
(hypot.f64 im (fabs.f64 re))
(hypot.f64 im re)
(hypot.f64 re (neg.f64 (neg.f64 im)))
(hypot.f64 re (neg.f64 (fabs.f64 im)))
(hypot.f64 re (fabs.f64 (fabs.f64 im)))
(hypot.f64 re (pow.f64 im #s(literal 1 binary64)))
(hypot.f64 re (neg.f64 im))
(hypot.f64 re (fabs.f64 im))
(hypot.f64 re im)
(exp.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 4 binary64))) #s(literal 1/4 binary64)))
(exp.f64 (log.f64 (hypot.f64 im re)))
(+.f64 (sinh.f64 (log.f64 (hypot.f64 im re))) (cosh.f64 (log.f64 (hypot.f64 im re))))
(+.f64 (cosh.f64 (log.f64 (hypot.f64 im re))) (sinh.f64 (log.f64 (hypot.f64 im re))))

eval159.0ms (4.4%)

Memory: 35.9MiB live, 363.7MiB allocated; 72ms collecting garbage
Compiler: Compiled 32 977 to 7 835 computations (76.2% saved)

prune40.0ms (1.1%)

Memory

-40.3MiB live, 109.3MiB allocated; 8ms collecting garbage

Pruning

25 alts after pruning (21 fresh and 4 done)

	Pruned	Kept	Total
New	1 058	19	1 077
Fresh	8	2	10
Picked	3	2	5
Done	0	2	2
Total	1 069	25	1 094

Accuracy

75.5%

Counts

1 094 → 25

Alt Table

Click to see full alt table

Status	Accuracy	Program
	72.1%	(.f64 (.f64 (sqrt.f64 (fma.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (*.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (sqrt.f64 (hypot.f64 im re))) re)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
	73.8%	(.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (sqrt.f64 (hypot.f64 im re)) #s(literal 2 binary64)) re)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
	37.8%	(.f64 (.f64 (sqrt.f64 (+.f64 (pow.f64 (exp.f64 #s(literal 1/2 binary64)) (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)))) re)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
▶	74.3%	(.f64 (.f64 (sqrt.f64 (+.f64 (hypot.f64 re im) re)) (/.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64))
✓	74.5%	(.f64 (.f64 (sqrt.f64 (+.f64 (hypot.f64 re im) re)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
	73.5%	(.f64 (.f64 (sqrt.f64 (+.f64 (.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (sqrt.f64 (hypot.f64 im re)))) re)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
▶	28.0%	(.f64 (sqrt.f64 (.f64 (/.f64 (-.f64 (pow.f64 (hypot.f64 re im) #s(literal 2 binary64)) (*.f64 re re)) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64))) #s(literal 1/2 binary64))
✓	74.6%	(.f64 (sqrt.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))
	69.3%	(.f64 (exp.f64 (.f64 (log.f64 (*.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))) #s(literal 1/2 binary64))
	72.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (sqrt.f64 (hypot.f64 im re))) (+.f64 re (+.f64 (hypot.f64 im re) re)))))
	72.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (.f64 #s(literal 2 binary64) (sqrt.f64 (hypot.f64 im re))) (sqrt.f64 (hypot.f64 im re)) (*.f64 #s(literal 2 binary64) re))))
	72.2%	(*.f64 #s(literal 1/2 binary64) (sqrt.f64 (fma.f64 (sqrt.f64 (hypot.f64 im re)) (sqrt.f64 (hypot.f64 im re)) (+.f64 re (+.f64 (hypot.f64 im re) re)))))
✓	40.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 1 binary64)) #s(literal 1/4 binary64)) (pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) re))))
▶	40.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) re))))
	38.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (fma.f64 (exp.f64 (*.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/2 binary64))) (pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) re))))
	19.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 (hypot.f64 (pow.f64 im #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (sqrt.f64 (+.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (*.f64 re im) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64))))) re))))
▶	6.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 (sqrt.f64 (fma.f64 (.f64 re re) (.f64 re re) (.f64 (.f64 (neg.f64 im) im) (.f64 im im)))) (sqrt.f64 (.f64 (+.f64 re im) (-.f64 re im)))) re))))
	6.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 (sqrt.f64 (fma.f64 (.f64 re re) (.f64 re re) (neg.f64 (pow.f64 im #s(literal 4 binary64))))) (.f64 (pow.f64 (.f64 (-.f64 re im) (+.f64 im re)) #s(literal 1/4 binary64)) (pow.f64 (*.f64 (-.f64 re im) (+.f64 im re)) #s(literal 1/4 binary64)))) re))))
	5.7%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 (sqrt.f64 (fma.f64 (.f64 re re) (.f64 re re) (neg.f64 (pow.f64 im #s(literal 4 binary64))))) (exp.f64 (.f64 (log.f64 (.f64 (-.f64 re im) (+.f64 im re))) #s(literal 1/2 binary64)))) re))))
✓	40.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))
	37.9%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (pow.f64 (exp.f64 #s(literal 2 binary64)) (log.f64 (hypot.f64 im re)))) re))))
▶	12.9%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (/.f64 (fma.f64 (.f64 (.f64 (neg.f64 re) re) re) (.f64 (.f64 (neg.f64 re) re) re) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (*.f64 im im)))))) re))))
	12.9%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) (pow.f64 (.f64 im im) #s(literal 3 binary64))) (fma.f64 (.f64 im (+.f64 im re)) (.f64 im (-.f64 im re)) (pow.f64 re #s(literal 4 binary64))))) re))))
	8.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 re re) #s(literal 3 binary64)) (pow.f64 (.f64 im im) #s(literal 3 binary64))) (/.f64 (-.f64 (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) #s(literal 2 binary64)) (pow.f64 re #s(literal 8 binary64))) (-.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 (.f64 im re) #s(literal 2 binary64))) (pow.f64 re #s(literal 4 binary64)))))) re))))
	67.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (exp.f64 (log.f64 (hypot.f64 im re))) re))))

Compiler

Compiled 1 077 to 717 computations (33.4% saved)

series421.0ms (11.7%)

Memory

39.3MiB live, 561.8MiB allocated; 66ms collecting garbage

Counts

62 → 746

Calls

Call 1

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

Outputs
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (* (sqrt im) (/ 1 (sqrt 2)))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (/ 1 (sqrt 2))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (+ (* re (+ (* 1/8 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))))) (* (sqrt im) (/ 1 (sqrt 2))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (/ re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (/ 1 (sqrt 2)))))))) (* (sqrt im) (/ 1 (sqrt 2))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (* 2 (* (sqrt im) (/ 1 (sqrt 2))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (+ (* 2 (* (sqrt im) (/ 1 (sqrt 2)))) (* (sqrt (/ 1 im)) (/ re (sqrt 2))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (+ (* 2 (* (sqrt im) (/ 1 (sqrt 2)))) (* re (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (/ 1 (sqrt 2))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (+ (* 2 (* (sqrt im) (/ 1 (sqrt 2)))) (* re (+ (* re (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (/ re (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ 1 (sqrt 2)))))) (* (sqrt (/ 1 im)) (/ 1 (sqrt 2))))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (sqrt im)))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ (sqrt im) (* 1/2 (* (sqrt (/ 1 im)) re)))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ (sqrt im) (* re (+ (* 1/8 (* (sqrt (/ 1 (pow im 3))) re)) (* 1/2 (sqrt (/ 1 im))))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ (sqrt im) (* re (+ (* 1/2 (sqrt (/ 1 im))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) re)) (* 1/8 (sqrt (/ 1 (pow im 3)))))))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 im))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (+ im re)))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (+ im (* re (+ 1 (* 1/2 (/ re im)))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (+ im (* re (+ 1 (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 im))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ im (* 1/2 (/ (pow re 2) im)))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))))
#s(approx re #s(hole binary64 re))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (* 1/2 (* (sqrt im) (sqrt 2)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (+ (* 1/4 (* (sqrt (/ 1 im)) (* re (* (sqrt 2) (+ 1 (* 1/2 (/ (+ im (* -1 im)) im))))))) (* 1/2 (* (sqrt im) (sqrt 2))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (* re (* (sqrt 2) (- (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2))))) im)) (* 1/4 (/ (pow (+ 1 (* 1/2 (/ (+ im (* -1 im)) im))) 2) im))))))) (* 1/4 (* (sqrt (/ 1 im)) (* (sqrt 2) (+ 1 (* 1/2 (/ (+ im (* -1 im)) im)))))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (* (sqrt 2) (+ 1 (* 1/2 (/ (+ im (* -1 im)) im)))))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (* re (* (sqrt 2) (- (* -1/2 (/ (+ (* -1 (/ (* (+ im (* -1 im)) (- 1 (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))))) (pow im 2))) (+ (* -1 (/ (+ im (* -1 im)) (pow im 2))) (* 1/2 (/ (* (+ im (* -1 im)) (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2)))))) (pow im 2))))) im)) (* 1/2 (/ (* (+ 1 (* 1/2 (/ (+ im (* -1 im)) im))) (- (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2))))) im)) (* 1/4 (/ (pow (+ 1 (* 1/2 (/ (+ im (* -1 im)) im))) 2) im)))) im))))))) (* 1/4 (* (sqrt (/ 1 im)) (* (sqrt 2) (- (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2))))) im)) (* 1/4 (/ (pow (+ 1 (* 1/2 (/ (+ im (* -1 im)) im))) 2) im)))))))))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (* (sqrt im) (sqrt 2))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 im)) (* re (* (sqrt 2) (+ 1 (* 1/2 (/ (+ im (* -1 im)) im))))))) (* (sqrt im) (sqrt 2)))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (* re (* (sqrt 2) (- (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2))))) im)) (* 1/4 (/ (pow (+ 1 (* 1/2 (/ (+ im (* -1 im)) im))) 2) im))))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt 2) (+ 1 (* 1/2 (/ (+ im (* -1 im)) im)))))))) (* (sqrt im) (sqrt 2)))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt 2) (+ 1 (* 1/2 (/ (+ im (* -1 im)) im)))))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (* re (* (sqrt 2) (- (* -1/2 (/ (+ (* -1 (/ (* (+ im (* -1 im)) (- 1 (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))))) (pow im 2))) (+ (* -1 (/ (+ im (* -1 im)) (pow im 2))) (* 1/2 (/ (* (+ im (* -1 im)) (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2)))))) (pow im 2))))) im)) (* 1/2 (/ (* (+ 1 (* 1/2 (/ (+ im (* -1 im)) im))) (- (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2))))) im)) (* 1/4 (/ (pow (+ 1 (* 1/2 (/ (+ im (* -1 im)) im))) 2) im)))) im))))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt 2) (- (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2))))) im)) (* 1/4 (/ (pow (+ 1 (* 1/2 (/ (+ im (* -1 im)) im))) 2) im)))))))))) (* (sqrt im) (sqrt 2)))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (* 2 im)))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (+ (* 2 im) (* 2 (* re (+ 1 (* 1/2 (/ (+ im (* -1 im)) im))))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (+ (* 2 im) (* re (+ (* 2 (+ 1 (* 1/2 (/ (+ im (* -1 im)) im)))) (* re (- (/ 1 im) (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 3))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 3)))))))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (+ (* 2 im) (* re (+ (* 2 (+ 1 (* 1/2 (/ (+ im (* -1 im)) im)))) (* re (- (+ (* -1 (/ (* re (+ (* -1 (/ (* (+ im (* -1 im)) (- 1 (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))))) (pow im 2))) (+ (* -1 (/ (+ im (* -1 im)) (pow im 2))) (* 1/2 (/ (* (+ im (* -1 im)) (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2)))))) (pow im 2)))))) im)) (/ 1 im)) (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 3))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 3)))))))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 im))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (+ im (* re (+ 1 (* 1/2 (/ (+ im (* -1 im)) im)))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (+ im (* re (+ 1 (+ (* 1/2 (/ (* re (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2)))))) im)) (* 1/2 (/ (+ im (* -1 im)) im))))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (+ im (* re (+ 1 (+ (* 1/2 (/ (+ im (* -1 im)) im)) (* re (+ (* -1/2 (/ (* re (+ (* -1 (/ (* (+ im (* -1 im)) (- 1 (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))))) (pow im 2))) (+ (* -1 (/ (+ im (* -1 im)) (pow im 2))) (* 1/2 (/ (* (+ im (* -1 im)) (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2)))))) (pow im 2)))))) im)) (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2))))) im))))))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 im))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (+ im (* 1/2 (/ (* re (+ im (* -1 im))) im)))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (+ im (* re (+ (* 1/2 (/ (* re (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2)))))) im)) (* 1/2 (/ (+ im (* -1 im)) im)))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (+ im (* re (+ (* 1/2 (/ (+ im (* -1 im)) im)) (* re (+ (* -1/2 (/ (* re (+ (* -1 (/ (* (+ im (* -1 im)) (- 1 (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))))) (pow im 2))) (+ (* -1 (/ (+ im (* -1 im)) (pow im 2))) (* 1/2 (/ (* (+ im (* -1 im)) (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2)))))) (pow im 2)))))) im)) (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2))))) im)))))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (* (pow im 2) (sqrt -1))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (+ (* 1/2 (/ (pow re 4) (* (pow im 2) (sqrt -1)))) (* (pow im 2) (sqrt -1)))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (+ (* (pow im 2) (sqrt -1)) (* (pow re 4) (+ (* -1/8 (/ (pow re 4) (* (pow im 6) (pow (sqrt -1) 3)))) (* 1/2 (/ 1 (* (pow im 2) (sqrt -1)))))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (+ (* (pow im 2) (sqrt -1)) (* (pow re 4) (+ (* (pow re 4) (- (* 1/16 (/ (pow re 4) (* (pow im 10) (pow (sqrt -1) 5)))) (* 1/8 (/ 1 (* (pow im 6) (pow (sqrt -1) 3)))))) (* 1/2 (/ 1 (* (pow im 2) (sqrt -1)))))))))
#s(approx (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im))) #s(hole binary64 (* -1 (pow im 4))))
#s(approx (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im))) #s(hole binary64 (+ (* -1 (pow im 4)) (pow re 4))))
#s(approx (* re re) #s(hole binary64 (pow re 2)))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* im (sqrt -1))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (+ (* 1/2 (/ (* re (+ im (* -1 im))) (* im (sqrt -1)))) (* im (sqrt -1)))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (+ (* im (sqrt -1)) (* re (+ (* 1/2 (/ (* re (- 1 (* 1/4 (/ (pow (+ im (* -1 im)) 2) (* (pow im 2) (pow (sqrt -1) 2)))))) (* im (sqrt -1)))) (* 1/2 (/ (+ im (* -1 im)) (* im (sqrt -1)))))))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (+ (* im (sqrt -1)) (* re (+ (* 1/2 (/ (+ im (* -1 im)) (* im (sqrt -1)))) (* re (+ (* -1/4 (/ (* re (* (+ im (* -1 im)) (- 1 (* 1/4 (/ (pow (+ im (* -1 im)) 2) (* (pow im 2) (pow (sqrt -1) 2))))))) (* (pow im 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ im (* -1 im)) 2) (* (pow im 2) (pow (sqrt -1) 2))))) (* im (sqrt -1)))))))))))
#s(approx (* (+ re im) (- re im)) #s(hole binary64 (* -1 (pow im 2))))
#s(approx (* (+ re im) (- re im)) #s(hole binary64 (+ (* -1 (pow im 2)) (* re (+ im (* -1 im))))))
#s(approx (* (+ re im) (- re im)) #s(hole binary64 (+ (* -1 (pow im 2)) (* re (+ im (+ re (* -1 im)))))))
#s(approx (+ re im) #s(hole binary64 im))
#s(approx (+ re im) #s(hole binary64 (+ im re)))
#s(approx (- re im) #s(hole binary64 (* -1 im)))
#s(approx (- re im) #s(hole binary64 (- re im)))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (* 1/2 (* (sqrt im) (sqrt 2)))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (* (sqrt im) (sqrt 2))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (+ (* re (+ (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (* (sqrt im) (sqrt 2)))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* 2 im)))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (+ (* 2 im) (* 2 re))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (+ (* 2 im) (* re (+ 2 (/ re im))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (+ (* 2 im) (* re (+ 2 (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 im))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ im re)))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ im (* re (+ 1 (* 1/2 (/ re im)))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ im (* re (+ 1 (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))))
#s(approx (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) #s(hole binary64 (pow im 2)))
#s(approx (pow (sqrt (+ (* re re) (* im im))) 2) #s(hole binary64 (pow im 2)))
#s(approx (pow (sqrt (+ (* re re) (* im im))) 2) #s(hole binary64 (+ (pow im 2) (pow re 2))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 im))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (+ im (* -1 re))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (+ im (* re (- (* 1/2 (/ re im)) 1)))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (* 1/2 (* (sqrt im) (sqrt 2)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (* (sqrt im) (sqrt 2))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (+ (* re (+ (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (* (sqrt im) (sqrt 2)))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* 2 im)))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (+ (* 2 im) (* 2 re))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (+ (* 2 im) (* re (+ 2 (/ re im))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (+ (* 2 im) (* re (+ 2 (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 im))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (+ im re)))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (+ im (* re (+ 1 (* 1/2 (/ re im)))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (+ im (* re (+ 1 (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 im))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (+ im (* 1/2 (/ (pow re 2) im)))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) #s(hole binary64 (pow im 2)))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) #s(hole binary64 (+ (pow im 2) (pow re 2))))
#s(approx (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) #s(hole binary64 (pow im 6)))
#s(approx (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) #s(hole binary64 (+ (pow im 6) (pow re 6))))
#s(approx (* (* (neg re) re) re) #s(hole binary64 (* -1 (pow re 3))))
#s(approx (* (neg re) re) #s(hole binary64 (* -1 (pow re 2))))
#s(approx (neg re) #s(hole binary64 (* -1 re)))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) #s(hole binary64 (pow im 4)))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow im 4))))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) #s(hole binary64 (+ (* (pow re 2) (- (pow re 2) (pow im 2))) (pow im 4))))
#s(approx (pow re 4) #s(hole binary64 (pow re 4)))
#s(approx (- (pow im 4) (* (* re re) (* im im))) #s(hole binary64 (pow im 4)))
#s(approx (- (pow im 4) (* (* re re) (* im im))) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow im 4))))
#s(approx (* (* re re) (* im im)) #s(hole binary64 (* (pow im 2) (pow re 2))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (* 1/2 (* (sqrt im) (sqrt 2)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (* (sqrt im) (sqrt 2))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (+ (* re (+ (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (* (sqrt im) (sqrt 2)))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* 2 im)))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (+ (* 2 im) (* 2 re))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (+ (* 2 im) (* re (+ 2 (/ re im))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (+ (* 2 im) (* re (+ 2 (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 im))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (+ im re)))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (+ im (* re (+ 1 (* 1/2 (/ re im)))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (+ im (* re (+ 1 (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (* (pow 1 1/4) (sqrt im))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (* 1/4 (* (pow 1 1/4) (* (sqrt (/ 1 (pow im 3))) (pow re 2)))) (* (pow 1 1/4) (sqrt im)))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (* (pow 1 1/4) (sqrt im)) (* (pow re 2) (+ (* -3/32 (* (pow 1 1/4) (* (sqrt (/ 1 (pow im 7))) (pow re 2)))) (* 1/4 (* (pow 1 1/4) (sqrt (/ 1 (pow im 3))))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (* (pow 1 1/4) (sqrt im)) (* (pow re 2) (+ (* 1/4 (* (pow 1 1/4) (sqrt (/ 1 (pow im 3))))) (* (pow re 2) (+ (* -3/32 (* (pow 1 1/4) (sqrt (/ 1 (pow im 7))))) (* 7/128 (* (pow 1 1/4) (* (sqrt (/ 1 (pow im 11))) (pow re 2)))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (* (pow (pow 1 3) 1/8) (pow im 1/4))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (pow 1 3) 1/8) (* (pow (/ 1 (pow im 7)) 1/4) (pow re 2)))) (* (pow (pow 1 3) 1/8) (pow im 1/4)))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* (pow re 2) (+ (* -7/128 (* (pow (pow 1 3) 1/8) (* (pow (/ 1 (pow im 15)) 1/4) (pow re 2)))) (* 1/8 (* (pow (pow 1 3) 1/8) (pow (/ 1 (pow im 7)) 1/4))))) (* (pow (pow 1 3) 1/8) (pow im 1/4)))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* (pow re 2) (+ (* 1/8 (* (pow (pow 1 3) 1/8) (pow (/ 1 (pow im 7)) 1/4))) (* (pow re 2) (+ (* -7/128 (* (pow (pow 1 3) 1/8) (pow (/ 1 (pow im 15)) 1/4))) (* 35/1024 (* (pow (pow 1 3) 1/8) (* (pow (/ 1 (pow im 23)) 1/4) (pow re 2)))))))) (* (pow (pow 1 3) 1/8) (pow im 1/4)))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 im))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ im (* 1/2 (/ (pow re 2) im)))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (* (pow 1 1/4) (sqrt im))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (* 1/4 (* (pow 1 1/4) (* (sqrt (/ 1 (pow im 3))) (pow re 2)))) (* (pow 1 1/4) (sqrt im)))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (* (pow 1 1/4) (sqrt im)) (* (pow re 2) (+ (* -3/32 (* (pow 1 1/4) (* (sqrt (/ 1 (pow im 7))) (pow re 2)))) (* 1/4 (* (pow 1 1/4) (sqrt (/ 1 (pow im 3))))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (* (pow 1 1/4) (sqrt im)) (* (pow re 2) (+ (* 1/4 (* (pow 1 1/4) (sqrt (/ 1 (pow im 3))))) (* (pow re 2) (+ (* -3/32 (* (pow 1 1/4) (sqrt (/ 1 (pow im 7))))) (* 7/128 (* (pow 1 1/4) (* (sqrt (/ 1 (pow im 11))) (pow re 2)))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 2) #s(hole binary64 (pow im 2)))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 2) #s(hole binary64 (+ (pow im 2) (pow re 2))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (sqrt re)))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (* re (+ (sqrt (/ 1 re)) (* 1/4 (* (/ (pow im 2) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 5)))))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (* re (+ (sqrt (/ 1 re)) (+ (* -1/16 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (* 1/4 (* (/ (pow im 2) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 5))))))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (* re (+ (sqrt (/ 1 re)) (+ (* -1/16 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* -1/32 (* (/ (pow im 4) (pow (sqrt 2) 4)) (sqrt (/ 1 (pow re 9))))) (* 1/4 (* (/ (pow im 2) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 5)))))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (* 2 (sqrt re))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (* re (+ (* 1/2 (* (/ (pow im 2) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 5))))) (* 2 (sqrt (/ 1 re)))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (* re (+ (* -1/8 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/2 (* (/ (pow im 2) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 5))))) (* 2 (sqrt (/ 1 re))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (* re (+ (* -1/8 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* -1/16 (* (/ (pow im 4) (pow (sqrt 2) 4)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/2 (* (/ (pow im 2) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 5))))) (* 2 (sqrt (/ 1 re)))))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* (sqrt re) (sqrt 2))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* re (+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 2))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* re (+ (* -1/16 (* (/ (pow im 4) (sqrt 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 2)))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* re (+ (* -1/16 (* (/ (pow im 4) (sqrt 2)) (sqrt (/ 1 (pow re 9))))) (+ (* -1/32 (* (/ (pow im 4) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 2))))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* 2 re)))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 re))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (* re (+ (* -1/8 (* (sqrt (/ 1 (pow re 3))) (+ im (* -1 im)))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (* re (+ (* -1/8 (* (sqrt (/ 1 (pow re 3))) (+ im (* -1 im)))) (+ (* -1/8 (* (sqrt (/ 1 (pow re 5))) (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (* re (+ (* -1/8 (* (sqrt (/ 1 (pow re 3))) (+ im (* -1 im)))) (+ (* -1/8 (* (sqrt (/ 1 (pow re 5))) (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))))) (+ (* 1/4 (* (sqrt (/ 1 (pow re 7))) (- (* -1/2 (+ (* -1 (* (+ im (* -1 im)) (+ (* -1 (pow im 2)) (* -1 (pow (+ im (* -1 im)) 2))))) (+ (* 1/2 (* (+ im (* -1 im)) (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))))) (* (pow im 2) (+ im (* -1 im)))))) (* 1/16 (/ (* re (pow (+ im (* -1 im)) 2)) (pow (sqrt 2) 2)))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (* (sqrt re) (pow (sqrt 2) 2))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (* re (+ (* -1/4 (* (sqrt (/ 1 (pow re 3))) (+ im (* -1 im)))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (* re (+ (* -1/4 (* (sqrt (/ 1 (pow re 3))) (+ im (* -1 im)))) (+ (* -1/4 (* (sqrt (/ 1 (pow re 5))) (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (* re (+ (* -1/4 (* (sqrt (/ 1 (pow re 3))) (+ im (* -1 im)))) (+ (* -1/4 (* (sqrt (/ 1 (pow re 5))) (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))))) (+ (* 1/2 (* (sqrt (/ 1 (pow re 7))) (- (* -1/2 (+ (* -1 (* (+ im (* -1 im)) (+ (* -1 (pow im 2)) (* -1 (pow (+ im (* -1 im)) 2))))) (+ (* 1/2 (* (+ im (* -1 im)) (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))))) (* (pow im 2) (+ im (* -1 im)))))) (* 1/16 (/ (* re (pow (+ im (* -1 im)) 2)) (pow (sqrt 2) 2)))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (* 4 re)))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (* re (+ 4 (* -1 (/ (+ im (* -1 im)) re))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (* re (+ 4 (+ (* -1 (/ (+ im (* -1 im)) re)) (* -1 (/ (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))) (pow re 2))))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (* re (+ 4 (+ (* -1 (/ (+ im (* -1 im)) re)) (+ (* -1 (/ (+ (* -1 (* (+ im (* -1 im)) (+ (* -1 (pow im 2)) (* -1 (pow (+ im (* -1 im)) 2))))) (+ (* 1/2 (* (+ im (* -1 im)) (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))))) (* (pow im 2) (+ im (* -1 im))))) (pow re 3))) (* -1 (/ (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))) (pow re 2)))))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (* 2 re)))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (* re (+ 2 (* -1/2 (/ (+ im (* -1 im)) re))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (* re (+ 2 (+ (* -1/2 (/ (+ im (* -1 im)) re)) (* -1/2 (/ (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))) (pow re 2))))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (* re (+ 2 (+ (* -1/2 (/ (+ im (* -1 im)) re)) (+ (* -1/2 (/ (+ (* -1 (* (+ im (* -1 im)) (+ (* -1 (pow im 2)) (* -1 (pow (+ im (* -1 im)) 2))))) (+ (* 1/2 (* (+ im (* -1 im)) (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))))) (* (pow im 2) (+ im (* -1 im))))) (pow re 3))) (* -1/2 (/ (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))) (pow re 2)))))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 re))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* re (+ 1 (* -1/2 (/ (+ im (* -1 im)) re))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* re (+ 1 (+ (* -1/2 (/ (+ im (* -1 im)) re)) (* -1/2 (/ (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))) (pow re 2))))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* re (+ 1 (+ (* -1/2 (/ (+ im (* -1 im)) re)) (+ (* -1/2 (/ (+ (* -1 (* (+ im (* -1 im)) (+ (* -1 (pow im 2)) (* -1 (pow (+ im (* -1 im)) 2))))) (+ (* 1/2 (* (+ im (* -1 im)) (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))))) (* (pow im 2) (+ im (* -1 im))))) (pow re 3))) (* -1/2 (/ (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))) (pow re 2)))))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (pow re 2)))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (* (pow re 2) (+ 1 (* -1/2 (/ (pow im 4) (pow re 4)))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (* (pow re 2) (+ 1 (+ (* -1/2 (/ (pow im 4) (pow re 4))) (* -1/8 (/ (pow im 8) (pow re 8))))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (* (pow re 2) (+ 1 (+ (* -1/2 (/ (pow im 4) (pow re 4))) (+ (* -1/8 (/ (pow im 8) (pow re 8))) (* -1/16 (/ (pow im 12) (pow re 12)))))))))
#s(approx (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im))) #s(hole binary64 (pow re 4)))
#s(approx (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im))) #s(hole binary64 (* (pow re 4) (+ 1 (* -1 (/ (pow im 4) (pow re 4)))))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 re))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* re (+ 1 (* 1/2 (/ (+ im (* -1 im)) re))))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* re (+ 1 (+ (* 1/2 (/ (+ im (* -1 im)) re)) (* 1/2 (/ (- (* -1 (pow im 2)) (* 1/4 (pow (+ im (* -1 im)) 2))) (pow re 2))))))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* re (+ 1 (+ (* -1/4 (/ (* (+ im (* -1 im)) (- (* -1 (pow im 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))) (pow re 3))) (+ (* 1/2 (/ (+ im (* -1 im)) re)) (* 1/2 (/ (- (* -1 (pow im 2)) (* 1/4 (pow (+ im (* -1 im)) 2))) (pow re 2)))))))))
#s(approx (* (+ re im) (- re im)) #s(hole binary64 (pow re 2)))
#s(approx (* (+ re im) (- re im)) #s(hole binary64 (* (pow re 2) (+ 1 (+ (* -1 (/ im re)) (/ im re))))))
#s(approx (* (+ re im) (- re im)) #s(hole binary64 (* (pow re 2) (+ 1 (+ (* -1 (/ im re)) (+ (* -1 (/ (pow im 2) (pow re 2))) (/ im re)))))))
#s(approx (+ re im) #s(hole binary64 re))
#s(approx (+ re im) #s(hole binary64 (* re (+ 1 (/ im re)))))
#s(approx (- re im) #s(hole binary64 re))
#s(approx (- re im) #s(hole binary64 (* re (+ 1 (* -1 (/ im re))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (* re (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (* re (+ (* -1/4 (* (* (pow im 2) (+ (* -1/8 (pow im 2)) (* 1/4 (pow im 2)))) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (* re (+ (* -1/4 (* (* (pow im 2) (+ (* -1/8 (pow im 2)) (* 1/4 (pow im 2)))) (sqrt (/ 1 (pow re 9))))) (+ (* -1/64 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (* (sqrt re) (pow (sqrt 2) 2))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (* re (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (* re (+ (* -1/2 (* (* (pow im 2) (+ (* -1/8 (pow im 2)) (* 1/4 (pow im 2)))) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (* re (+ (* -1/2 (* (* (pow im 2) (+ (* -1/8 (pow im 2)) (* 1/4 (pow im 2)))) (sqrt (/ 1 (pow re 9))))) (+ (* -1/32 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* 4 re)))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* re (+ 4 (/ (pow im 2) (pow re 2))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* re (+ 4 (+ (* -2 (/ (+ (* -1/8 (pow im 4)) (* 1/4 (pow im 4))) (pow re 4))) (/ (pow im 2) (pow re 2)))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* re (+ 4 (+ (* -2 (/ (+ (* -2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* 1/16 (pow im 6)) (* 1/4 (* (pow im 2) (+ (* -1/8 (pow im 4)) (* 1/4 (pow im 4))))))) (pow re 6))) (+ (* -2 (/ (+ (* -1/8 (pow im 4)) (* 1/4 (pow im 4))) (pow re 4))) (/ (pow im 2) (pow re 2))))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* 2 re)))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* re (- (+ 2 (* -1 (/ (+ (* -1/8 (pow im 4)) (* 1/4 (pow im 4))) (pow re 4)))) (* -1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* re (- (+ 2 (* -1 (/ (+ (* -2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* 1/16 (pow im 6)) (* 1/4 (* (pow im 2) (+ (* -1/8 (pow im 4)) (* 1/4 (pow im 4))))))) (pow re 6)))) (+ (* -1/2 (/ (pow im 2) (pow re 2))) (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/4 (/ (pow im 4) (pow re 4)))))))))
#s(approx (pow (sqrt (+ (* re re) (* im im))) 2) #s(hole binary64 (pow re 2)))
#s(approx (pow (sqrt (+ (* re re) (* im im))) 2) #s(hole binary64 (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* 1/2 (/ (pow im 2) re))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (* re (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (* re (+ (* -1/8 (* (sqrt (/ 1 (pow re 9))) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (* re (+ (* -1/8 (* (sqrt (/ 1 (pow re 9))) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (+ (* -1/64 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (* (sqrt re) (pow (sqrt 2) 2))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (* re (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (* re (+ (* -1/4 (* (sqrt (/ 1 (pow re 9))) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (* re (+ (* -1/4 (* (sqrt (/ 1 (pow re 9))) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (+ (* -1/32 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* 4 re)))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* re (+ 4 (/ (pow im 2) (pow re 2))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* re (+ 4 (+ (* -1 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 4))) (/ (pow im 2) (pow re 2)))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* re (+ 4 (+ (* -1 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 4))) (+ (* -1 (/ (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))) (pow re 6))) (/ (pow im 2) (pow re 2))))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* 2 re)))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* re (+ 2 (+ (* -1/2 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* re (+ 2 (+ (* -1/2 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 4))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 re))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* re (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* re (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 4))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) #s(hole binary64 (pow re 2)))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) #s(hole binary64 (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) #s(hole binary64 (* (pow re 2) (- (+ 1 (* -1 (/ (+ (* -1 (pow im 4)) (pow im 4)) (pow re 4)))) (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) #s(hole binary64 (* (pow re 2) (- (+ 1 (* -1 (/ (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4))) (pow re 6)))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* -1 (/ (pow im 4) (pow re 4))) (/ (pow im 4) (pow re 4))))))))
#s(approx (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) #s(hole binary64 (pow re 6)))
#s(approx (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) #s(hole binary64 (* (pow re 6) (+ 1 (/ (pow im 6) (pow re 6))))))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) #s(hole binary64 (pow re 4)))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) #s(hole binary64 (* (pow re 4) (+ 1 (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) #s(hole binary64 (* (pow re 4) (- (+ 1 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
#s(approx (- (pow im 4) (* (* re re) (* im im))) #s(hole binary64 (* -1 (* (pow im 2) (pow re 2)))))
#s(approx (- (pow im 4) (* (* re re) (* im im))) #s(hole binary64 (* (pow re 2) (- (/ (pow im 4) (pow re 2)) (pow im 2)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (* re (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (* re (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (* re (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/64 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (* (sqrt re) (pow (sqrt 2) 2))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (* re (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/32 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* 4 re)))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* re (+ 4 (/ (pow im 2) (pow re 2))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* 2 re)))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (sqrt re)))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (sqrt re) (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (sqrt re) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 (pow re 7))) (+ (* -1/8 (pow im 4)) (* 1/32 (pow im 4))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (sqrt re) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (+ (* (sqrt (/ 1 (pow re 7))) (+ (* -1/8 (pow im 4)) (* 1/32 (pow im 4)))) (* (sqrt (/ 1 (pow re 11))) (+ (* -1/32 (pow im 6)) (+ (* 1/384 (pow im 6)) (* 1/12 (pow im 6))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (pow (* 1 re) 1/4)))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (/ 1 (pow re 7)) 1/4) (pow im 2))) (pow (* 1 re) 1/4))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (/ 1 (pow re 7)) 1/4) (pow im 2))) (+ (* (pow (/ 1 (pow re 15)) 1/4) (+ (* -1/16 (pow im 4)) (* 1/128 (pow im 4)))) (pow (* 1 re) 1/4)))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (/ 1 (pow re 7)) 1/4) (pow im 2))) (+ (* (pow (/ 1 (pow re 15)) 1/4) (+ (* -1/16 (pow im 4)) (* 1/128 (pow im 4)))) (+ (* (pow (/ 1 (pow re 23)) 1/4) (+ (* -1/128 (pow im 6)) (+ (* 1/3072 (pow im 6)) (* 1/24 (pow im 6))))) (pow (* 1 re) 1/4))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 re))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (sqrt re)))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (sqrt re) (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (sqrt re) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 (pow re 7))) (+ (* -1/8 (pow im 4)) (* 1/32 (pow im 4))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (sqrt re) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (+ (* (sqrt (/ 1 (pow re 7))) (+ (* -1/8 (pow im 4)) (* 1/32 (pow im 4)))) (* (sqrt (/ 1 (pow re 11))) (+ (* -1/32 (pow im 6)) (+ (* 1/384 (pow im 6)) (* 1/12 (pow im 6))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 2) #s(hole binary64 (pow re 2)))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 2) #s(hole binary64 (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (* (/ (* im (* (sqrt -1) (sqrt 1/2))) (sqrt 2)) (sqrt (/ 1 re)))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (+ (* 1/16 (* (/ (* (pow im 3) (sqrt -1)) (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (* (/ (* im (* (sqrt -1) (sqrt 1/2))) (sqrt 2)) (sqrt (/ 1 re))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (sqrt -1)) (* (sqrt 1/2) (sqrt 2))) (sqrt re))) (* 1/32 (* (/ (* (pow im 5) (sqrt -1)) (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (/ (* im (* (sqrt -1) (sqrt 1/2))) (sqrt 2)) (sqrt (/ 1 re))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (sqrt -1)) (* (sqrt 1/2) (sqrt 2))) (sqrt re))) (+ (* 1/512 (* (/ (* (pow im 5) (sqrt -1)) (* (pow (sqrt 1/2) 3) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* 1/32 (* (/ (* (pow im 5) (sqrt -1)) (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (/ (* im (* (sqrt -1) (sqrt 1/2))) (sqrt 2)) (sqrt (/ 1 re))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (* 2 (* (/ (* im (* (sqrt -1) (sqrt 1/2))) (sqrt 2)) (sqrt (/ 1 re))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow im 3) (sqrt -1)) (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (* 2 (* (/ (* im (* (sqrt -1) (sqrt 1/2))) (sqrt 2)) (sqrt (/ 1 re)))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/8 (* (/ (* (pow im 3) (sqrt -1)) (* (sqrt 1/2) (sqrt 2))) (sqrt re))) (* 1/16 (* (/ (* (pow im 5) (sqrt -1)) (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* 2 (* (/ (* im (* (sqrt -1) (sqrt 1/2))) (sqrt 2)) (sqrt (/ 1 re)))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/8 (* (/ (* (pow im 3) (sqrt -1)) (* (sqrt 1/2) (sqrt 2))) (sqrt re))) (+ (* 1/256 (* (/ (* (pow im 5) (sqrt -1)) (* (pow (sqrt 1/2) 3) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* 1/16 (* (/ (* (pow im 5) (sqrt -1)) (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* 2 (* (/ (* im (* (sqrt -1) (sqrt 1/2))) (sqrt 2)) (sqrt (/ 1 re)))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re)))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ (* 1/16 (* (/ (* (pow im 3) (sqrt -1)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (sqrt -1)) (sqrt 1/2)) (sqrt re))) (* 1/32 (* (/ (* (pow im 5) (sqrt -1)) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (sqrt -1)) (sqrt 1/2)) (sqrt re))) (+ (* 1/512 (* (/ (* (pow im 5) (sqrt -1)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/32 (* (/ (* (pow im 5) (sqrt -1)) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1/2 (/ (pow im 2) re))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 re)))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (* 1/2 (* (/ (* (sqrt -1/2) (sqrt 2)) (sqrt -1)) (sqrt (+ im (* -1 im)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (+ (* 1/8 (* (/ (* (sqrt 2) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (* re (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 (+ im (* -1 im)))))) (* 1/2 (* (/ (* (sqrt -1/2) (sqrt 2)) (sqrt -1)) (sqrt (+ im (* -1 im))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/4 (* (/ (* (sqrt -1) (* (sqrt 2) (- (* -1/2 (/ (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (pow (sqrt -1) 2))) (* 1/16 (/ (pow (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) 2) (* (pow (sqrt -1) 2) (* (pow (sqrt -1/2) 2) (+ im (* -1 im))))))))) (* re (sqrt -1/2))) (sqrt (/ 1 (+ im (* -1 im)))))) (* -1/8 (* (/ (* (sqrt 2) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 (+ im (* -1 im))))))) re)) (* 1/2 (* (/ (* (sqrt -1/2) (sqrt 2)) (sqrt -1)) (sqrt (+ im (* -1 im))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (* (/ (* (sqrt -1) (* (sqrt 2) (- (* 1/2 (/ (- (pow im 4) (+ (* 1/4 (/ (pow (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) 2) (pow (sqrt -1) 2))) (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im)))))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (* (pow im 2) (+ (pow im 2) (pow (+ im (* -1 im)) 2))))))) (pow (sqrt -1) 2))) (* -1/4 (/ (* (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (- (* -1/2 (/ (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (pow (sqrt -1) 2))) (* 1/16 (/ (pow (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) 2) (* (pow (sqrt -1) 2) (* (pow (sqrt -1/2) 2) (+ im (* -1 im)))))))) (* (pow (sqrt -1/2) 2) (+ im (* -1 im)))))))) (* re (sqrt -1/2))) (sqrt (/ 1 (+ im (* -1 im)))))) (* 1/4 (* (/ (* (sqrt -1) (* (sqrt 2) (- (* -1/2 (/ (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (pow (sqrt -1) 2))) (* 1/16 (/ (pow (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) 2) (* (pow (sqrt -1) 2) (* (pow (sqrt -1/2) 2) (+ im (* -1 im))))))))) (sqrt -1/2)) (sqrt (/ 1 (+ im (* -1 im))))))) re)) (* -1/8 (* (/ (* (sqrt 2) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 (+ im (* -1 im))))))) re)) (* 1/2 (* (/ (* (sqrt -1/2) (sqrt 2)) (sqrt -1)) (sqrt (+ im (* -1 im))))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (* (/ (* (sqrt -1/2) (sqrt 2)) (sqrt -1)) (sqrt (+ im (* -1 im))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (+ (* 1/4 (* (/ (* (sqrt 2) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (* re (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 (+ im (* -1 im)))))) (* (/ (* (sqrt -1/2) (sqrt 2)) (sqrt -1)) (sqrt (+ im (* -1 im)))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (* (/ (* (sqrt -1) (* (sqrt 2) (- (* -1/2 (/ (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (pow (sqrt -1) 2))) (* 1/16 (/ (pow (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) 2) (* (pow (sqrt -1) 2) (* (pow (sqrt -1/2) 2) (+ im (* -1 im))))))))) (* re (sqrt -1/2))) (sqrt (/ 1 (+ im (* -1 im)))))) (* -1/4 (* (/ (* (sqrt 2) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 (+ im (* -1 im))))))) re)) (* (/ (* (sqrt -1/2) (sqrt 2)) (sqrt -1)) (sqrt (+ im (* -1 im)))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (* (/ (* (sqrt -1) (* (sqrt 2) (- (* 1/2 (/ (- (pow im 4) (+ (* 1/4 (/ (pow (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) 2) (pow (sqrt -1) 2))) (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im)))))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (* (pow im 2) (+ (pow im 2) (pow (+ im (* -1 im)) 2))))))) (pow (sqrt -1) 2))) (* -1/4 (/ (* (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (- (* -1/2 (/ (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (pow (sqrt -1) 2))) (* 1/16 (/ (pow (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) 2) (* (pow (sqrt -1) 2) (* (pow (sqrt -1/2) 2) (+ im (* -1 im)))))))) (* (pow (sqrt -1/2) 2) (+ im (* -1 im)))))))) (* re (sqrt -1/2))) (sqrt (/ 1 (+ im (* -1 im)))))) (* 1/2 (* (/ (* (sqrt -1) (* (sqrt 2) (- (* -1/2 (/ (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (pow (sqrt -1) 2))) (* 1/16 (/ (pow (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) 2) (* (pow (sqrt -1) 2) (* (pow (sqrt -1/2) 2) (+ im (* -1 im))))))))) (sqrt -1/2)) (sqrt (/ 1 (+ im (* -1 im))))))) re)) (* -1/4 (* (/ (* (sqrt 2) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 (+ im (* -1 im))))))) re)) (* (/ (* (sqrt -1/2) (sqrt 2)) (sqrt -1)) (sqrt (+ im (* -1 im)))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (* -1 (/ (+ im (* -1 im)) (pow (sqrt -1) 2)))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (+ (* -1 (/ (+ im (* -1 im)) (pow (sqrt -1) 2))) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (* re (pow (sqrt -1) 4)))) (+ (/ (pow im 2) (* re (pow (sqrt -1) 2))) (/ (pow (+ im (* -1 im)) 2) (* re (pow (sqrt -1) 2))))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (+ (* -1 (/ (+ im (* -1 im)) (pow (sqrt -1) 2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (pow (sqrt -1) 2))) (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (* re (pow (sqrt -1) 4)))) (+ (/ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* re (pow (sqrt -1) 2))) (/ (* (pow im 2) (+ im (* -1 im))) (* re (pow (sqrt -1) 2)))))) re)))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (+ (* -1 (/ (+ im (* -1 im)) (pow (sqrt -1) 2))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (pow (sqrt -1) 2))) (* -1 (/ (- (/ (pow im 4) (pow (sqrt -1) 2)) (+ (* 1/4 (/ (pow (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) 2) (pow (sqrt -1) 4))) (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im)))))) (pow (sqrt -1) 4))) (+ (/ (* (+ im (* -1 im)) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (pow (sqrt -1) 2)) (/ (* (pow im 2) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (pow (sqrt -1) 2)))))) re))) re)) (* -1 (/ (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (pow (sqrt -1) 2)))) re)))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (* -1/2 (/ (+ im (* -1 im)) (pow (sqrt -1) 2)))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (+ (* -1/2 (/ (+ im (* -1 im)) (pow (sqrt -1) 2))) (* 1/2 (/ (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* re (pow (sqrt -1) 2)))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (pow (sqrt -1) 2))) (* 1/2 (/ (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (* re (pow (sqrt -1) 2))))) re)) (* -1/2 (/ (+ im (* -1 im)) (pow (sqrt -1) 2))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (pow (sqrt -1) 2))) (* -1/2 (/ (- (pow im 4) (+ (* 1/4 (/ (pow (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) 2) (pow (sqrt -1) 2))) (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im)))))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (* (pow im 2) (+ (pow im 2) (pow (+ im (* -1 im)) 2))))))) (* re (pow (sqrt -1) 2))))) re)) (* -1/2 (/ (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (pow (sqrt -1) 2)))) re)) (* -1/2 (/ (+ im (* -1 im)) (pow (sqrt -1) 2))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* -1 re)))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* -1 (* re (+ 1 (* 1/2 (/ (+ im (* -1 im)) (* re (pow (sqrt -1) 2)))))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* -1 (* re (+ 1 (* -1 (/ (+ (* -1/2 (/ (+ im (* -1 im)) (pow (sqrt -1) 2))) (* 1/2 (/ (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* re (pow (sqrt -1) 2))))) re)))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* -1 (* re (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (pow (sqrt -1) 2))) (* 1/2 (/ (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (* re (pow (sqrt -1) 2))))) re)) (* -1/2 (/ (+ im (* -1 im)) (pow (sqrt -1) 2)))) re)))))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* -1 (* re (pow (sqrt -1) 2)))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* -1 (* re (+ (* -1/2 (/ (+ im (* -1 im)) re)) (pow (sqrt -1) 2))))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* -1 (* re (+ (* -1 (/ (+ (* -1/2 (/ (- (pow im 2) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2)))) re)) (* 1/2 (+ im (* -1 im)))) re)) (pow (sqrt -1) 2))))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ im (* -1 im)) (- (pow im 2) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))))) (* re (pow (sqrt -1) 2)))) (* 1/2 (- (pow im 2) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2)))))) re)) (* 1/2 (+ im (* -1 im)))) re)) (pow (sqrt -1) 2))))))
#s(approx (* (+ re im) (- re im)) #s(hole binary64 (* (pow re 2) (+ 1 (* -1 (/ (+ (* -1 (+ im (* -1 im))) (/ (pow im 2) re)) re))))))
#s(approx (+ re im) #s(hole binary64 (* -1 (* re (- (* -1 (/ im re)) 1)))))
#s(approx (- re im) #s(hole binary64 (* -1 (* re (- (/ im re) 1)))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (+ (* 1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/1024 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (+ (* 1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/512 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* -1 (/ (pow im 2) re))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* -1 (/ (+ (* -2 (/ (+ (* 1/128 (pow im 8)) (* 1/32 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* -1/2 (/ (pow im 2) re))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* -1 (/ (- (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))) (* 1/8 (/ (pow im 4) (pow re 2)))) re))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* -1 (/ (- (+ (* -1 (/ (+ (* 1/128 (pow im 8)) (* 1/32 (pow im 8))) (pow re 6))) (* 1/2 (pow im 2))) (+ (* -1/16 (/ (pow im 6) (pow re 4))) (* 1/8 (/ (pow im 4) (pow re 2))))) re))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -2 re)))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (+ (* 1/8 (* (/ (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* im (sqrt 1/2))) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/8 (* (/ (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* im (sqrt 1/2))) (sqrt re))) (* -1/8 (* (/ (* (sqrt -1) (* (sqrt 2) (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))))) (* im (sqrt 1/2))) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/8 (* (/ (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* im (sqrt 1/2))) (sqrt re))) (+ (* -1/8 (* (/ (* (sqrt -1) (* (sqrt 2) (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))))) (* im (sqrt 1/2))) (sqrt (/ 1 (pow re 3))))) (* 1/64 (* (/ (* (sqrt -1) (* (sqrt 2) (pow (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) 2))) (* (pow im 3) (pow (sqrt 1/2) 3))) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (+ (* 1/4 (* (/ (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* im (sqrt 1/2))) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/4 (* (/ (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* im (sqrt 1/2))) (sqrt re))) (* -1/4 (* (/ (* (sqrt -1) (* (sqrt 2) (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))))) (* im (sqrt 1/2))) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/4 (* (/ (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* im (sqrt 1/2))) (sqrt re))) (+ (* -1/4 (* (/ (* (sqrt -1) (* (sqrt 2) (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))))) (* im (sqrt 1/2))) (sqrt (/ 1 (pow re 3))))) (* 1/32 (* (/ (* (sqrt -1) (* (sqrt 2) (pow (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) 2))) (* (pow im 3) (pow (sqrt 1/2) 3))) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* -1 (/ (pow im 2) re))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 2))) (pow im 2)) re))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 2))) (+ (* -1 (/ (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))) (pow re 4))) (pow im 2))) re))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (pow im 4) (+ (* -1 (pow im 4)) (pow im 4)))) (+ (* -1/2 (* (pow im 2) (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))))) (+ (* 1/4 (pow (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) 2)) (* (pow im 4) (+ (* -1 (pow im 4)) (pow im 4)))))) (pow re 6))) (+ (* -1 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 2))) (+ (* -1 (/ (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))) (pow re 4))) (pow im 2)))) re))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* -1/2 (/ (pow im 2) re))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 2))) (* 1/2 (pow im 2))) re))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))) (pow re 4))) (* 1/2 (pow im 2)))) re))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (+ (* -1 (* (pow im 4) (+ (* -1 (pow im 4)) (pow im 4)))) (+ (* -1/2 (* (pow im 2) (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))))) (+ (* 1/4 (pow (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) 2)) (* (pow im 4) (+ (* -1 (pow im 4)) (pow im 4)))))) (pow re 6))) (+ (* -1/2 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))) (pow re 4))) (* 1/2 (pow im 2))))) re))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* -1 re)))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 4))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (+ (* 1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/1024 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (+ (* 1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/512 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* -1 (/ (pow im 2) re))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* -1/2 (/ (pow im 2) re))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (* (sqrt re) (sqrt -1))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt -1)))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* (sqrt re) (sqrt -1)) (* (sqrt (/ 1 (pow re 7))) (* (sqrt -1) (+ (* -1/8 (pow im 4)) (* 1/32 (pow im 4)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* (sqrt re) (sqrt -1)) (+ (* (sqrt (/ 1 (pow re 7))) (* (sqrt -1) (+ (* -1/8 (pow im 4)) (* 1/32 (pow im 4))))) (* (sqrt (/ 1 (pow re 11))) (* (sqrt -1) (+ (* -1/32 (pow im 6)) (+ (* 1/384 (pow im 6)) (* 1/12 (pow im 6)))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (pow (* -1 re) 1/4)))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (/ -1 (pow re 7)) 1/4) (pow im 2))) (pow (* -1 re) 1/4))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (/ -1 (pow re 7)) 1/4) (pow im 2))) (+ (* (pow (/ -1 (pow re 15)) 1/4) (+ (* -1/16 (pow im 4)) (* 1/128 (pow im 4)))) (pow (* -1 re) 1/4)))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (/ -1 (pow re 7)) 1/4) (pow im 2))) (+ (* (pow (/ -1 (pow re 15)) 1/4) (+ (* -1/16 (pow im 4)) (* 1/128 (pow im 4)))) (+ (* (pow (/ -1 (pow re 23)) 1/4) (+ (* -1/128 (pow im 6)) (+ (* 1/3072 (pow im 6)) (* 1/24 (pow im 6))))) (pow (* -1 re) 1/4))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 re)))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (* (sqrt re) (sqrt -1))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt -1)))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* (sqrt re) (sqrt -1)) (* (sqrt (/ 1 (pow re 7))) (* (sqrt -1) (+ (* -1/8 (pow im 4)) (* 1/32 (pow im 4)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* (sqrt re) (sqrt -1)) (+ (* (sqrt (/ 1 (pow re 7))) (* (sqrt -1) (+ (* -1/8 (pow im 4)) (* 1/32 (pow im 4))))) (* (sqrt (/ 1 (pow re 11))) (* (sqrt -1) (+ (* -1/32 (pow im 6)) (+ (* 1/384 (pow im 6)) (* 1/12 (pow im 6)))))))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (+ (sqrt re) (* 1/4 (* (/ (pow im 2) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (+ (sqrt re) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (pow (sqrt 2) 2)) (sqrt (/ 1 re)))) (* 1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (pow (sqrt 2) 2)))))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (+ (sqrt re) (* (pow im 2) (+ (* 1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (pow (sqrt 2) 2)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 re)) (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (pow (sqrt 2) 2)))) (* 1/2 (* (/ (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (pow (sqrt 2) 2)) (sqrt (/ 1 re)))))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (+ (* 1/2 (* (/ (pow im 2) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 2 (sqrt re)))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (+ (* 2 (sqrt re)) (* (pow im 2) (+ (* -1 (* (/ (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (pow (sqrt 2) 2)) (sqrt (/ 1 re)))) (* 1/2 (* (sqrt (/ 1 (pow re 3))) (/ 1 (pow (sqrt 2) 2)))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (+ (* 2 (sqrt re)) (* (pow im 2) (+ (* 1/2 (* (sqrt (/ 1 (pow re 3))) (/ 1 (pow (sqrt 2) 2)))) (* (pow im 2) (+ (* -1 (* (sqrt (/ 1 re)) (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (pow (sqrt 2) 2)))) (* (/ (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (pow (sqrt 2) 2)) (sqrt (/ 1 re))))))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt 2)))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ (* (sqrt re) (sqrt 2)) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt 2)) (sqrt (/ 1 re)))) (* 1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt 2)))))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ (* (sqrt re) (sqrt 2)) (* (pow im 2) (+ (* 1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt 2)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 re)) (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (sqrt 2)))) (* 1/2 (* (/ (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt 2)) (sqrt (/ 1 re)))))))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (+ (* 1/2 (/ (pow im 2) re)) (* 2 re))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (+ (* 2 re) (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (+ (* 2 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ re (* 1/2 (/ (pow im 2) re)))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))))
#s(approx im #s(hole binary64 im))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (+ (* -1/8 (* (* im (+ re (* -1 re))) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* im (+ (* -1/8 (* (sqrt (/ 1 (pow re 3))) (+ re (* -1 re)))) (* 1/4 (* (* im (- (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) re)) (* 1/16 (/ (pow (+ re (* -1 re)) 2) (* (pow re 3) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* im (+ (* -1/8 (* (sqrt (/ 1 (pow re 3))) (+ re (* -1 re)))) (* im (+ (* 1/4 (* (sqrt (/ 1 re)) (- (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) re)) (* 1/16 (/ (pow (+ re (* -1 re)) 2) (* (pow re 3) (pow (sqrt 2) 2))))))) (* 1/4 (* (* im (- (* -1/2 (/ (+ (* -1/2 (/ (* (+ re (* -1 re)) (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2)))))) (pow re 2))) (/ (* (+ re (* -1 re)) (- 1 (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) (pow re 2))) re)) (* -1/4 (/ (* (+ re (* -1 re)) (- (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) re)) (* 1/16 (/ (pow (+ re (* -1 re)) 2) (* (pow re 3) (pow (sqrt 2) 2)))))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (+ (* -1/4 (* (* im (+ re (* -1 re))) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (pow (sqrt 2) 2)))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (+ (* im (+ (* -1/4 (* (sqrt (/ 1 (pow re 3))) (+ re (* -1 re)))) (* 1/2 (* (* im (- (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) re)) (* 1/16 (/ (pow (+ re (* -1 re)) 2) (* (pow re 3) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))) (* (sqrt re) (pow (sqrt 2) 2)))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (+ (* im (+ (* -1/4 (* (sqrt (/ 1 (pow re 3))) (+ re (* -1 re)))) (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (- (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) re)) (* 1/16 (/ (pow (+ re (* -1 re)) 2) (* (pow re 3) (pow (sqrt 2) 2))))))) (* 1/2 (* (* im (- (* -1/2 (/ (+ (* -1/2 (/ (* (+ re (* -1 re)) (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2)))))) (pow re 2))) (/ (* (+ re (* -1 re)) (- 1 (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) (pow re 2))) re)) (* -1/4 (/ (* (+ re (* -1 re)) (- (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) re)) (* 1/16 (/ (pow (+ re (* -1 re)) 2) (* (pow re 3) (pow (sqrt 2) 2)))))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))) (* (sqrt re) (pow (sqrt 2) 2)))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (+ (* -1 (/ (* im (+ re (* -1 re))) re)) (* 4 re))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (+ (* 4 re) (* im (+ (* -1 (/ (+ re (* -1 re)) re)) (* im (- (/ 1 re) (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 3))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 3)))))))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (+ (* 4 re) (* im (+ (* -1 (/ (+ re (* -1 re)) re)) (* im (- (+ (* -1 (/ (* im (+ (* -1/2 (/ (* (+ re (* -1 re)) (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2)))))) (pow re 2))) (/ (* (+ re (* -1 re)) (- 1 (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) (pow re 2)))) re)) (/ 1 re)) (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 3))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 3)))))))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (+ (* -1/2 (/ (* im (+ re (* -1 re))) re)) (* 2 re))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (+ (* 2 re) (* im (+ (* -1/2 (/ (+ re (* -1 re)) re)) (* 1/2 (/ (* im (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2)))))) re)))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (+ (* 2 re) (* im (+ (* -1/2 (/ (+ re (* -1 re)) re)) (* im (+ (* -1/2 (/ (* im (+ (* -1/2 (/ (* (+ re (* -1 re)) (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2)))))) (pow re 2))) (/ (* (+ re (* -1 re)) (- 1 (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) (pow re 2)))) re)) (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) re)))))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (+ re (* -1/2 (/ (* im (+ re (* -1 re))) re)))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (+ re (* im (+ (* -1/2 (/ (+ re (* -1 re)) re)) (* 1/2 (/ (* im (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2)))))) re)))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (+ re (* im (+ (* -1/2 (/ (+ re (* -1 re)) re)) (* im (+ (* -1/2 (/ (* im (+ (* -1/2 (/ (* (+ re (* -1 re)) (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2)))))) (pow re 2))) (/ (* (+ re (* -1 re)) (- 1 (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) (pow re 2)))) re)) (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) re)))))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (+ (* -1/2 (/ (pow im 4) (pow re 2))) (pow re 2))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (+ (* (pow im 4) (- (* -1/8 (/ (pow im 4) (pow re 6))) (* 1/2 (/ 1 (pow re 2))))) (pow re 2))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (+ (* (pow im 4) (- (* (pow im 4) (- (* -1/16 (/ (pow im 4) (pow re 10))) (* 1/8 (/ 1 (pow re 6))))) (* 1/2 (/ 1 (pow re 2))))) (pow re 2))))
#s(approx (* (* (neg im) im) (* im im)) #s(hole binary64 (* -1 (pow im 4))))
#s(approx (* (neg im) im) #s(hole binary64 (* -1 (pow im 2))))
#s(approx (neg im) #s(hole binary64 (* -1 im)))
#s(approx (* im im) #s(hole binary64 (pow im 2)))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (+ re (* 1/2 (/ (* im (+ re (* -1 re))) re)))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (+ re (* im (+ (* -1/2 (/ (* im (+ 1 (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) re)) (* 1/2 (/ (+ re (* -1 re)) re)))))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (+ re (* im (+ (* 1/2 (/ (+ re (* -1 re)) re)) (* im (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2)))) re)) (* 1/4 (/ (* im (* (+ 1 (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2)))) (+ re (* -1 re)))) (pow re 3))))))))))
#s(approx (* (+ re im) (- re im)) #s(hole binary64 (+ (* im (+ re (* -1 re))) (pow re 2))))
#s(approx (* (+ re im) (- re im)) #s(hole binary64 (+ (* im (+ re (+ (* -1 im) (* -1 re)))) (pow re 2))))
#s(approx (- re im) #s(hole binary64 (+ re (* -1 im))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* -1/4 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/8 (sqrt (/ 1 (pow re 3)))))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/4 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (pow (sqrt 2) 2)))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* -1/2 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/4 (sqrt (/ 1 (pow re 3)))))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* 1/4 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/2 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (+ (* 4 re) (/ (pow im 2) re))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (+ (* 4 re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (+ (* 4 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ (* 1/2 (/ (pow im 2) re)) (* 2 re))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ (* 2 re) (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ (* 2 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* -1/4 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/8 (sqrt (/ 1 (pow re 3)))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/4 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (pow (sqrt 2) 2)))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* -1/2 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/4 (sqrt (/ 1 (pow re 3)))))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* 1/4 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/2 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (+ (* 4 re) (/ (pow im 2) re))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (+ (* 4 re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (+ (* 4 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (+ (* 1/2 (/ (pow im 2) re)) (* 2 re))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (+ (* 2 re) (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (+ (* 2 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (+ re (* 1/2 (/ (pow im 2) re)))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))))
#s(approx (pow im 6) #s(hole binary64 (pow im 6)))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) #s(hole binary64 (+ (* (pow im 2) (- (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (- (pow im 4) (* (* re re) (* im im))) #s(hole binary64 (* (pow im 2) (- (pow im 2) (pow re 2)))))
#s(approx (pow im 4) #s(hole binary64 (pow im 4)))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* -1/4 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/8 (sqrt (/ 1 (pow re 3)))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/4 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (pow (sqrt 2) 2)))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* -1/2 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/4 (sqrt (/ 1 (pow re 3)))))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* 1/4 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/2 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (+ (* 4 re) (/ (pow im 2) re))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (+ (* 4 re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (+ (* 4 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (+ (* 1/2 (/ (pow im 2) re)) (* 2 re))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (+ (* 2 re) (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (+ (* 2 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (* (pow 1 1/4) (sqrt re))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (* 1/4 (* (pow 1 1/4) (* (pow im 2) (sqrt (/ 1 (pow re 3)))))) (* (pow 1 1/4) (sqrt re)))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (* (pow 1 1/4) (sqrt re)) (* (pow im 2) (+ (* -3/32 (* (pow 1 1/4) (* (pow im 2) (sqrt (/ 1 (pow re 7)))))) (* 1/4 (* (pow 1 1/4) (sqrt (/ 1 (pow re 3))))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (* (pow 1 1/4) (sqrt re)) (* (pow im 2) (+ (* 1/4 (* (pow 1 1/4) (sqrt (/ 1 (pow re 3))))) (* (pow im 2) (+ (* -3/32 (* (pow 1 1/4) (sqrt (/ 1 (pow re 7))))) (* 7/128 (* (pow 1 1/4) (* (pow im 2) (sqrt (/ 1 (pow re 11)))))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (* (pow (pow 1 3) 1/8) (pow re 1/4))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (pow 1 3) 1/8) (* (pow im 2) (pow (/ 1 (pow re 7)) 1/4)))) (* (pow (pow 1 3) 1/8) (pow re 1/4)))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* (pow im 2) (+ (* -7/128 (* (pow (pow 1 3) 1/8) (* (pow im 2) (pow (/ 1 (pow re 15)) 1/4)))) (* 1/8 (* (pow (pow 1 3) 1/8) (pow (/ 1 (pow re 7)) 1/4))))) (* (pow (pow 1 3) 1/8) (pow re 1/4)))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* (pow im 2) (+ (* 1/8 (* (pow (pow 1 3) 1/8) (pow (/ 1 (pow re 7)) 1/4))) (* (pow im 2) (+ (* -7/128 (* (pow (pow 1 3) 1/8) (pow (/ 1 (pow re 15)) 1/4))) (* 35/1024 (* (pow (pow 1 3) 1/8) (* (pow im 2) (pow (/ 1 (pow re 23)) 1/4)))))))) (* (pow (pow 1 3) 1/8) (pow re 1/4)))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ re (* 1/2 (/ (pow im 2) re)))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (* (pow 1 1/4) (sqrt re))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (* 1/4 (* (pow 1 1/4) (* (pow im 2) (sqrt (/ 1 (pow re 3)))))) (* (pow 1 1/4) (sqrt re)))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (* (pow 1 1/4) (sqrt re)) (* (pow im 2) (+ (* -3/32 (* (pow 1 1/4) (* (pow im 2) (sqrt (/ 1 (pow re 7)))))) (* 1/4 (* (pow 1 1/4) (sqrt (/ 1 (pow re 3))))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (* (pow 1 1/4) (sqrt re)) (* (pow im 2) (+ (* 1/4 (* (pow 1 1/4) (sqrt (/ 1 (pow re 3))))) (* (pow im 2) (+ (* -3/32 (* (pow 1 1/4) (sqrt (/ 1 (pow re 7))))) (* 7/128 (* (pow 1 1/4) (* (pow im 2) (sqrt (/ 1 (pow re 11)))))))))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (/ 1 (sqrt 2))))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (* im (+ (* 2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (+ (* 2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (+ (* 2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* im (+ (sqrt (/ 1 im)) (* 1/2 (* (sqrt (/ 1 (pow im 3))) re))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* im (+ (sqrt (/ 1 im)) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) re)))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* im (+ (sqrt (/ 1 im)) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) re))))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* im (+ 1 (/ re im)))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* im (+ 1 (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* (sqrt 2) (+ re (* 1/2 (+ re (* -1 re))))))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2))))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* (sqrt 2) (+ re (* 1/2 (+ re (* -1 re))))))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2))))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* (sqrt 2) (+ re (* 1/2 (+ re (* -1 re))))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 7))) (* (sqrt 2) (- (* -1/2 (+ (* -1 (* (pow re 2) (+ re (* -1 re)))) (+ (* -1/2 (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))))) (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (* -1 (pow (+ re (* -1 re)) 2))))))) (* 1/4 (* im (pow (+ re (* 1/2 (+ re (* -1 re)))) 2))))))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (sqrt 2) (+ re (* 1/2 (+ re (* -1 re))))))) (* (sqrt (/ 1 im)) (sqrt 2))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2))))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (sqrt 2) (+ re (* 1/2 (+ re (* -1 re))))))) (* (sqrt (/ 1 im)) (sqrt 2)))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2))))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (sqrt 2) (+ re (* 1/2 (+ re (* -1 re))))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 7))) (* (sqrt 2) (- (* -1/2 (+ (* -1 (* (pow re 2) (+ re (* -1 re)))) (+ (* -1/2 (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))))) (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (* -1 (pow (+ re (* -1 re)) 2))))))) (* 1/4 (* im (pow (+ re (* 1/2 (+ re (* -1 re)))) 2))))))) (* (sqrt (/ 1 im)) (sqrt 2))))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (* im (+ 2 (* 2 (/ (+ re (* 1/2 (+ re (* -1 re)))) im))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (* im (+ 2 (+ (* -1 (/ (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))) (pow im 2))) (* 2 (/ (+ re (* 1/2 (+ re (* -1 re)))) im)))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (* im (+ 2 (+ (* -1 (/ (+ (* -1 (* (pow re 2) (+ re (* -1 re)))) (+ (* -1/2 (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))))) (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (* -1 (pow (+ re (* -1 re)) 2)))))) (pow im 3))) (+ (* -1 (/ (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))) (pow im 2))) (* 2 (/ (+ re (* 1/2 (+ re (* -1 re)))) im))))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (* im (+ 1 (+ (* 1/2 (/ (+ re (* -1 re)) im)) (/ re im))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (* im (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))) (pow im 2))) (+ (* 1/2 (/ (+ re (* -1 re)) im)) (/ re im)))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (* im (+ 1 (+ (* -1/2 (/ (+ (* -1 (* (pow re 2) (+ re (* -1 re)))) (+ (* -1/2 (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))))) (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (* -1 (pow (+ re (* -1 re)) 2)))))) (pow im 3))) (+ (* -1/2 (/ (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))) (pow im 2))) (+ (* 1/2 (/ (+ re (* -1 re)) im)) (/ re im))))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* im (+ 1 (* 1/2 (/ (+ re (* -1 re)) im))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* im (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))) (pow im 2))) (* 1/2 (/ (+ re (* -1 re)) im)))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* im (+ 1 (+ (* -1/2 (/ (+ (* -1 (* (pow re 2) (+ re (* -1 re)))) (+ (* -1/2 (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))))) (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (* -1 (pow (+ re (* -1 re)) 2)))))) (pow im 3))) (+ (* -1/2 (/ (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))) (pow im 2))) (* 1/2 (/ (+ re (* -1 re)) im))))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (* (pow im 2) (+ (sqrt -1) (* 1/2 (/ (pow re 4) (* (pow im 4) (sqrt -1))))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (* (pow im 2) (+ (sqrt -1) (+ (* -1/8 (/ (pow re 8) (* (pow im 8) (pow (sqrt -1) 3)))) (* 1/2 (/ (pow re 4) (* (pow im 4) (sqrt -1)))))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (* (pow im 2) (+ (sqrt -1) (+ (* -1/8 (/ (pow re 8) (* (pow im 8) (pow (sqrt -1) 3)))) (+ (* 1/16 (/ (pow re 12) (* (pow im 12) (pow (sqrt -1) 5)))) (* 1/2 (/ (pow re 4) (* (pow im 4) (sqrt -1))))))))))
#s(approx (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im))) #s(hole binary64 (* (pow im 4) (- (/ (pow re 4) (pow im 4)) 1))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* im (+ (sqrt -1) (* 1/2 (/ (+ re (* -1 re)) (* im (sqrt -1))))))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* im (+ (sqrt -1) (+ (* 1/2 (/ (+ re (* -1 re)) (* im (sqrt -1)))) (* 1/2 (/ (- (pow re 2) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow (sqrt -1) 2)))) (* (pow im 2) (sqrt -1)))))))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* im (+ (sqrt -1) (+ (* -1/4 (/ (* (+ re (* -1 re)) (- (pow re 2) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow (sqrt -1) 2))))) (* (pow im 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (+ re (* -1 re)) (* im (sqrt -1)))) (* 1/2 (/ (- (pow re 2) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow (sqrt -1) 2)))) (* (pow im 2) (sqrt -1))))))))))
#s(approx (* (+ re im) (- re im)) #s(hole binary64 (* (pow im 2) (- (+ (* -1 (/ re im)) (/ re im)) 1))))
#s(approx (* (+ re im) (- re im)) #s(hole binary64 (* (pow im 2) (- (+ (* -1 (/ re im)) (+ (/ re im) (/ (pow re 2) (pow im 2)))) 1))))
#s(approx (+ re im) #s(hole binary64 (* im (+ 1 (/ re im)))))
#s(approx (- re im) #s(hole binary64 (* im (- (/ re im) 1))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (+ (* -1 (pow re 2)) (* 1/2 (pow re 2)))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (+ (* -1 (pow re 2)) (* 1/2 (pow re 2)))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 7))) (* (sqrt 2) (+ (* 1/4 (* im (pow re 2))) (+ (* 1/2 (pow re 3)) (* re (+ (* -1 (pow re 2)) (* 1/2 (pow re 2))))))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (+ (* -1 (pow re 2)) (* 1/2 (pow re 2)))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (+ (* -1 (pow re 2)) (* 1/2 (pow re 2)))))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 7))) (* (sqrt 2) (+ (* 1/4 (* im (pow re 2))) (+ (* 1/2 (pow re 3)) (* re (+ (* -1 (pow re 2)) (* 1/2 (pow re 2))))))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* im (+ 2 (* 2 (/ re im))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* im (- (+ 2 (* -1 (/ (+ (* -2 (pow re 2)) (pow re 2)) (pow im 2)))) (* -2 (/ re im))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* im (- (+ 2 (* -1 (/ (+ (* re (+ (* -2 (pow re 2)) (pow re 2))) (pow re 3)) (pow im 3)))) (+ (* -2 (/ re im)) (+ (* -2 (/ (pow re 2) (pow im 2))) (/ (pow re 2) (pow im 2))))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* im (+ 1 (/ re im)))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* im (- (+ 1 (* -1 (/ (+ (* -1 (pow re 2)) (* 1/2 (pow re 2))) (pow im 2)))) (* -1 (/ re im))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* im (- (+ 1 (* -1 (/ (+ (* 1/2 (pow re 3)) (* re (+ (* -1 (pow re 2)) (* 1/2 (pow re 2))))) (pow im 3)))) (+ (* -1 (/ re im)) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (pow (sqrt (+ (* re re) (* im im))) 2) #s(hole binary64 (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* im (+ 1 (* -1 (/ re im))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (* im (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* im (+ 2 (* 2 (/ re im))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* im (+ 2 (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2)))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* im (+ 2 (+ (* -1 (/ (+ (* -1 (pow re 4)) (+ (* 1/4 (pow re 4)) (pow re 4))) (pow im 4))) (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2))))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* im (+ 1 (/ re im)))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* im (+ 1 (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* im (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow re 4)) (+ (* 1/4 (pow re 4)) (pow re 4))) (pow im 4))) (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im)))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* im (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow re 4)) (+ (* 1/4 (pow re 4)) (pow re 4))) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* im (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow re 4)) (+ (* 1/4 (pow re 4)) (pow re 4))) (pow im 4))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow re 2) (+ (* -1 (pow re 4)) (+ (* 1/4 (pow re 4)) (pow re 4))))) (* (pow re 2) (+ (* -1 (pow re 4)) (pow re 4)))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) #s(hole binary64 (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) #s(hole binary64 (* (pow im 2) (- (+ 1 (* -1 (/ (+ (* -1 (pow re 4)) (pow re 4)) (pow im 4)))) (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) #s(hole binary64 (* (pow im 2) (- (+ 1 (* -1 (/ (* (pow re 2) (+ (* -1 (pow re 4)) (pow re 4))) (pow im 6)))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* -1 (/ (pow re 4) (pow im 4))) (/ (pow re 4) (pow im 4))))))))
#s(approx (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) #s(hole binary64 (* (pow im 6) (+ 1 (/ (pow re 6) (pow im 6))))))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) #s(hole binary64 (* (pow im 4) (+ 1 (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) #s(hole binary64 (* (pow im 4) (- (+ 1 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
#s(approx (- (pow im 4) (* (* re re) (* im im))) #s(hole binary64 (* (pow im 4) (+ 1 (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (* im (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* im (+ 2 (* 2 (/ re im))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* im (+ 2 (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2)))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* im (+ 2 (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2))))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* im (+ 1 (/ re im)))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* im (+ 1 (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im)))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (sqrt im)))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (sqrt im) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (pow re 2))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (sqrt im) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (pow re 2))) (* (sqrt (/ 1 (pow im 7))) (+ (* -1/8 (pow re 4)) (* 1/32 (pow re 4))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (sqrt im) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (pow re 2))) (+ (* (sqrt (/ 1 (pow im 7))) (+ (* -1/8 (pow re 4)) (* 1/32 (pow re 4)))) (* (sqrt (/ 1 (pow im 11))) (+ (* -1/32 (pow re 6)) (+ (* 1/384 (pow re 6)) (* 1/12 (pow re 6))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (pow (* 1 im) 1/4)))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (/ 1 (pow im 7)) 1/4) (pow re 2))) (pow (* 1 im) 1/4))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (/ 1 (pow im 7)) 1/4) (pow re 2))) (+ (* (pow (/ 1 (pow im 15)) 1/4) (+ (* -1/16 (pow re 4)) (* 1/128 (pow re 4)))) (pow (* 1 im) 1/4)))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (/ 1 (pow im 7)) 1/4) (pow re 2))) (+ (* (pow (/ 1 (pow im 15)) 1/4) (+ (* -1/16 (pow re 4)) (* 1/128 (pow re 4)))) (+ (* (pow (/ 1 (pow im 23)) 1/4) (+ (* -1/128 (pow re 6)) (+ (* 1/3072 (pow re 6)) (* 1/24 (pow re 6))))) (pow (* 1 im) 1/4))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (sqrt im)))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (sqrt im) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (pow re 2))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (sqrt im) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (pow re 2))) (* (sqrt (/ 1 (pow im 7))) (+ (* -1/8 (pow re 4)) (* 1/32 (pow re 4))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (sqrt im) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (pow re 2))) (+ (* (sqrt (/ 1 (pow im 7))) (+ (* -1/8 (pow re 4)) (* 1/32 (pow re 4)))) (* (sqrt (/ 1 (pow im 11))) (+ (* -1/32 (pow re 6)) (+ (* 1/384 (pow re 6)) (* 1/12 (pow re 6))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 2) #s(hole binary64 (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (* -1 (* (sqrt im) (/ (sqrt -1) (sqrt 2))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (/ (sqrt -1) (sqrt 2))))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (/ (sqrt -1) (sqrt 2)))))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* 1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (/ (sqrt -1) (sqrt 2)))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (* -2 (* (sqrt im) (/ (sqrt -1) (sqrt 2))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (* -1 (* im (+ (* 2 (* (sqrt (/ 1 im)) (/ (sqrt -1) (sqrt 2)))) (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (+ (* 2 (* (sqrt (/ 1 im)) (/ (sqrt -1) (sqrt 2)))) (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (* -1 (* im (+ (* -1 (/ (+ (* 1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2))))) (pow im 3))) (+ (* 2 (* (sqrt (/ 1 im)) (/ (sqrt -1) (sqrt 2)))) (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* -1 (* (sqrt im) (sqrt -1)))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1)))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt -1)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (sqrt -1)))) (* 1/4 (* (sqrt im) (* (pow re 2) (sqrt -1))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 im)))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ re im)))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (+ re (* -1/2 (/ (pow re 2) im))) im)))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (+ re (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im))) im)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 im)))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* (sqrt -1) (* (sqrt 2) (+ re (* 1/2 (+ re (* -1 re)))))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (* -1 (* im (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* (sqrt -1) (* (sqrt 2) (+ re (* 1/2 (+ re (* -1 re)))))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (* -1 (* im (+ (* -1 (/ (+ (* -1/4 (* (sqrt (/ 1 im)) (* (sqrt -1) (* (sqrt 2) (- (* -1/2 (+ (* -1 (* (pow re 2) (+ re (* -1 re)))) (+ (* -1/2 (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))))) (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (* -1 (pow (+ re (* -1 re)) 2))))))) (* -1/4 (* im (pow (+ re (* 1/2 (+ re (* -1 re)))) 2)))))))) (* -1/8 (* (sqrt im) (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2))))))))) (pow im 3))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* (sqrt -1) (* (sqrt 2) (+ re (* 1/2 (+ re (* -1 re)))))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (sqrt -1) (* (sqrt 2) (+ re (* 1/2 (+ re (* -1 re)))))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (sqrt -1) (* (sqrt 2) (+ re (* 1/2 (+ re (* -1 re)))))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (* -1 (* im (+ (* -1 (/ (+ (* -1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (* (sqrt 2) (- (* -1/2 (+ (* -1 (* (pow re 2) (+ re (* -1 re)))) (+ (* -1/2 (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))))) (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (* -1 (pow (+ re (* -1 re)) 2))))))) (* -1/4 (* im (pow (+ re (* 1/2 (+ re (* -1 re)))) 2)))))))) (* -1/4 (* (sqrt im) (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2))))))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (sqrt -1) (* (sqrt 2) (+ re (* 1/2 (+ re (* -1 re)))))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (* -2 im)))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (* -1 (* im (+ 2 (* -2 (/ (+ re (* 1/2 (+ re (* -1 re)))) im)))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (pow re 2) im)) (+ (* -1 (/ (pow (+ re (* -1 re)) 2) im)) (+ (* 1/4 (/ (pow (+ re (* -1 re)) 2) im)) (* 2 (+ re (* 1/2 (+ re (* -1 re)))))))) im)))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (+ (* -1 (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2))))) (+ (* -1 (/ (* (pow re 2) (+ re (* -1 re))) im)) (+ (* -1/2 (/ (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2))))) im)) (/ (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (* -1 (pow (+ re (* -1 re)) 2)))) im)))) im)) (* 2 (+ re (* 1/2 (+ re (* -1 re)))))) im)))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (* -1 im)))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (+ re (* 1/2 (+ re (* -1 re)))) im)))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (+ re (+ (* 1/2 (+ re (* -1 re))) (* 1/2 (/ (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))) im)))) im)))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (+ re (+ (* -1 (/ (+ (* -1/2 (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2))))) (* 1/2 (/ (+ (* -1 (* (pow re 2) (+ re (* -1 re)))) (+ (* -1/2 (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))))) (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (* -1 (pow (+ re (* -1 re)) 2)))))) im))) im)) (* 1/2 (+ re (* -1 re))))) im)))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* -1 im)))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* -1 (* im (+ 1 (* -1/2 (/ (+ re (* -1 re)) im)))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (+ (* 1/2 (+ re (* -1 re))) (* 1/2 (/ (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))) im))) im)))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2))))) (* 1/2 (/ (+ (* -1 (* (pow re 2) (+ re (* -1 re)))) (+ (* -1/2 (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))))) (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (* -1 (pow (+ re (* -1 re)) 2)))))) im))) im)) (* 1/2 (+ re (* -1 re)))) im)))))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* -1 (* im (sqrt -1)))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* -1 (* im (+ (sqrt -1) (* -1/2 (/ (+ re (* -1 re)) (* im (sqrt -1)))))))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* -1 (* im (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (- (pow re 2) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow (sqrt -1) 2)))) (* im (sqrt -1)))) (* 1/2 (/ (+ re (* -1 re)) (sqrt -1)))) im)))))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* -1 (* im (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ re (* -1 re)) (- (pow re 2) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow (sqrt -1) 2))))) (* im (pow (sqrt -1) 3)))) (* 1/2 (/ (- (pow re 2) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow (sqrt -1) 2)))) (sqrt -1)))) im)) (* 1/2 (/ (+ re (* -1 re)) (sqrt -1)))) im)))))))
#s(approx (* (+ re im) (- re im)) #s(hole binary64 (* (pow im 2) (- (* -1 (/ (+ re (* -1 re)) im)) 1))))
#s(approx (* (+ re im) (- re im)) #s(hole binary64 (* (pow im 2) (- (* -1 (/ (+ re (+ (* -1 re) (* -1 (/ (pow re 2) im)))) im)) 1))))
#s(approx (+ re im) #s(hole binary64 (* -1 (* im (- (* -1 (/ re im)) 1)))))
#s(approx (- re im) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ re im)))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow re 2)) (* 1/2 (pow re 2))))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (* -1 (* im (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow re 2)) (* 1/2 (pow re 2))))))) (* 1/4 (* (sqrt (/ 1 im)) (* (sqrt -1) (* (sqrt 2) (+ (* -1/4 (* im (pow re 2))) (+ (* 1/2 (pow re 3)) (* re (+ (* -1 (pow re 2)) (* 1/2 (pow re 2))))))))))) (pow im 3))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow re 2)) (* 1/2 (pow re 2))))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (* -1 (* im (+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow re 2)) (* 1/2 (pow re 2))))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (* (sqrt 2) (+ (* -1/4 (* im (pow re 2))) (+ (* 1/2 (pow re 3)) (* re (+ (* -1 (pow re 2)) (* 1/2 (pow re 2))))))))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* -2 im)))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* -1 (* im (+ 2 (* -2 (/ re im)))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* -1 (* im (+ 2 (* -1 (/ (- (+ (* -2 (/ (pow re 2) im)) (/ (pow re 2) im)) (* -2 re)) im)))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* -1 (* im (+ 2 (* -1 (/ (- (* -1 (/ (- (+ (/ (* re (+ (* -2 (pow re 2)) (pow re 2))) im) (/ (pow re 3) im)) (+ (* -2 (pow re 2)) (pow re 2))) im)) (* -2 re)) im)))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* -1 im)))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ re im)))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (- (+ (* -1 (/ (pow re 2) im)) (* 1/2 (/ (pow re 2) im))) (* -1 re)) im)))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (- (+ (* 1/2 (/ (pow re 3) im)) (/ (* re (+ (* -1 (pow re 2)) (* 1/2 (pow re 2)))) im)) (+ (* -1 (pow re 2)) (* 1/2 (pow re 2)))) im)) (* -1 re)) im)))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 im)))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 (* im (+ 1 (/ re im))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* -2 im)))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* -1 (* im (+ 2 (* -2 (/ re im)))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (pow re 2) im)) (* 2 re)) im)))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow re 4)) (+ (* 1/4 (pow re 4)) (pow re 4))) (pow im 2))) (pow re 2)) im)) (* 2 re)) im)))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* -1 im)))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ re im)))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (+ re (* -1/2 (/ (pow re 2) im))) im)))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (+ re (* -1 (/ (+ (* -1/2 (/ (+ (* -1 (pow re 4)) (+ (* 1/4 (pow re 4)) (pow re 4))) (pow im 2))) (* 1/2 (pow re 2))) im))) im)))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* -1 im)))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow re 4)) (+ (* 1/4 (pow re 4)) (pow re 4))) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow re 4)) (+ (* 1/4 (pow re 4)) (pow re 4))) (pow im 4))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow re 2) (+ (* -1 (pow re 4)) (+ (* 1/4 (pow re 4)) (pow re 4))))) (* (pow re 2) (+ (* -1 (pow re 4)) (pow re 4)))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* -2 im)))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* -1 (* im (+ 2 (* -2 (/ re im)))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (pow re 2) im)) (* 2 re)) im)))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im)) (* 2 re)) im)))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* -1 im)))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ re im)))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (+ re (* -1/2 (/ (pow re 2) im))) im)))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (+ re (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im))) im)))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (* (sqrt im) (sqrt -1))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1)))) (* (sqrt im) (sqrt -1)))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1)))) (+ (* (sqrt im) (sqrt -1)) (* (sqrt (/ 1 (pow im 7))) (* (sqrt -1) (+ (* -1/8 (pow re 4)) (* 1/32 (pow re 4)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1)))) (+ (* (sqrt im) (sqrt -1)) (+ (* (sqrt (/ 1 (pow im 7))) (* (sqrt -1) (+ (* -1/8 (pow re 4)) (* 1/32 (pow re 4))))) (* (sqrt (/ 1 (pow im 11))) (* (sqrt -1) (+ (* -1/32 (pow re 6)) (+ (* 1/384 (pow re 6)) (* 1/12 (pow re 6)))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (pow (* -1 im) 1/4)))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (/ -1 (pow im 7)) 1/4) (pow re 2))) (pow (* -1 im) 1/4))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (/ -1 (pow im 7)) 1/4) (pow re 2))) (+ (* (pow (/ -1 (pow im 15)) 1/4) (+ (* -1/16 (pow re 4)) (* 1/128 (pow re 4)))) (pow (* -1 im) 1/4)))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (/ -1 (pow im 7)) 1/4) (pow re 2))) (+ (* (pow (/ -1 (pow im 15)) 1/4) (+ (* -1/16 (pow re 4)) (* 1/128 (pow re 4)))) (+ (* (pow (/ -1 (pow im 23)) 1/4) (+ (* -1/128 (pow re 6)) (+ (* 1/3072 (pow re 6)) (* 1/24 (pow re 6))))) (pow (* -1 im) 1/4))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 im)))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (* (sqrt im) (sqrt -1))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1)))) (* (sqrt im) (sqrt -1)))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1)))) (+ (* (sqrt im) (sqrt -1)) (* (sqrt (/ 1 (pow im 7))) (* (sqrt -1) (+ (* -1/8 (pow re 4)) (* 1/32 (pow re 4)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1)))) (+ (* (sqrt im) (sqrt -1)) (+ (* (sqrt (/ 1 (pow im 7))) (* (sqrt -1) (+ (* -1/8 (pow re 4)) (* 1/32 (pow re 4))))) (* (sqrt (/ 1 (pow im 11))) (* (sqrt -1) (+ (* -1/32 (pow re 6)) (+ (* 1/384 (pow re 6)) (* 1/12 (pow re 6)))))))))))

Calls

6 calls:

Time	Variable		Point	Expression
143.0ms	re	@	0	((* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (+ (sqrt (+ (* re re) (* im im))) re) (sqrt (+ (* re re) (* im im))) re im (/ 2 (sqrt 2)) 2 (sqrt 2) 1/2 (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im))) (* re re) (* (* (neg im) im) (* im im)) (* (neg im) im) (neg im) (* im im) (sqrt (* (+ re im) (- re im))) (* (+ re im) (- re im)) (+ re im) (- re im) (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (pow (sqrt (+ (* re re) (* im im))) 2) (- (sqrt (+ (* re re) (* im im))) re) (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (* (* (neg re) re) re) (* (neg re) re) (neg re) (pow im 6) 6 (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) (pow re 4) 4 (- (pow im 4) (* (* re re) (* im im))) (pow im 4) (* (* re re) (* im im)) (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (sqrt (+ (* im im) (* re re))) 1/4) (sqrt (+ (* im im) (* re re))) 1/4 (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) (pow (sqrt (+ (* im im) (* re re))) 2))
88.0ms	im	@	inf	((* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (+ (sqrt (+ (* re re) (* im im))) re) (sqrt (+ (* re re) (* im im))) re im (/ 2 (sqrt 2)) 2 (sqrt 2) 1/2 (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im))) (* re re) (* (* (neg im) im) (* im im)) (* (neg im) im) (neg im) (* im im) (sqrt (* (+ re im) (- re im))) (* (+ re im) (- re im)) (+ re im) (- re im) (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (pow (sqrt (+ (* re re) (* im im))) 2) (- (sqrt (+ (* re re) (* im im))) re) (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (* (* (neg re) re) re) (* (neg re) re) (neg re) (pow im 6) 6 (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) (pow re 4) 4 (- (pow im 4) (* (* re re) (* im im))) (pow im 4) (* (* re re) (* im im)) (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (sqrt (+ (* im im) (* re re))) 1/4) (sqrt (+ (* im im) (* re re))) 1/4 (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) (pow (sqrt (+ (* im im) (* re re))) 2))
47.0ms	re	@	inf	((* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (+ (sqrt (+ (* re re) (* im im))) re) (sqrt (+ (* re re) (* im im))) re im (/ 2 (sqrt 2)) 2 (sqrt 2) 1/2 (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im))) (* re re) (* (* (neg im) im) (* im im)) (* (neg im) im) (neg im) (* im im) (sqrt (* (+ re im) (- re im))) (* (+ re im) (- re im)) (+ re im) (- re im) (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (pow (sqrt (+ (* re re) (* im im))) 2) (- (sqrt (+ (* re re) (* im im))) re) (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (* (* (neg re) re) re) (* (neg re) re) (neg re) (pow im 6) 6 (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) (pow re 4) 4 (- (pow im 4) (* (* re re) (* im im))) (pow im 4) (* (* re re) (* im im)) (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (sqrt (+ (* im im) (* re re))) 1/4) (sqrt (+ (* im im) (* re re))) 1/4 (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) (pow (sqrt (+ (* im im) (* re re))) 2))
39.0ms	re	@	-inf	((* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (+ (sqrt (+ (* re re) (* im im))) re) (sqrt (+ (* re re) (* im im))) re im (/ 2 (sqrt 2)) 2 (sqrt 2) 1/2 (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im))) (* re re) (* (* (neg im) im) (* im im)) (* (neg im) im) (neg im) (* im im) (sqrt (* (+ re im) (- re im))) (* (+ re im) (- re im)) (+ re im) (- re im) (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (pow (sqrt (+ (* re re) (* im im))) 2) (- (sqrt (+ (* re re) (* im im))) re) (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (* (* (neg re) re) re) (* (neg re) re) (neg re) (pow im 6) 6 (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) (pow re 4) 4 (- (pow im 4) (* (* re re) (* im im))) (pow im 4) (* (* re re) (* im im)) (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (sqrt (+ (* im im) (* re re))) 1/4) (sqrt (+ (* im im) (* re re))) 1/4 (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) (pow (sqrt (+ (* im im) (* re re))) 2))
39.0ms	im	@	-inf	((* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (+ (sqrt (+ (* re re) (* im im))) re) (sqrt (+ (* re re) (* im im))) re im (/ 2 (sqrt 2)) 2 (sqrt 2) 1/2 (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im))) (* re re) (* (* (neg im) im) (* im im)) (* (neg im) im) (neg im) (* im im) (sqrt (* (+ re im) (- re im))) (* (+ re im) (- re im)) (+ re im) (- re im) (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (pow (sqrt (+ (* re re) (* im im))) 2) (- (sqrt (+ (* re re) (* im im))) re) (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (* (* (neg re) re) re) (* (neg re) re) (neg re) (pow im 6) 6 (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) (pow re 4) 4 (- (pow im 4) (* (* re re) (* im im))) (pow im 4) (* (* re re) (* im im)) (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (sqrt (+ (* im im) (* re re))) 1/4) (sqrt (+ (* im im) (* re re))) 1/4 (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) (pow (sqrt (+ (* im im) (* re re))) 2))

rewrite374.0ms (10.4%)

Memory

3.4MiB live, 654.3MiB allocated; 107ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	3358	41875
0	3458	38215
0	10502	36792

Stop Event

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

Counts

808 → 894

Calls

Call 1

Inputs
(.f64 (.f64 (sqrt.f64 (+.f64 (hypot.f64 re im) re)) (/.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 (+.f64 (hypot.f64 re im) re)) (/.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(sqrt.f64 (+.f64 (hypot.f64 re im) re))
(+.f64 (hypot.f64 re im) re)
(hypot.f64 re im)
re
im
(/.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))
#s(literal 2 binary64)
(sqrt.f64 #s(literal 2 binary64))
#s(literal 1/2 binary64)
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 (sqrt.f64 (fma.f64 (.f64 re re) (.f64 re re) (.f64 (.f64 (neg.f64 im) im) (.f64 im im)))) (sqrt.f64 (.f64 (+.f64 re im) (-.f64 re im)))) re))))
(sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (/.f64 (sqrt.f64 (fma.f64 (.f64 re re) (.f64 re re) (.f64 (.f64 (neg.f64 im) im) (.f64 im im)))) (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im)))) re)))
(.f64 #s(literal 2 binary64) (+.f64 (/.f64 (sqrt.f64 (fma.f64 (.f64 re re) (.f64 re re) (.f64 (.f64 (neg.f64 im) im) (.f64 im im)))) (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im)))) re))
(+.f64 (/.f64 (sqrt.f64 (fma.f64 (.f64 re re) (.f64 re re) (.f64 (.f64 (neg.f64 im) im) (.f64 im im)))) (sqrt.f64 (.f64 (+.f64 re im) (-.f64 re im)))) re)
(/.f64 (sqrt.f64 (fma.f64 (.f64 re re) (.f64 re re) (.f64 (.f64 (neg.f64 im) im) (.f64 im im)))) (sqrt.f64 (.f64 (+.f64 re im) (-.f64 re im))))
(sqrt.f64 (fma.f64 (.f64 re re) (.f64 re re) (.f64 (.f64 (neg.f64 im) im) (*.f64 im im))))
(fma.f64 (.f64 re re) (.f64 re re) (.f64 (.f64 (neg.f64 im) im) (*.f64 im im)))
(*.f64 re re)
(.f64 (.f64 (neg.f64 im) im) (*.f64 im im))
(*.f64 (neg.f64 im) im)
(neg.f64 im)
(*.f64 im im)
(sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im)))
(*.f64 (+.f64 re im) (-.f64 re im))
(+.f64 re im)
(-.f64 re im)
(.f64 (sqrt.f64 (.f64 (/.f64 (-.f64 (pow.f64 (hypot.f64 re im) #s(literal 2 binary64)) (*.f64 re re)) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(sqrt.f64 (.f64 (/.f64 (-.f64 (pow.f64 (hypot.f64 re im) #s(literal 2 binary64)) (.f64 re re)) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64)))
(.f64 (/.f64 (-.f64 (pow.f64 (hypot.f64 re im) #s(literal 2 binary64)) (.f64 re re)) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64))
(/.f64 (-.f64 (pow.f64 (hypot.f64 re im) #s(literal 2 binary64)) (*.f64 re re)) (-.f64 (hypot.f64 re im) re))
(-.f64 (pow.f64 (hypot.f64 re im) #s(literal 2 binary64)) (*.f64 re re))
(pow.f64 (hypot.f64 re im) #s(literal 2 binary64))
(-.f64 (hypot.f64 re im) re)
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (/.f64 (fma.f64 (.f64 (.f64 (neg.f64 re) re) re) (.f64 (.f64 (neg.f64 re) re) re) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (*.f64 im im)))))) re))))
(sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (/.f64 (fma.f64 (.f64 (.f64 (neg.f64 re) re) re) (.f64 (.f64 (neg.f64 re) re) re) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 im im)))))) re)))
(.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (/.f64 (fma.f64 (.f64 (.f64 (neg.f64 re) re) re) (.f64 (.f64 (neg.f64 re) re) re) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 im im)))))) re))
(+.f64 (sqrt.f64 (/.f64 (fma.f64 (.f64 (.f64 (neg.f64 re) re) re) (.f64 (.f64 (neg.f64 re) re) re) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (*.f64 im im)))))) re)
(sqrt.f64 (/.f64 (fma.f64 (.f64 (.f64 (neg.f64 re) re) re) (.f64 (.f64 (neg.f64 re) re) re) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (*.f64 im im))))))
(/.f64 (fma.f64 (.f64 (.f64 (neg.f64 re) re) re) (.f64 (.f64 (neg.f64 re) re) re) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (*.f64 im im)))))
(fma.f64 (.f64 (.f64 (neg.f64 re) re) re) (.f64 (.f64 (neg.f64 re) re) re) (pow.f64 im #s(literal 6 binary64)))
(.f64 (.f64 (neg.f64 re) re) re)
(*.f64 (neg.f64 re) re)
(neg.f64 re)
(pow.f64 im #s(literal 6 binary64))
#s(literal 6 binary64)
(+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (*.f64 im im))))
(pow.f64 re #s(literal 4 binary64))
#s(literal 4 binary64)
(-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (*.f64 im im)))
(pow.f64 im #s(literal 4 binary64))
(.f64 (.f64 re re) (*.f64 im im))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) re))))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) re)))
(*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) re))
(fma.f64 (pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) #s(literal 2 binary64)) (pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/4 binary64)) re)
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64))
(hypot.f64 im re)
#s(literal 1/4 binary64)
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(pow.f64 (hypot.f64 im re) #s(literal 2 binary64))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (* (sqrt im) (/ 1 (sqrt 2)))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 im)) (/ re (sqrt 2)))) (* (sqrt im) (/ 1 (sqrt 2))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (+ (* re (+ (* 1/8 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))))) (* (sqrt im) (/ 1 (sqrt 2))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (/ re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (/ 1 (sqrt 2)))))))) (* (sqrt im) (/ 1 (sqrt 2))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (* 2 (* (sqrt im) (/ 1 (sqrt 2))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (+ (* 2 (* (sqrt im) (/ 1 (sqrt 2)))) (* (sqrt (/ 1 im)) (/ re (sqrt 2))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (+ (* 2 (* (sqrt im) (/ 1 (sqrt 2)))) (* re (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (/ 1 (sqrt 2))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (+ (* 2 (* (sqrt im) (/ 1 (sqrt 2)))) (* re (+ (* re (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (/ re (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (/ 1 (sqrt 2)))))) (* (sqrt (/ 1 im)) (/ 1 (sqrt 2))))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (sqrt im)))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ (sqrt im) (* 1/2 (* (sqrt (/ 1 im)) re)))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ (sqrt im) (* re (+ (* 1/8 (* (sqrt (/ 1 (pow im 3))) re)) (* 1/2 (sqrt (/ 1 im))))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ (sqrt im) (* re (+ (* 1/2 (sqrt (/ 1 im))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) re)) (* 1/8 (sqrt (/ 1 (pow im 3)))))))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 im))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (+ im re)))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (+ im (* re (+ 1 (* 1/2 (/ re im)))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (+ im (* re (+ 1 (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 im))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ im (* 1/2 (/ (pow re 2) im)))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))))
#s(approx re #s(hole binary64 re))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (* 1/2 (* (sqrt im) (sqrt 2)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (+ (* 1/4 (* (sqrt (/ 1 im)) (* re (* (sqrt 2) (+ 1 (* 1/2 (/ (+ im (* -1 im)) im))))))) (* 1/2 (* (sqrt im) (sqrt 2))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (* re (* (sqrt 2) (- (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2))))) im)) (* 1/4 (/ (pow (+ 1 (* 1/2 (/ (+ im (* -1 im)) im))) 2) im))))))) (* 1/4 (* (sqrt (/ 1 im)) (* (sqrt 2) (+ 1 (* 1/2 (/ (+ im (* -1 im)) im)))))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (* (sqrt 2) (+ 1 (* 1/2 (/ (+ im (* -1 im)) im)))))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (* re (* (sqrt 2) (- (* -1/2 (/ (+ (* -1 (/ (* (+ im (* -1 im)) (- 1 (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))))) (pow im 2))) (+ (* -1 (/ (+ im (* -1 im)) (pow im 2))) (* 1/2 (/ (* (+ im (* -1 im)) (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2)))))) (pow im 2))))) im)) (* 1/2 (/ (* (+ 1 (* 1/2 (/ (+ im (* -1 im)) im))) (- (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2))))) im)) (* 1/4 (/ (pow (+ 1 (* 1/2 (/ (+ im (* -1 im)) im))) 2) im)))) im))))))) (* 1/4 (* (sqrt (/ 1 im)) (* (sqrt 2) (- (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2))))) im)) (* 1/4 (/ (pow (+ 1 (* 1/2 (/ (+ im (* -1 im)) im))) 2) im)))))))))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (* (sqrt im) (sqrt 2))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 im)) (* re (* (sqrt 2) (+ 1 (* 1/2 (/ (+ im (* -1 im)) im))))))) (* (sqrt im) (sqrt 2)))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (* re (* (sqrt 2) (- (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2))))) im)) (* 1/4 (/ (pow (+ 1 (* 1/2 (/ (+ im (* -1 im)) im))) 2) im))))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt 2) (+ 1 (* 1/2 (/ (+ im (* -1 im)) im)))))))) (* (sqrt im) (sqrt 2)))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt 2) (+ 1 (* 1/2 (/ (+ im (* -1 im)) im)))))) (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (* re (* (sqrt 2) (- (* -1/2 (/ (+ (* -1 (/ (* (+ im (* -1 im)) (- 1 (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))))) (pow im 2))) (+ (* -1 (/ (+ im (* -1 im)) (pow im 2))) (* 1/2 (/ (* (+ im (* -1 im)) (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2)))))) (pow im 2))))) im)) (* 1/2 (/ (* (+ 1 (* 1/2 (/ (+ im (* -1 im)) im))) (- (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2))))) im)) (* 1/4 (/ (pow (+ 1 (* 1/2 (/ (+ im (* -1 im)) im))) 2) im)))) im))))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt 2) (- (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2))))) im)) (* 1/4 (/ (pow (+ 1 (* 1/2 (/ (+ im (* -1 im)) im))) 2) im)))))))))) (* (sqrt im) (sqrt 2)))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (* 2 im)))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (+ (* 2 im) (* 2 (* re (+ 1 (* 1/2 (/ (+ im (* -1 im)) im))))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (+ (* 2 im) (* re (+ (* 2 (+ 1 (* 1/2 (/ (+ im (* -1 im)) im)))) (* re (- (/ 1 im) (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 3))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 3)))))))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (+ (* 2 im) (* re (+ (* 2 (+ 1 (* 1/2 (/ (+ im (* -1 im)) im)))) (* re (- (+ (* -1 (/ (* re (+ (* -1 (/ (* (+ im (* -1 im)) (- 1 (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))))) (pow im 2))) (+ (* -1 (/ (+ im (* -1 im)) (pow im 2))) (* 1/2 (/ (* (+ im (* -1 im)) (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2)))))) (pow im 2)))))) im)) (/ 1 im)) (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 3))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 3)))))))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 im))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (+ im (* re (+ 1 (* 1/2 (/ (+ im (* -1 im)) im)))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (+ im (* re (+ 1 (+ (* 1/2 (/ (* re (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2)))))) im)) (* 1/2 (/ (+ im (* -1 im)) im))))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (+ im (* re (+ 1 (+ (* 1/2 (/ (+ im (* -1 im)) im)) (* re (+ (* -1/2 (/ (* re (+ (* -1 (/ (* (+ im (* -1 im)) (- 1 (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))))) (pow im 2))) (+ (* -1 (/ (+ im (* -1 im)) (pow im 2))) (* 1/2 (/ (* (+ im (* -1 im)) (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2)))))) (pow im 2)))))) im)) (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2))))) im))))))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 im))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (+ im (* 1/2 (/ (* re (+ im (* -1 im))) im)))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (+ im (* re (+ (* 1/2 (/ (* re (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2)))))) im)) (* 1/2 (/ (+ im (* -1 im)) im)))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (+ im (* re (+ (* 1/2 (/ (+ im (* -1 im)) im)) (* re (+ (* -1/2 (/ (* re (+ (* -1 (/ (* (+ im (* -1 im)) (- 1 (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))))) (pow im 2))) (+ (* -1 (/ (+ im (* -1 im)) (pow im 2))) (* 1/2 (/ (* (+ im (* -1 im)) (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2)))))) (pow im 2)))))) im)) (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ im (* -1 im)) 2) (pow im 2))) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow im 2))))) im)))))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (* (pow im 2) (sqrt -1))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (+ (* 1/2 (/ (pow re 4) (* (pow im 2) (sqrt -1)))) (* (pow im 2) (sqrt -1)))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (+ (* (pow im 2) (sqrt -1)) (* (pow re 4) (+ (* -1/8 (/ (pow re 4) (* (pow im 6) (pow (sqrt -1) 3)))) (* 1/2 (/ 1 (* (pow im 2) (sqrt -1)))))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (+ (* (pow im 2) (sqrt -1)) (* (pow re 4) (+ (* (pow re 4) (- (* 1/16 (/ (pow re 4) (* (pow im 10) (pow (sqrt -1) 5)))) (* 1/8 (/ 1 (* (pow im 6) (pow (sqrt -1) 3)))))) (* 1/2 (/ 1 (* (pow im 2) (sqrt -1)))))))))
#s(approx (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im))) #s(hole binary64 (* -1 (pow im 4))))
#s(approx (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im))) #s(hole binary64 (+ (* -1 (pow im 4)) (pow re 4))))
#s(approx (* re re) #s(hole binary64 (pow re 2)))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* im (sqrt -1))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (+ (* 1/2 (/ (* re (+ im (* -1 im))) (* im (sqrt -1)))) (* im (sqrt -1)))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (+ (* im (sqrt -1)) (* re (+ (* 1/2 (/ (* re (- 1 (* 1/4 (/ (pow (+ im (* -1 im)) 2) (* (pow im 2) (pow (sqrt -1) 2)))))) (* im (sqrt -1)))) (* 1/2 (/ (+ im (* -1 im)) (* im (sqrt -1)))))))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (+ (* im (sqrt -1)) (* re (+ (* 1/2 (/ (+ im (* -1 im)) (* im (sqrt -1)))) (* re (+ (* -1/4 (/ (* re (* (+ im (* -1 im)) (- 1 (* 1/4 (/ (pow (+ im (* -1 im)) 2) (* (pow im 2) (pow (sqrt -1) 2))))))) (* (pow im 3) (pow (sqrt -1) 3)))) (* 1/2 (/ (- 1 (* 1/4 (/ (pow (+ im (* -1 im)) 2) (* (pow im 2) (pow (sqrt -1) 2))))) (* im (sqrt -1)))))))))))
#s(approx (* (+ re im) (- re im)) #s(hole binary64 (* -1 (pow im 2))))
#s(approx (* (+ re im) (- re im)) #s(hole binary64 (+ (* -1 (pow im 2)) (* re (+ im (* -1 im))))))
#s(approx (* (+ re im) (- re im)) #s(hole binary64 (+ (* -1 (pow im 2)) (* re (+ im (+ re (* -1 im)))))))
#s(approx (+ re im) #s(hole binary64 im))
#s(approx (+ re im) #s(hole binary64 (+ im re)))
#s(approx (- re im) #s(hole binary64 (* -1 im)))
#s(approx (- re im) #s(hole binary64 (- re im)))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (* 1/2 (* (sqrt im) (sqrt 2)))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (* (sqrt im) (sqrt 2))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (+ (* re (+ (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (* (sqrt im) (sqrt 2)))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* 2 im)))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (+ (* 2 im) (* 2 re))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (+ (* 2 im) (* re (+ 2 (/ re im))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (+ (* 2 im) (* re (+ 2 (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 im))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ im re)))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ im (* re (+ 1 (* 1/2 (/ re im)))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ im (* re (+ 1 (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))))
#s(approx (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) #s(hole binary64 (pow im 2)))
#s(approx (pow (sqrt (+ (* re re) (* im im))) 2) #s(hole binary64 (pow im 2)))
#s(approx (pow (sqrt (+ (* re re) (* im im))) 2) #s(hole binary64 (+ (pow im 2) (pow re 2))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 im))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (+ im (* -1 re))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (+ im (* re (- (* 1/2 (/ re im)) 1)))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (* 1/2 (* (sqrt im) (sqrt 2)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (* (sqrt im) (sqrt 2))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (+ (* re (+ (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (* (sqrt im) (sqrt 2)))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* 2 im)))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (+ (* 2 im) (* 2 re))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (+ (* 2 im) (* re (+ 2 (/ re im))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (+ (* 2 im) (* re (+ 2 (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 im))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (+ im re)))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (+ im (* re (+ 1 (* 1/2 (/ re im)))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (+ im (* re (+ 1 (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 im))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (+ im (* 1/2 (/ (pow re 2) im)))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) #s(hole binary64 (pow im 2)))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) #s(hole binary64 (+ (pow im 2) (pow re 2))))
#s(approx (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) #s(hole binary64 (pow im 6)))
#s(approx (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) #s(hole binary64 (+ (pow im 6) (pow re 6))))
#s(approx (* (* (neg re) re) re) #s(hole binary64 (* -1 (pow re 3))))
#s(approx (* (neg re) re) #s(hole binary64 (* -1 (pow re 2))))
#s(approx (neg re) #s(hole binary64 (* -1 re)))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) #s(hole binary64 (pow im 4)))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow im 4))))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) #s(hole binary64 (+ (* (pow re 2) (- (pow re 2) (pow im 2))) (pow im 4))))
#s(approx (pow re 4) #s(hole binary64 (pow re 4)))
#s(approx (- (pow im 4) (* (* re re) (* im im))) #s(hole binary64 (pow im 4)))
#s(approx (- (pow im 4) (* (* re re) (* im im))) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow im 4))))
#s(approx (* (* re re) (* im im)) #s(hole binary64 (* (pow im 2) (pow re 2))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (* 1/2 (* (sqrt im) (sqrt 2)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (+ (* 1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* 1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (* (sqrt im) (sqrt 2))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (+ (* 1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (+ (* re (+ (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (* (sqrt im) (sqrt 2)))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (+ (* re (+ (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* 2 im)))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (+ (* 2 im) (* 2 re))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (+ (* 2 im) (* re (+ 2 (/ re im))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (+ (* 2 im) (* re (+ 2 (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 im))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (+ im re)))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (+ im (* re (+ 1 (* 1/2 (/ re im)))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (+ im (* re (+ 1 (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (* (pow 1 1/4) (sqrt im))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (* 1/4 (* (pow 1 1/4) (* (sqrt (/ 1 (pow im 3))) (pow re 2)))) (* (pow 1 1/4) (sqrt im)))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (* (pow 1 1/4) (sqrt im)) (* (pow re 2) (+ (* -3/32 (* (pow 1 1/4) (* (sqrt (/ 1 (pow im 7))) (pow re 2)))) (* 1/4 (* (pow 1 1/4) (sqrt (/ 1 (pow im 3))))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (* (pow 1 1/4) (sqrt im)) (* (pow re 2) (+ (* 1/4 (* (pow 1 1/4) (sqrt (/ 1 (pow im 3))))) (* (pow re 2) (+ (* -3/32 (* (pow 1 1/4) (sqrt (/ 1 (pow im 7))))) (* 7/128 (* (pow 1 1/4) (* (sqrt (/ 1 (pow im 11))) (pow re 2)))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (* (pow (pow 1 3) 1/8) (pow im 1/4))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (pow 1 3) 1/8) (* (pow (/ 1 (pow im 7)) 1/4) (pow re 2)))) (* (pow (pow 1 3) 1/8) (pow im 1/4)))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* (pow re 2) (+ (* -7/128 (* (pow (pow 1 3) 1/8) (* (pow (/ 1 (pow im 15)) 1/4) (pow re 2)))) (* 1/8 (* (pow (pow 1 3) 1/8) (pow (/ 1 (pow im 7)) 1/4))))) (* (pow (pow 1 3) 1/8) (pow im 1/4)))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* (pow re 2) (+ (* 1/8 (* (pow (pow 1 3) 1/8) (pow (/ 1 (pow im 7)) 1/4))) (* (pow re 2) (+ (* -7/128 (* (pow (pow 1 3) 1/8) (pow (/ 1 (pow im 15)) 1/4))) (* 35/1024 (* (pow (pow 1 3) 1/8) (* (pow (/ 1 (pow im 23)) 1/4) (pow re 2)))))))) (* (pow (pow 1 3) 1/8) (pow im 1/4)))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 im))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ im (* 1/2 (/ (pow re 2) im)))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (* (pow 1 1/4) (sqrt im))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (* 1/4 (* (pow 1 1/4) (* (sqrt (/ 1 (pow im 3))) (pow re 2)))) (* (pow 1 1/4) (sqrt im)))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (* (pow 1 1/4) (sqrt im)) (* (pow re 2) (+ (* -3/32 (* (pow 1 1/4) (* (sqrt (/ 1 (pow im 7))) (pow re 2)))) (* 1/4 (* (pow 1 1/4) (sqrt (/ 1 (pow im 3))))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (* (pow 1 1/4) (sqrt im)) (* (pow re 2) (+ (* 1/4 (* (pow 1 1/4) (sqrt (/ 1 (pow im 3))))) (* (pow re 2) (+ (* -3/32 (* (pow 1 1/4) (sqrt (/ 1 (pow im 7))))) (* 7/128 (* (pow 1 1/4) (* (sqrt (/ 1 (pow im 11))) (pow re 2)))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 2) #s(hole binary64 (pow im 2)))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 2) #s(hole binary64 (+ (pow im 2) (pow re 2))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (sqrt re)))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (* re (+ (sqrt (/ 1 re)) (* 1/4 (* (/ (pow im 2) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 5)))))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (* re (+ (sqrt (/ 1 re)) (+ (* -1/16 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (* 1/4 (* (/ (pow im 2) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 5))))))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (* re (+ (sqrt (/ 1 re)) (+ (* -1/16 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* -1/32 (* (/ (pow im 4) (pow (sqrt 2) 4)) (sqrt (/ 1 (pow re 9))))) (* 1/4 (* (/ (pow im 2) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 5)))))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (* 2 (sqrt re))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (* re (+ (* 1/2 (* (/ (pow im 2) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 5))))) (* 2 (sqrt (/ 1 re)))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (* re (+ (* -1/8 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/2 (* (/ (pow im 2) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 5))))) (* 2 (sqrt (/ 1 re))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (* re (+ (* -1/8 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* -1/16 (* (/ (pow im 4) (pow (sqrt 2) 4)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/2 (* (/ (pow im 2) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 5))))) (* 2 (sqrt (/ 1 re)))))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* (sqrt re) (sqrt 2))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* re (+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 2))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* re (+ (* -1/16 (* (/ (pow im 4) (sqrt 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 2)))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* re (+ (* -1/16 (* (/ (pow im 4) (sqrt 2)) (sqrt (/ 1 (pow re 9))))) (+ (* -1/32 (* (/ (pow im 4) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 2))))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* 2 re)))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 re))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (* re (+ (* -1/8 (* (sqrt (/ 1 (pow re 3))) (+ im (* -1 im)))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (* re (+ (* -1/8 (* (sqrt (/ 1 (pow re 3))) (+ im (* -1 im)))) (+ (* -1/8 (* (sqrt (/ 1 (pow re 5))) (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (* re (+ (* -1/8 (* (sqrt (/ 1 (pow re 3))) (+ im (* -1 im)))) (+ (* -1/8 (* (sqrt (/ 1 (pow re 5))) (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))))) (+ (* 1/4 (* (sqrt (/ 1 (pow re 7))) (- (* -1/2 (+ (* -1 (* (+ im (* -1 im)) (+ (* -1 (pow im 2)) (* -1 (pow (+ im (* -1 im)) 2))))) (+ (* 1/2 (* (+ im (* -1 im)) (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))))) (* (pow im 2) (+ im (* -1 im)))))) (* 1/16 (/ (* re (pow (+ im (* -1 im)) 2)) (pow (sqrt 2) 2)))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (* (sqrt re) (pow (sqrt 2) 2))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (* re (+ (* -1/4 (* (sqrt (/ 1 (pow re 3))) (+ im (* -1 im)))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (* re (+ (* -1/4 (* (sqrt (/ 1 (pow re 3))) (+ im (* -1 im)))) (+ (* -1/4 (* (sqrt (/ 1 (pow re 5))) (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (* re (+ (* -1/4 (* (sqrt (/ 1 (pow re 3))) (+ im (* -1 im)))) (+ (* -1/4 (* (sqrt (/ 1 (pow re 5))) (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))))) (+ (* 1/2 (* (sqrt (/ 1 (pow re 7))) (- (* -1/2 (+ (* -1 (* (+ im (* -1 im)) (+ (* -1 (pow im 2)) (* -1 (pow (+ im (* -1 im)) 2))))) (+ (* 1/2 (* (+ im (* -1 im)) (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))))) (* (pow im 2) (+ im (* -1 im)))))) (* 1/16 (/ (* re (pow (+ im (* -1 im)) 2)) (pow (sqrt 2) 2)))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (* 4 re)))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (* re (+ 4 (* -1 (/ (+ im (* -1 im)) re))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (* re (+ 4 (+ (* -1 (/ (+ im (* -1 im)) re)) (* -1 (/ (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))) (pow re 2))))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (* re (+ 4 (+ (* -1 (/ (+ im (* -1 im)) re)) (+ (* -1 (/ (+ (* -1 (* (+ im (* -1 im)) (+ (* -1 (pow im 2)) (* -1 (pow (+ im (* -1 im)) 2))))) (+ (* 1/2 (* (+ im (* -1 im)) (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))))) (* (pow im 2) (+ im (* -1 im))))) (pow re 3))) (* -1 (/ (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))) (pow re 2)))))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (* 2 re)))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (* re (+ 2 (* -1/2 (/ (+ im (* -1 im)) re))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (* re (+ 2 (+ (* -1/2 (/ (+ im (* -1 im)) re)) (* -1/2 (/ (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))) (pow re 2))))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (* re (+ 2 (+ (* -1/2 (/ (+ im (* -1 im)) re)) (+ (* -1/2 (/ (+ (* -1 (* (+ im (* -1 im)) (+ (* -1 (pow im 2)) (* -1 (pow (+ im (* -1 im)) 2))))) (+ (* 1/2 (* (+ im (* -1 im)) (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))))) (* (pow im 2) (+ im (* -1 im))))) (pow re 3))) (* -1/2 (/ (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))) (pow re 2)))))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 re))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* re (+ 1 (* -1/2 (/ (+ im (* -1 im)) re))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* re (+ 1 (+ (* -1/2 (/ (+ im (* -1 im)) re)) (* -1/2 (/ (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))) (pow re 2))))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* re (+ 1 (+ (* -1/2 (/ (+ im (* -1 im)) re)) (+ (* -1/2 (/ (+ (* -1 (* (+ im (* -1 im)) (+ (* -1 (pow im 2)) (* -1 (pow (+ im (* -1 im)) 2))))) (+ (* 1/2 (* (+ im (* -1 im)) (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))))) (* (pow im 2) (+ im (* -1 im))))) (pow re 3))) (* -1/2 (/ (+ (* -1 (pow im 2)) (+ (* -1 (pow (+ im (* -1 im)) 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))) (pow re 2)))))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (pow re 2)))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (* (pow re 2) (+ 1 (* -1/2 (/ (pow im 4) (pow re 4)))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (* (pow re 2) (+ 1 (+ (* -1/2 (/ (pow im 4) (pow re 4))) (* -1/8 (/ (pow im 8) (pow re 8))))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (* (pow re 2) (+ 1 (+ (* -1/2 (/ (pow im 4) (pow re 4))) (+ (* -1/8 (/ (pow im 8) (pow re 8))) (* -1/16 (/ (pow im 12) (pow re 12)))))))))
#s(approx (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im))) #s(hole binary64 (pow re 4)))
#s(approx (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im))) #s(hole binary64 (* (pow re 4) (+ 1 (* -1 (/ (pow im 4) (pow re 4)))))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 re))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* re (+ 1 (* 1/2 (/ (+ im (* -1 im)) re))))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* re (+ 1 (+ (* 1/2 (/ (+ im (* -1 im)) re)) (* 1/2 (/ (- (* -1 (pow im 2)) (* 1/4 (pow (+ im (* -1 im)) 2))) (pow re 2))))))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* re (+ 1 (+ (* -1/4 (/ (* (+ im (* -1 im)) (- (* -1 (pow im 2)) (* 1/4 (pow (+ im (* -1 im)) 2)))) (pow re 3))) (+ (* 1/2 (/ (+ im (* -1 im)) re)) (* 1/2 (/ (- (* -1 (pow im 2)) (* 1/4 (pow (+ im (* -1 im)) 2))) (pow re 2)))))))))
#s(approx (* (+ re im) (- re im)) #s(hole binary64 (pow re 2)))
#s(approx (* (+ re im) (- re im)) #s(hole binary64 (* (pow re 2) (+ 1 (+ (* -1 (/ im re)) (/ im re))))))
#s(approx (* (+ re im) (- re im)) #s(hole binary64 (* (pow re 2) (+ 1 (+ (* -1 (/ im re)) (+ (* -1 (/ (pow im 2) (pow re 2))) (/ im re)))))))
#s(approx (+ re im) #s(hole binary64 re))
#s(approx (+ re im) #s(hole binary64 (* re (+ 1 (/ im re)))))
#s(approx (- re im) #s(hole binary64 re))
#s(approx (- re im) #s(hole binary64 (* re (+ 1 (* -1 (/ im re))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (* re (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (* re (+ (* -1/4 (* (* (pow im 2) (+ (* -1/8 (pow im 2)) (* 1/4 (pow im 2)))) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (* re (+ (* -1/4 (* (* (pow im 2) (+ (* -1/8 (pow im 2)) (* 1/4 (pow im 2)))) (sqrt (/ 1 (pow re 9))))) (+ (* -1/64 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (* (sqrt re) (pow (sqrt 2) 2))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (* re (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (* re (+ (* -1/2 (* (* (pow im 2) (+ (* -1/8 (pow im 2)) (* 1/4 (pow im 2)))) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (* re (+ (* -1/2 (* (* (pow im 2) (+ (* -1/8 (pow im 2)) (* 1/4 (pow im 2)))) (sqrt (/ 1 (pow re 9))))) (+ (* -1/32 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* 4 re)))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* re (+ 4 (/ (pow im 2) (pow re 2))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* re (+ 4 (+ (* -2 (/ (+ (* -1/8 (pow im 4)) (* 1/4 (pow im 4))) (pow re 4))) (/ (pow im 2) (pow re 2)))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* re (+ 4 (+ (* -2 (/ (+ (* -2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* 1/16 (pow im 6)) (* 1/4 (* (pow im 2) (+ (* -1/8 (pow im 4)) (* 1/4 (pow im 4))))))) (pow re 6))) (+ (* -2 (/ (+ (* -1/8 (pow im 4)) (* 1/4 (pow im 4))) (pow re 4))) (/ (pow im 2) (pow re 2))))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* 2 re)))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* re (- (+ 2 (* -1 (/ (+ (* -1/8 (pow im 4)) (* 1/4 (pow im 4))) (pow re 4)))) (* -1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* re (- (+ 2 (* -1 (/ (+ (* -2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow im 2))) (+ (* 1/16 (pow im 6)) (* 1/4 (* (pow im 2) (+ (* -1/8 (pow im 4)) (* 1/4 (pow im 4))))))) (pow re 6)))) (+ (* -1/2 (/ (pow im 2) (pow re 2))) (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/4 (/ (pow im 4) (pow re 4)))))))))
#s(approx (pow (sqrt (+ (* re re) (* im im))) 2) #s(hole binary64 (pow re 2)))
#s(approx (pow (sqrt (+ (* re re) (* im im))) 2) #s(hole binary64 (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* 1/2 (/ (pow im 2) re))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re)))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re)))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (* re (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (* re (+ (* -1/8 (* (sqrt (/ 1 (pow re 9))) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (* re (+ (* -1/8 (* (sqrt (/ 1 (pow re 9))) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (+ (* -1/64 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (* (sqrt re) (pow (sqrt 2) 2))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (* re (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (* re (+ (* -1/4 (* (sqrt (/ 1 (pow re 9))) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (* re (+ (* -1/4 (* (sqrt (/ 1 (pow re 9))) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (+ (* -1/32 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* 4 re)))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* re (+ 4 (/ (pow im 2) (pow re 2))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* re (+ 4 (+ (* -1 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 4))) (/ (pow im 2) (pow re 2)))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* re (+ 4 (+ (* -1 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 4))) (+ (* -1 (/ (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))) (pow re 6))) (/ (pow im 2) (pow re 2))))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* 2 re)))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* re (+ 2 (+ (* -1/2 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* re (+ 2 (+ (* -1/2 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 4))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 re))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* re (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* re (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 4))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) #s(hole binary64 (pow re 2)))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) #s(hole binary64 (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) #s(hole binary64 (* (pow re 2) (- (+ 1 (* -1 (/ (+ (* -1 (pow im 4)) (pow im 4)) (pow re 4)))) (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) #s(hole binary64 (* (pow re 2) (- (+ 1 (* -1 (/ (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4))) (pow re 6)))) (+ (* -1 (/ (pow im 2) (pow re 2))) (+ (* -1 (/ (pow im 4) (pow re 4))) (/ (pow im 4) (pow re 4))))))))
#s(approx (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) #s(hole binary64 (pow re 6)))
#s(approx (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) #s(hole binary64 (* (pow re 6) (+ 1 (/ (pow im 6) (pow re 6))))))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) #s(hole binary64 (pow re 4)))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) #s(hole binary64 (* (pow re 4) (+ 1 (* -1 (/ (pow im 2) (pow re 2)))))))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) #s(hole binary64 (* (pow re 4) (- (+ 1 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2))))))
#s(approx (- (pow im 4) (* (* re re) (* im im))) #s(hole binary64 (* -1 (* (pow im 2) (pow re 2)))))
#s(approx (- (pow im 4) (* (* re re) (* im im))) #s(hole binary64 (* (pow re 2) (- (/ (pow im 4) (pow re 2)) (pow im 2)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (* 1/2 (* (sqrt re) (pow (sqrt 2) 2)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (* re (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (* re (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (* re (+ (* -1/32 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/64 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (* (sqrt re) (pow (sqrt 2) 2))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (* re (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2)))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (* re (+ (* -1/16 (* (pow im 4) (sqrt (/ 1 (pow re 9))))) (+ (* -1/32 (* (/ (pow im 4) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (pow (sqrt 2) 2))))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* 4 re)))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* re (+ 4 (/ (pow im 2) (pow re 2))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* 2 re)))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (sqrt re)))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (sqrt re) (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (sqrt re) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 (pow re 7))) (+ (* -1/8 (pow im 4)) (* 1/32 (pow im 4))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (sqrt re) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (+ (* (sqrt (/ 1 (pow re 7))) (+ (* -1/8 (pow im 4)) (* 1/32 (pow im 4)))) (* (sqrt (/ 1 (pow re 11))) (+ (* -1/32 (pow im 6)) (+ (* 1/384 (pow im 6)) (* 1/12 (pow im 6))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (pow (* 1 re) 1/4)))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (/ 1 (pow re 7)) 1/4) (pow im 2))) (pow (* 1 re) 1/4))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (/ 1 (pow re 7)) 1/4) (pow im 2))) (+ (* (pow (/ 1 (pow re 15)) 1/4) (+ (* -1/16 (pow im 4)) (* 1/128 (pow im 4)))) (pow (* 1 re) 1/4)))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (/ 1 (pow re 7)) 1/4) (pow im 2))) (+ (* (pow (/ 1 (pow re 15)) 1/4) (+ (* -1/16 (pow im 4)) (* 1/128 (pow im 4)))) (+ (* (pow (/ 1 (pow re 23)) 1/4) (+ (* -1/128 (pow im 6)) (+ (* 1/3072 (pow im 6)) (* 1/24 (pow im 6))))) (pow (* 1 re) 1/4))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 re))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (sqrt re)))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (sqrt re) (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (sqrt re) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* (sqrt (/ 1 (pow re 7))) (+ (* -1/8 (pow im 4)) (* 1/32 (pow im 4))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (sqrt re) (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (+ (* (sqrt (/ 1 (pow re 7))) (+ (* -1/8 (pow im 4)) (* 1/32 (pow im 4)))) (* (sqrt (/ 1 (pow re 11))) (+ (* -1/32 (pow im 6)) (+ (* 1/384 (pow im 6)) (* 1/12 (pow im 6))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 2) #s(hole binary64 (pow re 2)))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 2) #s(hole binary64 (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (* (/ (* im (* (sqrt -1) (sqrt 1/2))) (sqrt 2)) (sqrt (/ 1 re)))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (+ (* 1/16 (* (/ (* (pow im 3) (sqrt -1)) (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (* (/ (* im (* (sqrt -1) (sqrt 1/2))) (sqrt 2)) (sqrt (/ 1 re))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (sqrt -1)) (* (sqrt 1/2) (sqrt 2))) (sqrt re))) (* 1/32 (* (/ (* (pow im 5) (sqrt -1)) (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (/ (* im (* (sqrt -1) (sqrt 1/2))) (sqrt 2)) (sqrt (/ 1 re))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (sqrt -1)) (* (sqrt 1/2) (sqrt 2))) (sqrt re))) (+ (* 1/512 (* (/ (* (pow im 5) (sqrt -1)) (* (pow (sqrt 1/2) 3) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* 1/32 (* (/ (* (pow im 5) (sqrt -1)) (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (/ (* im (* (sqrt -1) (sqrt 1/2))) (sqrt 2)) (sqrt (/ 1 re))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (* 2 (* (/ (* im (* (sqrt -1) (sqrt 1/2))) (sqrt 2)) (sqrt (/ 1 re))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (+ (* 1/8 (* (/ (* (pow im 3) (sqrt -1)) (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 (pow re 5))))) (* 2 (* (/ (* im (* (sqrt -1) (sqrt 1/2))) (sqrt 2)) (sqrt (/ 1 re)))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/8 (* (/ (* (pow im 3) (sqrt -1)) (* (sqrt 1/2) (sqrt 2))) (sqrt re))) (* 1/16 (* (/ (* (pow im 5) (sqrt -1)) (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* 2 (* (/ (* im (* (sqrt -1) (sqrt 1/2))) (sqrt 2)) (sqrt (/ 1 re)))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/8 (* (/ (* (pow im 3) (sqrt -1)) (* (sqrt 1/2) (sqrt 2))) (sqrt re))) (+ (* 1/256 (* (/ (* (pow im 5) (sqrt -1)) (* (pow (sqrt 1/2) 3) (sqrt 2))) (sqrt (/ 1 (pow re 3))))) (* 1/16 (* (/ (* (pow im 5) (sqrt -1)) (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* 2 (* (/ (* im (* (sqrt -1) (sqrt 1/2))) (sqrt 2)) (sqrt (/ 1 re)))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re)))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ (* 1/16 (* (/ (* (pow im 3) (sqrt -1)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (sqrt -1)) (sqrt 1/2)) (sqrt re))) (* 1/32 (* (/ (* (pow im 5) (sqrt -1)) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (sqrt -1)) (sqrt 1/2)) (sqrt re))) (+ (* 1/512 (* (/ (* (pow im 5) (sqrt -1)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/32 (* (/ (* (pow im 5) (sqrt -1)) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (* (sqrt -1) (sqrt 1/2))) (sqrt (/ 1 re))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1/2 (/ (pow im 2) re))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 re)))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (* 1/2 (* (/ (* (sqrt -1/2) (sqrt 2)) (sqrt -1)) (sqrt (+ im (* -1 im)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (+ (* 1/8 (* (/ (* (sqrt 2) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (* re (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 (+ im (* -1 im)))))) (* 1/2 (* (/ (* (sqrt -1/2) (sqrt 2)) (sqrt -1)) (sqrt (+ im (* -1 im))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/4 (* (/ (* (sqrt -1) (* (sqrt 2) (- (* -1/2 (/ (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (pow (sqrt -1) 2))) (* 1/16 (/ (pow (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) 2) (* (pow (sqrt -1) 2) (* (pow (sqrt -1/2) 2) (+ im (* -1 im))))))))) (* re (sqrt -1/2))) (sqrt (/ 1 (+ im (* -1 im)))))) (* -1/8 (* (/ (* (sqrt 2) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 (+ im (* -1 im))))))) re)) (* 1/2 (* (/ (* (sqrt -1/2) (sqrt 2)) (sqrt -1)) (sqrt (+ im (* -1 im))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (* (/ (* (sqrt -1) (* (sqrt 2) (- (* 1/2 (/ (- (pow im 4) (+ (* 1/4 (/ (pow (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) 2) (pow (sqrt -1) 2))) (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im)))))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (* (pow im 2) (+ (pow im 2) (pow (+ im (* -1 im)) 2))))))) (pow (sqrt -1) 2))) (* -1/4 (/ (* (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (- (* -1/2 (/ (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (pow (sqrt -1) 2))) (* 1/16 (/ (pow (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) 2) (* (pow (sqrt -1) 2) (* (pow (sqrt -1/2) 2) (+ im (* -1 im)))))))) (* (pow (sqrt -1/2) 2) (+ im (* -1 im)))))))) (* re (sqrt -1/2))) (sqrt (/ 1 (+ im (* -1 im)))))) (* 1/4 (* (/ (* (sqrt -1) (* (sqrt 2) (- (* -1/2 (/ (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (pow (sqrt -1) 2))) (* 1/16 (/ (pow (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) 2) (* (pow (sqrt -1) 2) (* (pow (sqrt -1/2) 2) (+ im (* -1 im))))))))) (sqrt -1/2)) (sqrt (/ 1 (+ im (* -1 im))))))) re)) (* -1/8 (* (/ (* (sqrt 2) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 (+ im (* -1 im))))))) re)) (* 1/2 (* (/ (* (sqrt -1/2) (sqrt 2)) (sqrt -1)) (sqrt (+ im (* -1 im))))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (* (/ (* (sqrt -1/2) (sqrt 2)) (sqrt -1)) (sqrt (+ im (* -1 im))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (+ (* 1/4 (* (/ (* (sqrt 2) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (* re (* (sqrt -1) (sqrt -1/2)))) (sqrt (/ 1 (+ im (* -1 im)))))) (* (/ (* (sqrt -1/2) (sqrt 2)) (sqrt -1)) (sqrt (+ im (* -1 im)))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (* (/ (* (sqrt -1) (* (sqrt 2) (- (* -1/2 (/ (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (pow (sqrt -1) 2))) (* 1/16 (/ (pow (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) 2) (* (pow (sqrt -1) 2) (* (pow (sqrt -1/2) 2) (+ im (* -1 im))))))))) (* re (sqrt -1/2))) (sqrt (/ 1 (+ im (* -1 im)))))) (* -1/4 (* (/ (* (sqrt 2) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 (+ im (* -1 im))))))) re)) (* (/ (* (sqrt -1/2) (sqrt 2)) (sqrt -1)) (sqrt (+ im (* -1 im)))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (* (/ (* (sqrt -1) (* (sqrt 2) (- (* 1/2 (/ (- (pow im 4) (+ (* 1/4 (/ (pow (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) 2) (pow (sqrt -1) 2))) (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im)))))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (* (pow im 2) (+ (pow im 2) (pow (+ im (* -1 im)) 2))))))) (pow (sqrt -1) 2))) (* -1/4 (/ (* (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (- (* -1/2 (/ (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (pow (sqrt -1) 2))) (* 1/16 (/ (pow (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) 2) (* (pow (sqrt -1) 2) (* (pow (sqrt -1/2) 2) (+ im (* -1 im)))))))) (* (pow (sqrt -1/2) 2) (+ im (* -1 im)))))))) (* re (sqrt -1/2))) (sqrt (/ 1 (+ im (* -1 im)))))) (* 1/2 (* (/ (* (sqrt -1) (* (sqrt 2) (- (* -1/2 (/ (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (pow (sqrt -1) 2))) (* 1/16 (/ (pow (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) 2) (* (pow (sqrt -1) 2) (* (pow (sqrt -1/2) 2) (+ im (* -1 im))))))))) (sqrt -1/2)) (sqrt (/ 1 (+ im (* -1 im))))))) re)) (* -1/4 (* (/ (* (sqrt 2) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 (+ im (* -1 im))))))) re)) (* (/ (* (sqrt -1/2) (sqrt 2)) (sqrt -1)) (sqrt (+ im (* -1 im)))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (* -1 (/ (+ im (* -1 im)) (pow (sqrt -1) 2)))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (+ (* -1 (/ (+ im (* -1 im)) (pow (sqrt -1) 2))) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (* re (pow (sqrt -1) 4)))) (+ (/ (pow im 2) (* re (pow (sqrt -1) 2))) (/ (pow (+ im (* -1 im)) 2) (* re (pow (sqrt -1) 2))))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (+ (* -1 (/ (+ im (* -1 im)) (pow (sqrt -1) 2))) (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (pow (sqrt -1) 2))) (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (* re (pow (sqrt -1) 4)))) (+ (/ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* re (pow (sqrt -1) 2))) (/ (* (pow im 2) (+ im (* -1 im))) (* re (pow (sqrt -1) 2)))))) re)))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (+ (* -1 (/ (+ im (* -1 im)) (pow (sqrt -1) 2))) (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (pow (sqrt -1) 2))) (* -1 (/ (- (/ (pow im 4) (pow (sqrt -1) 2)) (+ (* 1/4 (/ (pow (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) 2) (pow (sqrt -1) 4))) (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im)))))) (pow (sqrt -1) 4))) (+ (/ (* (+ im (* -1 im)) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (pow (sqrt -1) 2)) (/ (* (pow im 2) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (pow (sqrt -1) 2)))))) re))) re)) (* -1 (/ (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (pow (sqrt -1) 2)))) re)))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (* -1/2 (/ (+ im (* -1 im)) (pow (sqrt -1) 2)))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (+ (* -1/2 (/ (+ im (* -1 im)) (pow (sqrt -1) 2))) (* 1/2 (/ (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* re (pow (sqrt -1) 2)))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (+ (* -1 (/ (+ (* -1/2 (/ (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (pow (sqrt -1) 2))) (* 1/2 (/ (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (* re (pow (sqrt -1) 2))))) re)) (* -1/2 (/ (+ im (* -1 im)) (pow (sqrt -1) 2))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (+ (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (pow (sqrt -1) 2))) (* -1/2 (/ (- (pow im 4) (+ (* 1/4 (/ (pow (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) 2) (pow (sqrt -1) 2))) (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im)))))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (* (pow im 2) (+ (pow im 2) (pow (+ im (* -1 im)) 2))))))) (* re (pow (sqrt -1) 2))))) re)) (* -1/2 (/ (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (pow (sqrt -1) 2)))) re)) (* -1/2 (/ (+ im (* -1 im)) (pow (sqrt -1) 2))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* -1 re)))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* -1 (* re (+ 1 (* 1/2 (/ (+ im (* -1 im)) (* re (pow (sqrt -1) 2)))))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* -1 (* re (+ 1 (* -1 (/ (+ (* -1/2 (/ (+ im (* -1 im)) (pow (sqrt -1) 2))) (* 1/2 (/ (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* re (pow (sqrt -1) 2))))) re)))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* -1 (* re (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (/ (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (pow (sqrt -1) 2))) (* 1/2 (/ (+ (* 1/2 (/ (* (+ im (* -1 im)) (+ (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))) (+ (pow im 2) (pow (+ im (* -1 im)) 2)))) (pow (sqrt -1) 2))) (+ (* (+ im (* -1 im)) (+ (pow im 2) (pow (+ im (* -1 im)) 2))) (* (pow im 2) (+ im (* -1 im))))) (* re (pow (sqrt -1) 2))))) re)) (* -1/2 (/ (+ im (* -1 im)) (pow (sqrt -1) 2)))) re)))))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* -1 (* re (pow (sqrt -1) 2)))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* -1 (* re (+ (* -1/2 (/ (+ im (* -1 im)) re)) (pow (sqrt -1) 2))))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* -1 (* re (+ (* -1 (/ (+ (* -1/2 (/ (- (pow im 2) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2)))) re)) (* 1/2 (+ im (* -1 im)))) re)) (pow (sqrt -1) 2))))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* -1 (* re (+ (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ im (* -1 im)) (- (pow im 2) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2))))) (* re (pow (sqrt -1) 2)))) (* 1/2 (- (pow im 2) (* 1/4 (/ (pow (+ im (* -1 im)) 2) (pow (sqrt -1) 2)))))) re)) (* 1/2 (+ im (* -1 im)))) re)) (pow (sqrt -1) 2))))))
#s(approx (* (+ re im) (- re im)) #s(hole binary64 (* (pow re 2) (+ 1 (* -1 (/ (+ (* -1 (+ im (* -1 im))) (/ (pow im 2) re)) re))))))
#s(approx (+ re im) #s(hole binary64 (* -1 (* re (- (* -1 (/ im re)) 1)))))
#s(approx (- re im) #s(hole binary64 (* -1 (* re (- (/ im re) 1)))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (+ (* 1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/1024 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (+ (* 1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/512 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* -1 (/ (pow im 2) re))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* -1 (/ (+ (* -2 (/ (+ (* 1/128 (pow im 8)) (* 1/32 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* -1/2 (/ (pow im 2) re))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* -1 (/ (- (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))) (* 1/8 (/ (pow im 4) (pow re 2)))) re))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* -1 (/ (- (+ (* -1 (/ (+ (* 1/128 (pow im 8)) (* 1/32 (pow im 8))) (pow re 6))) (* 1/2 (pow im 2))) (+ (* -1/16 (/ (pow im 6) (pow re 4))) (* 1/8 (/ (pow im 4) (pow re 2))))) re))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -2 re)))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (+ (* 1/8 (* (/ (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* im (sqrt 1/2))) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/8 (* (/ (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* im (sqrt 1/2))) (sqrt re))) (* -1/8 (* (/ (* (sqrt -1) (* (sqrt 2) (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))))) (* im (sqrt 1/2))) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/8 (* (/ (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* im (sqrt 1/2))) (sqrt re))) (+ (* -1/8 (* (/ (* (sqrt -1) (* (sqrt 2) (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))))) (* im (sqrt 1/2))) (sqrt (/ 1 (pow re 3))))) (* 1/64 (* (/ (* (sqrt -1) (* (sqrt 2) (pow (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) 2))) (* (pow im 3) (pow (sqrt 1/2) 3))) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (+ (* 1/4 (* (/ (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* im (sqrt 1/2))) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/4 (* (/ (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* im (sqrt 1/2))) (sqrt re))) (* -1/4 (* (/ (* (sqrt -1) (* (sqrt 2) (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))))) (* im (sqrt 1/2))) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/4 (* (/ (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* im (sqrt 1/2))) (sqrt re))) (+ (* -1/4 (* (/ (* (sqrt -1) (* (sqrt 2) (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))))) (* im (sqrt 1/2))) (sqrt (/ 1 (pow re 3))))) (* 1/32 (* (/ (* (sqrt -1) (* (sqrt 2) (pow (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) 2))) (* (pow im 3) (pow (sqrt 1/2) 3))) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* -1 (/ (pow im 2) re))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 2))) (pow im 2)) re))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 2))) (+ (* -1 (/ (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))) (pow re 4))) (pow im 2))) re))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* -1 (* (pow im 4) (+ (* -1 (pow im 4)) (pow im 4)))) (+ (* -1/2 (* (pow im 2) (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))))) (+ (* 1/4 (pow (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) 2)) (* (pow im 4) (+ (* -1 (pow im 4)) (pow im 4)))))) (pow re 6))) (+ (* -1 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 2))) (+ (* -1 (/ (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))) (pow re 4))) (pow im 2)))) re))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* -1/2 (/ (pow im 2) re))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 2))) (* 1/2 (pow im 2))) re))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))) (pow re 4))) (* 1/2 (pow im 2)))) re))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (+ (* -1 (* (pow im 4) (+ (* -1 (pow im 4)) (pow im 4)))) (+ (* -1/2 (* (pow im 2) (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))))) (+ (* 1/4 (pow (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) 2)) (* (pow im 4) (+ (* -1 (pow im 4)) (pow im 4)))))) (pow re 6))) (+ (* -1/2 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 2))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))) (pow re 4))) (* 1/2 (pow im 2))))) re))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* -1 re)))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))) (pow re 4))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow im 2) (+ (* -1 (pow im 4)) (+ (* 1/4 (pow im 4)) (pow im 4))))) (* (pow im 2) (+ (* -1 (pow im 4)) (pow im 4)))) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (+ (* 1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/1024 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/64 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* 1/2 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re)))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (+ (* 1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3)))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 3) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt re))) (+ (* 1/512 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/32 (* (/ (* (pow im 5) (* (sqrt -1) (sqrt 2))) (sqrt 1/2)) (sqrt (/ 1 (pow re 3))))))) (pow re 3))) (* (* im (* (sqrt -1) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* -1 (/ (pow im 2) re))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* -1 (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* -1 (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* -1/2 (/ (pow im 2) re))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* -1 (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* -1 (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (* (sqrt re) (sqrt -1))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt -1)))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* (sqrt re) (sqrt -1)) (* (sqrt (/ 1 (pow re 7))) (* (sqrt -1) (+ (* -1/8 (pow im 4)) (* 1/32 (pow im 4)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* (sqrt re) (sqrt -1)) (+ (* (sqrt (/ 1 (pow re 7))) (* (sqrt -1) (+ (* -1/8 (pow im 4)) (* 1/32 (pow im 4))))) (* (sqrt (/ 1 (pow re 11))) (* (sqrt -1) (+ (* -1/32 (pow im 6)) (+ (* 1/384 (pow im 6)) (* 1/12 (pow im 6)))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (pow (* -1 re) 1/4)))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (/ -1 (pow re 7)) 1/4) (pow im 2))) (pow (* -1 re) 1/4))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (/ -1 (pow re 7)) 1/4) (pow im 2))) (+ (* (pow (/ -1 (pow re 15)) 1/4) (+ (* -1/16 (pow im 4)) (* 1/128 (pow im 4)))) (pow (* -1 re) 1/4)))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (/ -1 (pow re 7)) 1/4) (pow im 2))) (+ (* (pow (/ -1 (pow re 15)) 1/4) (+ (* -1/16 (pow im 4)) (* 1/128 (pow im 4)))) (+ (* (pow (/ -1 (pow re 23)) 1/4) (+ (* -1/128 (pow im 6)) (+ (* 1/3072 (pow im 6)) (* 1/24 (pow im 6))))) (pow (* -1 re) 1/4))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 re)))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (* (sqrt re) (sqrt -1))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt -1)))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* (sqrt re) (sqrt -1)) (* (sqrt (/ 1 (pow re 7))) (* (sqrt -1) (+ (* -1/8 (pow im 4)) (* 1/32 (pow im 4)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* (sqrt re) (sqrt -1)) (+ (* (sqrt (/ 1 (pow re 7))) (* (sqrt -1) (+ (* -1/8 (pow im 4)) (* 1/32 (pow im 4))))) (* (sqrt (/ 1 (pow re 11))) (* (sqrt -1) (+ (* -1/32 (pow im 6)) (+ (* 1/384 (pow im 6)) (* 1/12 (pow im 6)))))))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (+ (sqrt re) (* 1/4 (* (/ (pow im 2) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (+ (sqrt re) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (pow (sqrt 2) 2)) (sqrt (/ 1 re)))) (* 1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (pow (sqrt 2) 2)))))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (+ (sqrt re) (* (pow im 2) (+ (* 1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (pow (sqrt 2) 2)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 re)) (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (pow (sqrt 2) 2)))) (* 1/2 (* (/ (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (pow (sqrt 2) 2)) (sqrt (/ 1 re)))))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (+ (* 1/2 (* (/ (pow im 2) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 2 (sqrt re)))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (+ (* 2 (sqrt re)) (* (pow im 2) (+ (* -1 (* (/ (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (pow (sqrt 2) 2)) (sqrt (/ 1 re)))) (* 1/2 (* (sqrt (/ 1 (pow re 3))) (/ 1 (pow (sqrt 2) 2)))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (+ (* 2 (sqrt re)) (* (pow im 2) (+ (* 1/2 (* (sqrt (/ 1 (pow re 3))) (/ 1 (pow (sqrt 2) 2)))) (* (pow im 2) (+ (* -1 (* (sqrt (/ 1 re)) (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (pow (sqrt 2) 2)))) (* (/ (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (pow (sqrt 2) 2)) (sqrt (/ 1 re))))))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ (* 1/4 (* (/ (pow im 2) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (sqrt 2)))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ (* (sqrt re) (sqrt 2)) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt 2)) (sqrt (/ 1 re)))) (* 1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt 2)))))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ (* (sqrt re) (sqrt 2)) (* (pow im 2) (+ (* 1/4 (* (sqrt (/ 1 (pow re 3))) (/ 1 (sqrt 2)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 re)) (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (sqrt 2)))) (* 1/2 (* (/ (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt 2)) (sqrt (/ 1 re)))))))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (+ (* 1/2 (/ (pow im 2) re)) (* 2 re))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (+ (* 2 re) (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (+ (* 2 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ re (* 1/2 (/ (pow im 2) re)))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))))
#s(approx im #s(hole binary64 im))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (+ (* -1/8 (* (* im (+ re (* -1 re))) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* im (+ (* -1/8 (* (sqrt (/ 1 (pow re 3))) (+ re (* -1 re)))) (* 1/4 (* (* im (- (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) re)) (* 1/16 (/ (pow (+ re (* -1 re)) 2) (* (pow re 3) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* im (+ (* -1/8 (* (sqrt (/ 1 (pow re 3))) (+ re (* -1 re)))) (* im (+ (* 1/4 (* (sqrt (/ 1 re)) (- (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) re)) (* 1/16 (/ (pow (+ re (* -1 re)) 2) (* (pow re 3) (pow (sqrt 2) 2))))))) (* 1/4 (* (* im (- (* -1/2 (/ (+ (* -1/2 (/ (* (+ re (* -1 re)) (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2)))))) (pow re 2))) (/ (* (+ re (* -1 re)) (- 1 (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) (pow re 2))) re)) (* -1/4 (/ (* (+ re (* -1 re)) (- (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) re)) (* 1/16 (/ (pow (+ re (* -1 re)) 2) (* (pow re 3) (pow (sqrt 2) 2)))))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (+ (* -1/4 (* (* im (+ re (* -1 re))) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (pow (sqrt 2) 2)))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (+ (* im (+ (* -1/4 (* (sqrt (/ 1 (pow re 3))) (+ re (* -1 re)))) (* 1/2 (* (* im (- (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) re)) (* 1/16 (/ (pow (+ re (* -1 re)) 2) (* (pow re 3) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))) (* (sqrt re) (pow (sqrt 2) 2)))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (+ (* im (+ (* -1/4 (* (sqrt (/ 1 (pow re 3))) (+ re (* -1 re)))) (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (- (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) re)) (* 1/16 (/ (pow (+ re (* -1 re)) 2) (* (pow re 3) (pow (sqrt 2) 2))))))) (* 1/2 (* (* im (- (* -1/2 (/ (+ (* -1/2 (/ (* (+ re (* -1 re)) (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2)))))) (pow re 2))) (/ (* (+ re (* -1 re)) (- 1 (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) (pow re 2))) re)) (* -1/4 (/ (* (+ re (* -1 re)) (- (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) re)) (* 1/16 (/ (pow (+ re (* -1 re)) 2) (* (pow re 3) (pow (sqrt 2) 2)))))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))) (* (sqrt re) (pow (sqrt 2) 2)))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (+ (* -1 (/ (* im (+ re (* -1 re))) re)) (* 4 re))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (+ (* 4 re) (* im (+ (* -1 (/ (+ re (* -1 re)) re)) (* im (- (/ 1 re) (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 3))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 3)))))))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (+ (* 4 re) (* im (+ (* -1 (/ (+ re (* -1 re)) re)) (* im (- (+ (* -1 (/ (* im (+ (* -1/2 (/ (* (+ re (* -1 re)) (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2)))))) (pow re 2))) (/ (* (+ re (* -1 re)) (- 1 (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) (pow re 2)))) re)) (/ 1 re)) (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 3))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 3)))))))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (+ (* -1/2 (/ (* im (+ re (* -1 re))) re)) (* 2 re))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (+ (* 2 re) (* im (+ (* -1/2 (/ (+ re (* -1 re)) re)) (* 1/2 (/ (* im (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2)))))) re)))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (+ (* 2 re) (* im (+ (* -1/2 (/ (+ re (* -1 re)) re)) (* im (+ (* -1/2 (/ (* im (+ (* -1/2 (/ (* (+ re (* -1 re)) (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2)))))) (pow re 2))) (/ (* (+ re (* -1 re)) (- 1 (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) (pow re 2)))) re)) (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) re)))))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (+ re (* -1/2 (/ (* im (+ re (* -1 re))) re)))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (+ re (* im (+ (* -1/2 (/ (+ re (* -1 re)) re)) (* 1/2 (/ (* im (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2)))))) re)))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (+ re (* im (+ (* -1/2 (/ (+ re (* -1 re)) re)) (* im (+ (* -1/2 (/ (* im (+ (* -1/2 (/ (* (+ re (* -1 re)) (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2)))))) (pow re 2))) (/ (* (+ re (* -1 re)) (- 1 (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) (pow re 2)))) re)) (* 1/2 (/ (- 1 (+ (* -1 (/ (pow (+ re (* -1 re)) 2) (pow re 2))) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) re)))))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (+ (* -1/2 (/ (pow im 4) (pow re 2))) (pow re 2))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (+ (* (pow im 4) (- (* -1/8 (/ (pow im 4) (pow re 6))) (* 1/2 (/ 1 (pow re 2))))) (pow re 2))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (+ (* (pow im 4) (- (* (pow im 4) (- (* -1/16 (/ (pow im 4) (pow re 10))) (* 1/8 (/ 1 (pow re 6))))) (* 1/2 (/ 1 (pow re 2))))) (pow re 2))))
#s(approx (* (* (neg im) im) (* im im)) #s(hole binary64 (* -1 (pow im 4))))
#s(approx (* (neg im) im) #s(hole binary64 (* -1 (pow im 2))))
#s(approx (neg im) #s(hole binary64 (* -1 im)))
#s(approx (* im im) #s(hole binary64 (pow im 2)))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (+ re (* 1/2 (/ (* im (+ re (* -1 re))) re)))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (+ re (* im (+ (* -1/2 (/ (* im (+ 1 (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2))))) re)) (* 1/2 (/ (+ re (* -1 re)) re)))))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (+ re (* im (+ (* 1/2 (/ (+ re (* -1 re)) re)) (* im (+ (* -1/2 (/ (+ 1 (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2)))) re)) (* 1/4 (/ (* im (* (+ 1 (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow re 2)))) (+ re (* -1 re)))) (pow re 3))))))))))
#s(approx (* (+ re im) (- re im)) #s(hole binary64 (+ (* im (+ re (* -1 re))) (pow re 2))))
#s(approx (* (+ re im) (- re im)) #s(hole binary64 (+ (* im (+ re (+ (* -1 im) (* -1 re)))) (pow re 2))))
#s(approx (- re im) #s(hole binary64 (+ re (* -1 im))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* -1/4 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/8 (sqrt (/ 1 (pow re 3)))))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/4 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (pow (sqrt 2) 2)))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* -1/2 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/4 (sqrt (/ 1 (pow re 3)))))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* 1/4 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/2 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (+ (* 4 re) (/ (pow im 2) re))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (+ (* 4 re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (+ (* 4 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ (* 1/2 (/ (pow im 2) re)) (* 2 re))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ (* 2 re) (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (+ (* 2 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* -1/4 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/8 (sqrt (/ 1 (pow re 3)))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/4 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (pow (sqrt 2) 2)))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* -1/2 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/4 (sqrt (/ 1 (pow re 3)))))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* 1/4 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/2 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (+ (* 4 re) (/ (pow im 2) re))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (+ (* 4 re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (+ (* 4 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (+ (* 1/2 (/ (pow im 2) re)) (* 2 re))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (+ (* 2 re) (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (+ (* 2 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (+ re (* 1/2 (/ (pow im 2) re)))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))))
#s(approx (pow im 6) #s(hole binary64 (pow im 6)))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) #s(hole binary64 (+ (* -1 (* (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) #s(hole binary64 (+ (* (pow im 2) (- (pow im 2) (pow re 2))) (pow re 4))))
#s(approx (- (pow im 4) (* (* re re) (* im im))) #s(hole binary64 (* (pow im 2) (- (pow im 2) (pow re 2)))))
#s(approx (pow im 4) #s(hole binary64 (pow im 4)))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (+ (* 1/8 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* -1/4 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/8 (sqrt (/ 1 (pow re 3)))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (+ (* 1/2 (* (sqrt re) (pow (sqrt 2) 2))) (* (pow im 2) (+ (* 1/8 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/4 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/4 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (+ (* 1/4 (* (pow im 2) (sqrt (/ 1 (pow re 3))))) (* (sqrt re) (pow (sqrt 2) 2)))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* -1/2 (* (* (pow im 2) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3))))) (sqrt (/ 1 re)))) (* 1/4 (sqrt (/ 1 (pow re 3)))))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (+ (* (sqrt re) (pow (sqrt 2) 2)) (* (pow im 2) (+ (* 1/4 (sqrt (/ 1 (pow re 3)))) (* (pow im 2) (+ (* -1/2 (* (sqrt (/ 1 re)) (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))))) (* 1/2 (* (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* -1/4 (/ (+ (* 1/16 (/ 1 (* (pow re 3) (pow (sqrt 2) 2)))) (* 1/8 (/ 1 (pow re 3)))) (* (pow re 2) (pow (sqrt 2) 2)))))) (sqrt (/ 1 re)))))))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (+ (* 4 re) (/ (pow im 2) re))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (+ (* 4 re) (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (+ (* 4 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (+ (* 1/2 (/ (pow im 2) re)) (* 2 re))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (+ (* 2 re) (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (+ (* 2 re) (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (* (pow 1 1/4) (sqrt re))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (* 1/4 (* (pow 1 1/4) (* (pow im 2) (sqrt (/ 1 (pow re 3)))))) (* (pow 1 1/4) (sqrt re)))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (* (pow 1 1/4) (sqrt re)) (* (pow im 2) (+ (* -3/32 (* (pow 1 1/4) (* (pow im 2) (sqrt (/ 1 (pow re 7)))))) (* 1/4 (* (pow 1 1/4) (sqrt (/ 1 (pow re 3))))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (* (pow 1 1/4) (sqrt re)) (* (pow im 2) (+ (* 1/4 (* (pow 1 1/4) (sqrt (/ 1 (pow re 3))))) (* (pow im 2) (+ (* -3/32 (* (pow 1 1/4) (sqrt (/ 1 (pow re 7))))) (* 7/128 (* (pow 1 1/4) (* (pow im 2) (sqrt (/ 1 (pow re 11)))))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (* (pow (pow 1 3) 1/8) (pow re 1/4))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (pow 1 3) 1/8) (* (pow im 2) (pow (/ 1 (pow re 7)) 1/4)))) (* (pow (pow 1 3) 1/8) (pow re 1/4)))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* (pow im 2) (+ (* -7/128 (* (pow (pow 1 3) 1/8) (* (pow im 2) (pow (/ 1 (pow re 15)) 1/4)))) (* 1/8 (* (pow (pow 1 3) 1/8) (pow (/ 1 (pow re 7)) 1/4))))) (* (pow (pow 1 3) 1/8) (pow re 1/4)))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* (pow im 2) (+ (* 1/8 (* (pow (pow 1 3) 1/8) (pow (/ 1 (pow re 7)) 1/4))) (* (pow im 2) (+ (* -7/128 (* (pow (pow 1 3) 1/8) (pow (/ 1 (pow re 15)) 1/4))) (* 35/1024 (* (pow (pow 1 3) 1/8) (* (pow im 2) (pow (/ 1 (pow re 23)) 1/4)))))))) (* (pow (pow 1 3) 1/8) (pow re 1/4)))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ re (* 1/2 (/ (pow im 2) re)))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (* (pow 1 1/4) (sqrt re))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (* 1/4 (* (pow 1 1/4) (* (pow im 2) (sqrt (/ 1 (pow re 3)))))) (* (pow 1 1/4) (sqrt re)))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (* (pow 1 1/4) (sqrt re)) (* (pow im 2) (+ (* -3/32 (* (pow 1 1/4) (* (pow im 2) (sqrt (/ 1 (pow re 7)))))) (* 1/4 (* (pow 1 1/4) (sqrt (/ 1 (pow re 3))))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (* (pow 1 1/4) (sqrt re)) (* (pow im 2) (+ (* 1/4 (* (pow 1 1/4) (sqrt (/ 1 (pow re 3))))) (* (pow im 2) (+ (* -3/32 (* (pow 1 1/4) (sqrt (/ 1 (pow re 7))))) (* 7/128 (* (pow 1 1/4) (* (pow im 2) (sqrt (/ 1 (pow re 11)))))))))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (/ 1 (sqrt 2))))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))) (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (* im (+ (* 2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (+ (* 2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (/ (pow re 2) (sqrt 2)))) (+ (* 2 (* (sqrt (/ 1 im)) (/ 1 (sqrt 2)))) (* (sqrt (/ 1 (pow im 3))) (/ re (sqrt 2)))))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* im (+ (sqrt (/ 1 im)) (* 1/2 (* (sqrt (/ 1 (pow im 3))) re))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* im (+ (sqrt (/ 1 im)) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) re)))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* im (+ (sqrt (/ 1 im)) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (* (sqrt (/ 1 (pow im 3))) re))))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* im (+ 1 (/ re im)))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* im (+ 1 (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* (sqrt 2) (+ re (* 1/2 (+ re (* -1 re))))))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2))))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* (sqrt 2) (+ re (* 1/2 (+ re (* -1 re))))))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2))))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* (sqrt 2) (+ re (* 1/2 (+ re (* -1 re))))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 7))) (* (sqrt 2) (- (* -1/2 (+ (* -1 (* (pow re 2) (+ re (* -1 re)))) (+ (* -1/2 (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))))) (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (* -1 (pow (+ re (* -1 re)) 2))))))) (* 1/4 (* im (pow (+ re (* 1/2 (+ re (* -1 re)))) 2))))))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (sqrt 2) (+ re (* 1/2 (+ re (* -1 re))))))) (* (sqrt (/ 1 im)) (sqrt 2))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2))))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (sqrt 2) (+ re (* 1/2 (+ re (* -1 re))))))) (* (sqrt (/ 1 im)) (sqrt 2)))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2))))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (sqrt 2) (+ re (* 1/2 (+ re (* -1 re))))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 7))) (* (sqrt 2) (- (* -1/2 (+ (* -1 (* (pow re 2) (+ re (* -1 re)))) (+ (* -1/2 (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))))) (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (* -1 (pow (+ re (* -1 re)) 2))))))) (* 1/4 (* im (pow (+ re (* 1/2 (+ re (* -1 re)))) 2))))))) (* (sqrt (/ 1 im)) (sqrt 2))))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (* im (+ 2 (* 2 (/ (+ re (* 1/2 (+ re (* -1 re)))) im))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (* im (+ 2 (+ (* -1 (/ (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))) (pow im 2))) (* 2 (/ (+ re (* 1/2 (+ re (* -1 re)))) im)))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (* im (+ 2 (+ (* -1 (/ (+ (* -1 (* (pow re 2) (+ re (* -1 re)))) (+ (* -1/2 (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))))) (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (* -1 (pow (+ re (* -1 re)) 2)))))) (pow im 3))) (+ (* -1 (/ (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))) (pow im 2))) (* 2 (/ (+ re (* 1/2 (+ re (* -1 re)))) im))))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (* im (+ 1 (+ (* 1/2 (/ (+ re (* -1 re)) im)) (/ re im))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (* im (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))) (pow im 2))) (+ (* 1/2 (/ (+ re (* -1 re)) im)) (/ re im)))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (* im (+ 1 (+ (* -1/2 (/ (+ (* -1 (* (pow re 2) (+ re (* -1 re)))) (+ (* -1/2 (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))))) (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (* -1 (pow (+ re (* -1 re)) 2)))))) (pow im 3))) (+ (* -1/2 (/ (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))) (pow im 2))) (+ (* 1/2 (/ (+ re (* -1 re)) im)) (/ re im))))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* im (+ 1 (* 1/2 (/ (+ re (* -1 re)) im))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* im (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))) (pow im 2))) (* 1/2 (/ (+ re (* -1 re)) im)))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* im (+ 1 (+ (* -1/2 (/ (+ (* -1 (* (pow re 2) (+ re (* -1 re)))) (+ (* -1/2 (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))))) (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (* -1 (pow (+ re (* -1 re)) 2)))))) (pow im 3))) (+ (* -1/2 (/ (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))) (pow im 2))) (* 1/2 (/ (+ re (* -1 re)) im))))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (* (pow im 2) (+ (sqrt -1) (* 1/2 (/ (pow re 4) (* (pow im 4) (sqrt -1))))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (* (pow im 2) (+ (sqrt -1) (+ (* -1/8 (/ (pow re 8) (* (pow im 8) (pow (sqrt -1) 3)))) (* 1/2 (/ (pow re 4) (* (pow im 4) (sqrt -1)))))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) #s(hole binary64 (* (pow im 2) (+ (sqrt -1) (+ (* -1/8 (/ (pow re 8) (* (pow im 8) (pow (sqrt -1) 3)))) (+ (* 1/16 (/ (pow re 12) (* (pow im 12) (pow (sqrt -1) 5)))) (* 1/2 (/ (pow re 4) (* (pow im 4) (sqrt -1))))))))))
#s(approx (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im))) #s(hole binary64 (* (pow im 4) (- (/ (pow re 4) (pow im 4)) 1))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* im (+ (sqrt -1) (* 1/2 (/ (+ re (* -1 re)) (* im (sqrt -1))))))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* im (+ (sqrt -1) (+ (* 1/2 (/ (+ re (* -1 re)) (* im (sqrt -1)))) (* 1/2 (/ (- (pow re 2) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow (sqrt -1) 2)))) (* (pow im 2) (sqrt -1)))))))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* im (+ (sqrt -1) (+ (* -1/4 (/ (* (+ re (* -1 re)) (- (pow re 2) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow (sqrt -1) 2))))) (* (pow im 3) (pow (sqrt -1) 3)))) (+ (* 1/2 (/ (+ re (* -1 re)) (* im (sqrt -1)))) (* 1/2 (/ (- (pow re 2) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow (sqrt -1) 2)))) (* (pow im 2) (sqrt -1))))))))))
#s(approx (* (+ re im) (- re im)) #s(hole binary64 (* (pow im 2) (- (+ (* -1 (/ re im)) (/ re im)) 1))))
#s(approx (* (+ re im) (- re im)) #s(hole binary64 (* (pow im 2) (- (+ (* -1 (/ re im)) (+ (/ re im) (/ (pow re 2) (pow im 2)))) 1))))
#s(approx (+ re im) #s(hole binary64 (* im (+ 1 (/ re im)))))
#s(approx (- re im) #s(hole binary64 (* im (- (/ re im) 1))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (+ (* -1 (pow re 2)) (* 1/2 (pow re 2)))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (+ (* -1 (pow re 2)) (* 1/2 (pow re 2)))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 7))) (* (sqrt 2) (+ (* 1/4 (* im (pow re 2))) (+ (* 1/2 (pow re 3)) (* re (+ (* -1 (pow re 2)) (* 1/2 (pow re 2))))))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (+ (* -1 (pow re 2)) (* 1/2 (pow re 2)))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (* (sqrt 2) (+ (* -1 (pow re 2)) (* 1/2 (pow re 2)))))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 7))) (* (sqrt 2) (+ (* 1/4 (* im (pow re 2))) (+ (* 1/2 (pow re 3)) (* re (+ (* -1 (pow re 2)) (* 1/2 (pow re 2))))))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* im (+ 2 (* 2 (/ re im))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* im (- (+ 2 (* -1 (/ (+ (* -2 (pow re 2)) (pow re 2)) (pow im 2)))) (* -2 (/ re im))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* im (- (+ 2 (* -1 (/ (+ (* re (+ (* -2 (pow re 2)) (pow re 2))) (pow re 3)) (pow im 3)))) (+ (* -2 (/ re im)) (+ (* -2 (/ (pow re 2) (pow im 2))) (/ (pow re 2) (pow im 2))))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* im (+ 1 (/ re im)))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* im (- (+ 1 (* -1 (/ (+ (* -1 (pow re 2)) (* 1/2 (pow re 2))) (pow im 2)))) (* -1 (/ re im))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* im (- (+ 1 (* -1 (/ (+ (* 1/2 (pow re 3)) (* re (+ (* -1 (pow re 2)) (* 1/2 (pow re 2))))) (pow im 3)))) (+ (* -1 (/ re im)) (+ (* -1 (/ (pow re 2) (pow im 2))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (pow (sqrt (+ (* re re) (* im im))) 2) #s(hole binary64 (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* im (+ 1 (* -1 (/ re im))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (* im (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* im (+ 2 (* 2 (/ re im))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* im (+ 2 (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2)))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* im (+ 2 (+ (* -1 (/ (+ (* -1 (pow re 4)) (+ (* 1/4 (pow re 4)) (pow re 4))) (pow im 4))) (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2))))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* im (+ 1 (/ re im)))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* im (+ 1 (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* im (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow re 4)) (+ (* 1/4 (pow re 4)) (pow re 4))) (pow im 4))) (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im)))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* im (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow re 4)) (+ (* 1/4 (pow re 4)) (pow re 4))) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* im (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow re 4)) (+ (* 1/4 (pow re 4)) (pow re 4))) (pow im 4))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow re 2) (+ (* -1 (pow re 4)) (+ (* 1/4 (pow re 4)) (pow re 4))))) (* (pow re 2) (+ (* -1 (pow re 4)) (pow re 4)))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) #s(hole binary64 (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) #s(hole binary64 (* (pow im 2) (- (+ 1 (* -1 (/ (+ (* -1 (pow re 4)) (pow re 4)) (pow im 4)))) (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) #s(hole binary64 (* (pow im 2) (- (+ 1 (* -1 (/ (* (pow re 2) (+ (* -1 (pow re 4)) (pow re 4))) (pow im 6)))) (+ (* -1 (/ (pow re 2) (pow im 2))) (+ (* -1 (/ (pow re 4) (pow im 4))) (/ (pow re 4) (pow im 4))))))))
#s(approx (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) #s(hole binary64 (* (pow im 6) (+ 1 (/ (pow re 6) (pow im 6))))))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) #s(hole binary64 (* (pow im 4) (+ 1 (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) #s(hole binary64 (* (pow im 4) (- (+ 1 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
#s(approx (- (pow im 4) (* (* re re) (* im im))) #s(hole binary64 (* (pow im 4) (+ 1 (* -1 (/ (pow re 2) (pow im 2)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (* im (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (* im (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* im (+ 2 (* 2 (/ re im))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* im (+ 2 (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2)))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* im (+ 2 (+ (* -1/4 (/ (pow re 4) (pow im 4))) (+ (* 2 (/ re im)) (/ (pow re 2) (pow im 2))))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* im (+ 1 (/ re im)))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* im (+ 1 (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/2 (/ (pow re 2) (pow im 2))) (/ re im)))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (sqrt im)))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (sqrt im) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (pow re 2))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (sqrt im) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (pow re 2))) (* (sqrt (/ 1 (pow im 7))) (+ (* -1/8 (pow re 4)) (* 1/32 (pow re 4))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (sqrt im) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (pow re 2))) (+ (* (sqrt (/ 1 (pow im 7))) (+ (* -1/8 (pow re 4)) (* 1/32 (pow re 4)))) (* (sqrt (/ 1 (pow im 11))) (+ (* -1/32 (pow re 6)) (+ (* 1/384 (pow re 6)) (* 1/12 (pow re 6))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (pow (* 1 im) 1/4)))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (/ 1 (pow im 7)) 1/4) (pow re 2))) (pow (* 1 im) 1/4))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (/ 1 (pow im 7)) 1/4) (pow re 2))) (+ (* (pow (/ 1 (pow im 15)) 1/4) (+ (* -1/16 (pow re 4)) (* 1/128 (pow re 4)))) (pow (* 1 im) 1/4)))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (/ 1 (pow im 7)) 1/4) (pow re 2))) (+ (* (pow (/ 1 (pow im 15)) 1/4) (+ (* -1/16 (pow re 4)) (* 1/128 (pow re 4)))) (+ (* (pow (/ 1 (pow im 23)) 1/4) (+ (* -1/128 (pow re 6)) (+ (* 1/3072 (pow re 6)) (* 1/24 (pow re 6))))) (pow (* 1 im) 1/4))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (sqrt im)))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (sqrt im) (* 1/4 (* (sqrt (/ 1 (pow im 3))) (pow re 2))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (sqrt im) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (pow re 2))) (* (sqrt (/ 1 (pow im 7))) (+ (* -1/8 (pow re 4)) (* 1/32 (pow re 4))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (sqrt im) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (pow re 2))) (+ (* (sqrt (/ 1 (pow im 7))) (+ (* -1/8 (pow re 4)) (* 1/32 (pow re 4)))) (* (sqrt (/ 1 (pow im 11))) (+ (* -1/32 (pow re 6)) (+ (* 1/384 (pow re 6)) (* 1/12 (pow re 6))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 2) #s(hole binary64 (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (* -1 (* (sqrt im) (/ (sqrt -1) (sqrt 2))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (/ (sqrt -1) (sqrt 2))))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (/ (sqrt -1) (sqrt 2)))))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) #s(hole binary64 (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* 1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))) (* (sqrt (/ 1 im)) (/ (sqrt -1) (sqrt 2)))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (* -2 (* (sqrt im) (/ (sqrt -1) (sqrt 2))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (* -1 (* im (+ (* 2 (* (sqrt (/ 1 im)) (/ (sqrt -1) (sqrt 2)))) (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 5))) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (+ (* 2 (* (sqrt (/ 1 im)) (/ (sqrt -1) (sqrt 2)))) (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) #s(hole binary64 (* -1 (* im (+ (* -1 (/ (+ (* 1/4 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2)))) (* 1/2 (* (sqrt im) (/ (* (pow re 2) (sqrt -1)) (sqrt 2))))) (pow im 3))) (+ (* 2 (* (sqrt (/ 1 im)) (/ (sqrt -1) (sqrt 2)))) (* (sqrt (/ 1 (pow im 3))) (/ (* re (sqrt -1)) (sqrt 2)))))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* -1 (* (sqrt im) (sqrt -1)))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1)))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt -1)))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (sqrt -1)))) (* 1/4 (* (sqrt im) (* (pow re 2) (sqrt -1))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 im)))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ re im)))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (+ re (* -1/2 (/ (pow re 2) im))) im)))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (+ re (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im))) im)))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 im)))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (sqrt (+ (* re re) (* im im))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* (sqrt -1) (* (sqrt 2) (+ re (* 1/2 (+ re (* -1 re)))))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (* -1 (* im (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* (sqrt -1) (* (sqrt 2) (+ re (* 1/2 (+ re (* -1 re)))))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) #s(hole binary64 (* -1 (* im (+ (* -1 (/ (+ (* -1/4 (* (sqrt (/ 1 im)) (* (sqrt -1) (* (sqrt 2) (- (* -1/2 (+ (* -1 (* (pow re 2) (+ re (* -1 re)))) (+ (* -1/2 (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))))) (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (* -1 (pow (+ re (* -1 re)) 2))))))) (* -1/4 (* im (pow (+ re (* 1/2 (+ re (* -1 re)))) 2)))))))) (* -1/8 (* (sqrt im) (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2))))))))) (pow im 3))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* (sqrt -1) (* (sqrt 2) (+ re (* 1/2 (+ re (* -1 re)))))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (sqrt -1) (* (sqrt 2) (+ re (* 1/2 (+ re (* -1 re)))))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (sqrt -1) (* (sqrt 2) (+ re (* 1/2 (+ re (* -1 re)))))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) #s(hole binary64 (* -1 (* im (+ (* -1 (/ (+ (* -1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (* (sqrt 2) (- (* -1/2 (+ (* -1 (* (pow re 2) (+ re (* -1 re)))) (+ (* -1/2 (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))))) (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (* -1 (pow (+ re (* -1 re)) 2))))))) (* -1/4 (* im (pow (+ re (* 1/2 (+ re (* -1 re)))) 2)))))))) (* -1/4 (* (sqrt im) (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2))))))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* (sqrt -1) (* (sqrt 2) (+ re (* 1/2 (+ re (* -1 re)))))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (* -2 im)))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (* -1 (* im (+ 2 (* -2 (/ (+ re (* 1/2 (+ re (* -1 re)))) im)))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (pow re 2) im)) (+ (* -1 (/ (pow (+ re (* -1 re)) 2) im)) (+ (* 1/4 (/ (pow (+ re (* -1 re)) 2) im)) (* 2 (+ re (* 1/2 (+ re (* -1 re)))))))) im)))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) #s(hole binary64 (* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (+ (* -1 (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2))))) (+ (* -1 (/ (* (pow re 2) (+ re (* -1 re))) im)) (+ (* -1/2 (/ (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2))))) im)) (/ (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (* -1 (pow (+ re (* -1 re)) 2)))) im)))) im)) (* 2 (+ re (* 1/2 (+ re (* -1 re)))))) im)))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (* -1 im)))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (+ re (* 1/2 (+ re (* -1 re)))) im)))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (+ re (+ (* 1/2 (+ re (* -1 re))) (* 1/2 (/ (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))) im)))) im)))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (+ re (+ (* -1 (/ (+ (* -1/2 (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2))))) (* 1/2 (/ (+ (* -1 (* (pow re 2) (+ re (* -1 re)))) (+ (* -1/2 (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))))) (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (* -1 (pow (+ re (* -1 re)) 2)))))) im))) im)) (* 1/2 (+ re (* -1 re))))) im)))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* -1 im)))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* -1 (* im (+ 1 (* -1/2 (/ (+ re (* -1 re)) im)))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (+ (* 1/2 (+ re (* -1 re))) (* 1/2 (/ (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))) im))) im)))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (+ (* -1 (/ (+ (* -1/2 (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2))))) (* 1/2 (/ (+ (* -1 (* (pow re 2) (+ re (* -1 re)))) (+ (* -1/2 (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (+ (* -1 (pow (+ re (* -1 re)) 2)) (* 1/4 (pow (+ re (* -1 re)) 2)))))) (* (+ re (* -1 re)) (+ (* -1 (pow re 2)) (* -1 (pow (+ re (* -1 re)) 2)))))) im))) im)) (* 1/2 (+ re (* -1 re)))) im)))))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* -1 (* im (sqrt -1)))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* -1 (* im (+ (sqrt -1) (* -1/2 (/ (+ re (* -1 re)) (* im (sqrt -1)))))))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* -1 (* im (+ (sqrt -1) (* -1 (/ (+ (* -1/2 (/ (- (pow re 2) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow (sqrt -1) 2)))) (* im (sqrt -1)))) (* 1/2 (/ (+ re (* -1 re)) (sqrt -1)))) im)))))))
#s(approx (sqrt (* (+ re im) (- re im))) #s(hole binary64 (* -1 (* im (+ (sqrt -1) (* -1 (/ (+ (* -1 (/ (+ (* 1/4 (/ (* (+ re (* -1 re)) (- (pow re 2) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow (sqrt -1) 2))))) (* im (pow (sqrt -1) 3)))) (* 1/2 (/ (- (pow re 2) (* 1/4 (/ (pow (+ re (* -1 re)) 2) (pow (sqrt -1) 2)))) (sqrt -1)))) im)) (* 1/2 (/ (+ re (* -1 re)) (sqrt -1)))) im)))))))
#s(approx (* (+ re im) (- re im)) #s(hole binary64 (* (pow im 2) (- (* -1 (/ (+ re (* -1 re)) im)) 1))))
#s(approx (* (+ re im) (- re im)) #s(hole binary64 (* (pow im 2) (- (* -1 (/ (+ re (+ (* -1 re) (* -1 (/ (pow re 2) im)))) im)) 1))))
#s(approx (+ re im) #s(hole binary64 (* -1 (* im (- (* -1 (/ re im)) 1)))))
#s(approx (- re im) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ re im)))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow re 2)) (* 1/2 (pow re 2))))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) #s(hole binary64 (* -1 (* im (+ (* -1 (/ (+ (* -1/4 (* (sqrt im) (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow re 2)) (* 1/2 (pow re 2))))))) (* 1/4 (* (sqrt (/ 1 im)) (* (sqrt -1) (* (sqrt 2) (+ (* -1/4 (* im (pow re 2))) (+ (* 1/2 (pow re 3)) (* re (+ (* -1 (pow re 2)) (* 1/2 (pow re 2))))))))))) (pow im 3))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 5))) (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow re 2)) (* 1/2 (pow re 2))))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) #s(hole binary64 (* -1 (* im (+ (* -1 (/ (+ (* -1/2 (* (sqrt im) (* (sqrt -1) (* (sqrt 2) (+ (* -1 (pow re 2)) (* 1/2 (pow re 2))))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (* (sqrt 2) (+ (* -1/4 (* im (pow re 2))) (+ (* 1/2 (pow re 3)) (* re (+ (* -1 (pow re 2)) (* 1/2 (pow re 2))))))))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* -2 im)))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* -1 (* im (+ 2 (* -2 (/ re im)))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* -1 (* im (+ 2 (* -1 (/ (- (+ (* -2 (/ (pow re 2) im)) (/ (pow re 2) im)) (* -2 re)) im)))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) #s(hole binary64 (* -1 (* im (+ 2 (* -1 (/ (- (* -1 (/ (- (+ (/ (* re (+ (* -2 (pow re 2)) (pow re 2))) im) (/ (pow re 3) im)) (+ (* -2 (pow re 2)) (pow re 2))) im)) (* -2 re)) im)))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* -1 im)))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ re im)))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (- (+ (* -1 (/ (pow re 2) im)) (* 1/2 (/ (pow re 2) im))) (* -1 re)) im)))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (- (+ (* 1/2 (/ (pow re 3) im)) (/ (* re (+ (* -1 (pow re 2)) (* 1/2 (pow re 2)))) im)) (+ (* -1 (pow re 2)) (* 1/2 (pow re 2)))) im)) (* -1 re)) im)))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 im)))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 (* im (+ 1 (/ re im))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) #s(hole binary64 (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) #s(hole binary64 (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* -2 im)))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* -1 (* im (+ 2 (* -2 (/ re im)))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (pow re 2) im)) (* 2 re)) im)))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) #s(hole binary64 (* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (+ (* -1 (/ (+ (* -1 (pow re 4)) (+ (* 1/4 (pow re 4)) (pow re 4))) (pow im 2))) (pow re 2)) im)) (* 2 re)) im)))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* -1 im)))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ re im)))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (+ re (* -1/2 (/ (pow re 2) im))) im)))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (+ re (* -1 (/ (+ (* -1/2 (/ (+ (* -1 (pow re 4)) (+ (* 1/4 (pow re 4)) (pow re 4))) (pow im 2))) (* 1/2 (pow re 2))) im))) im)))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* -1 im)))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow re 4)) (+ (* 1/4 (pow re 4)) (pow re 4))) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/2 (/ (+ (* -1 (pow re 4)) (+ (* 1/4 (pow re 4)) (pow re 4))) (pow im 4))) (+ (* -1/2 (/ (+ (* -1/2 (* (pow re 2) (+ (* -1 (pow re 4)) (+ (* 1/4 (pow re 4)) (pow re 4))))) (* (pow re 2) (+ (* -1 (pow re 4)) (pow re 4)))) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (* -1 (* im (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (* -1 (* im (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) #s(hole binary64 (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (* -1 (* im (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) #s(hole binary64 (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* 1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* -2 im)))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* -1 (* im (+ 2 (* -2 (/ re im)))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (pow re 2) im)) (* 2 re)) im)))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) #s(hole binary64 (* -1 (* im (+ 2 (* -1 (/ (+ (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im)) (* 2 re)) im)))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* -1 im)))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ re im)))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (+ re (* -1/2 (/ (pow re 2) im))) im)))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) #s(hole binary64 (* -1 (* im (+ 1 (* -1 (/ (+ re (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im))) im)))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (* (sqrt im) (sqrt -1))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1)))) (* (sqrt im) (sqrt -1)))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1)))) (+ (* (sqrt im) (sqrt -1)) (* (sqrt (/ 1 (pow im 7))) (* (sqrt -1) (+ (* -1/8 (pow re 4)) (* 1/32 (pow re 4)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) #s(hole binary64 (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1)))) (+ (* (sqrt im) (sqrt -1)) (+ (* (sqrt (/ 1 (pow im 7))) (* (sqrt -1) (+ (* -1/8 (pow re 4)) (* 1/32 (pow re 4))))) (* (sqrt (/ 1 (pow im 11))) (* (sqrt -1) (+ (* -1/32 (pow re 6)) (+ (* 1/384 (pow re 6)) (* 1/12 (pow re 6)))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (pow (* -1 im) 1/4)))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (/ -1 (pow im 7)) 1/4) (pow re 2))) (pow (* -1 im) 1/4))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (/ -1 (pow im 7)) 1/4) (pow re 2))) (+ (* (pow (/ -1 (pow im 15)) 1/4) (+ (* -1/16 (pow re 4)) (* 1/128 (pow re 4)))) (pow (* -1 im) 1/4)))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) #s(hole binary64 (+ (* 1/8 (* (pow (/ -1 (pow im 7)) 1/4) (pow re 2))) (+ (* (pow (/ -1 (pow im 15)) 1/4) (+ (* -1/16 (pow re 4)) (* 1/128 (pow re 4)))) (+ (* (pow (/ -1 (pow im 23)) 1/4) (+ (* -1/128 (pow re 6)) (+ (* 1/3072 (pow re 6)) (* 1/24 (pow re 6))))) (pow (* -1 im) 1/4))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 im)))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))))
#s(approx (sqrt (+ (* im im) (* re re))) #s(hole binary64 (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (* (sqrt im) (sqrt -1))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1)))) (* (sqrt im) (sqrt -1)))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1)))) (+ (* (sqrt im) (sqrt -1)) (* (sqrt (/ 1 (pow im 7))) (* (sqrt -1) (+ (* -1/8 (pow re 4)) (* 1/32 (pow re 4)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4) #s(hole binary64 (+ (* 1/4 (* (sqrt (/ 1 (pow im 3))) (* (pow re 2) (sqrt -1)))) (+ (* (sqrt im) (sqrt -1)) (+ (* (sqrt (/ 1 (pow im 7))) (* (sqrt -1) (+ (* -1/8 (pow re 4)) (* 1/32 (pow re 4))))) (* (sqrt (/ 1 (pow im 11))) (* (sqrt -1) (+ (* -1/32 (pow re 6)) (+ (* 1/384 (pow re 6)) (* 1/12 (pow re 6)))))))))))

Outputs
(.f64 (.f64 (sqrt.f64 (+.f64 (hypot.f64 re im) re)) (/.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(*.f64 (sqrt.f64 (+.f64 (hypot.f64 re im) re)) (/.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64))))
(pow.f64 (+.f64 (hypot.f64 re im) re) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 (hypot.f64 re im) re))
(/.f64 (+.f64 (pow.f64 (hypot.f64 re im) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (+.f64 (pow.f64 (hypot.f64 re im) #s(literal 2 binary64)) (-.f64 (.f64 re re) (.f64 (hypot.f64 re im) re))))
(+.f64 (hypot.f64 re im) re)
(pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 re re (*.f64 im im)))
(hypot.f64 (fabs.f64 re) (fabs.f64 im))
(hypot.f64 (fabs.f64 re) (neg.f64 im))
(hypot.f64 (fabs.f64 re) im)
(hypot.f64 (neg.f64 re) (fabs.f64 im))
(hypot.f64 (neg.f64 re) (neg.f64 im))
(hypot.f64 (neg.f64 re) im)
(hypot.f64 re (fabs.f64 im))
(hypot.f64 re (neg.f64 im))
(hypot.f64 re im)
re
im
(/.f64 #s(literal -2 binary64) (neg.f64 (sqrt.f64 #s(literal 2 binary64))))
(/.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))
#s(literal 2 binary64)
(pow.f64 #s(literal 2 binary64) #s(literal 1/2 binary64))
(sqrt.f64 #s(literal 2 binary64))
#s(literal 1/2 binary64)
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 re re) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 im) im) (.f64 im im))) (*.f64 (+.f64 re im) (-.f64 re im)))) re))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 re re) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 im) im) (.f64 im im))) (.f64 (+.f64 re im) (-.f64 re im)))) re)))
(pow.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 re re) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 im) im) (.f64 im im))) (.f64 (+.f64 re im) (-.f64 re im)))) re)) #s(literal 1/2 binary64))
(sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 re re) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 im) im) (.f64 im im))) (.f64 (+.f64 re im) (-.f64 re im)))) re)))
(.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 re re) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 im) im) (.f64 im im))) (.f64 (+.f64 re im) (-.f64 re im)))) re))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 re re) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 im) im) (.f64 im im))) (.f64 (+.f64 re im) (-.f64 re im)))) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (fma.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 re re) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 im) im) (.f64 im im))) (.f64 (+.f64 re im) (-.f64 re im)))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 re re) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 im) im) (.f64 im im))) (.f64 (+.f64 re im) (-.f64 re im)))) (-.f64 (.f64 re re) (.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 re re) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 im) im) (.f64 im im))) (.f64 (+.f64 re im) (-.f64 re im)))) re))))
(+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 re re) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 im) im) (.f64 im im))) (*.f64 (+.f64 re im) (-.f64 re im)))) re)
(/.f64 (neg.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 re re) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 im) im) (.f64 im im))))) (neg.f64 (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im)))))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 re re) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 im) im) (.f64 im im)))) (sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 re re) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 im) im) (.f64 im im))) (*.f64 (+.f64 re im) (-.f64 re im))))
(pow.f64 (+.f64 (pow.f64 (.f64 re re) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 im) im) (.f64 im im))) #s(literal 1/2 binary64))
(sqrt.f64 (+.f64 (pow.f64 (.f64 re re) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 im) im) (.f64 im im))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (.f64 re re) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 im) im) (.f64 im im)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (.f64 re re) #s(literal 2 binary64)) (pow.f64 (.f64 re re) #s(literal 2 binary64)) (-.f64 (.f64 (.f64 (.f64 (neg.f64 im) im) (.f64 im im)) (.f64 (.f64 (neg.f64 im) im) (.f64 im im))) (.f64 (pow.f64 (.f64 re re) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 im) im) (.f64 im im))))))
(fma.f64 (neg.f64 (.f64 re re)) (neg.f64 (.f64 re re)) (.f64 (.f64 (neg.f64 im) im) (*.f64 im im)))
(fma.f64 (fabs.f64 (.f64 re re)) (fabs.f64 (.f64 re re)) (.f64 (.f64 (neg.f64 im) im) (*.f64 im im)))
(fma.f64 (.f64 re re) (.f64 re re) (.f64 (.f64 (neg.f64 im) im) (*.f64 im im)))
(+.f64 (pow.f64 (.f64 re re) #s(literal 2 binary64)) (.f64 (.f64 (neg.f64 im) im) (.f64 im im)))
(*.f64 (fabs.f64 re) (fabs.f64 re))
(*.f64 (neg.f64 re) (neg.f64 re))
(*.f64 re re)
(pow.f64 re #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 re) #s(literal 2 binary64)))
(.f64 (.f64 (neg.f64 im) im) (*.f64 im im))
(*.f64 (neg.f64 im) im)
(neg.f64 im)
(*.f64 (fabs.f64 im) (fabs.f64 im))
(*.f64 (neg.f64 im) (neg.f64 im))
(*.f64 im im)
(pow.f64 im #s(literal 2 binary64))
(exp.f64 (*.f64 (log.f64 im) #s(literal 2 binary64)))
(*.f64 (sqrt.f64 (+.f64 re im)) (sqrt.f64 (-.f64 re im)))
(pow.f64 (*.f64 (+.f64 re im) (-.f64 re im)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 (+.f64 re im) (-.f64 re im)))
(*.f64 (+.f64 re im) (-.f64 re im))
(/.f64 (+.f64 (pow.f64 re #s(literal 3 binary64)) (pow.f64 im #s(literal 3 binary64))) (fma.f64 re re (-.f64 (.f64 im im) (.f64 re im))))
(+.f64 re im)
(-.f64 re im)
(.f64 (sqrt.f64 (.f64 (/.f64 (-.f64 (pow.f64 (hypot.f64 re im) #s(literal 2 binary64)) (*.f64 re re)) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(.f64 (sqrt.f64 (/.f64 (-.f64 (pow.f64 (hypot.f64 re im) #s(literal 2 binary64)) (.f64 re re)) (-.f64 (hypot.f64 re im) re))) (sqrt.f64 #s(literal 2 binary64)))
(pow.f64 (.f64 (/.f64 (-.f64 (pow.f64 (hypot.f64 re im) #s(literal 2 binary64)) (.f64 re re)) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64)) #s(literal 1/2 binary64))
(sqrt.f64 (.f64 (/.f64 (-.f64 (pow.f64 (hypot.f64 re im) #s(literal 2 binary64)) (.f64 re re)) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64)))
(.f64 (/.f64 (-.f64 (pow.f64 (hypot.f64 re im) #s(literal 2 binary64)) (.f64 re re)) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64))
(/.f64 (neg.f64 (-.f64 (pow.f64 (hypot.f64 re im) #s(literal 2 binary64)) (*.f64 re re))) (neg.f64 (-.f64 (hypot.f64 re im) re)))
(/.f64 (-.f64 (pow.f64 (hypot.f64 re im) #s(literal 2 binary64)) (*.f64 re re)) (-.f64 (hypot.f64 re im) re))
(-.f64 (/.f64 (pow.f64 (hypot.f64 re im) #s(literal 2 binary64)) (-.f64 (hypot.f64 re im) re)) (/.f64 (*.f64 re re) (-.f64 (hypot.f64 re im) re)))
(-.f64 (pow.f64 (hypot.f64 re im) #s(literal 2 binary64)) (*.f64 re re))
(*.f64 (hypot.f64 re im) (hypot.f64 re im))
(pow.f64 (hypot.f64 re im) #s(literal 2 binary64))
(pow.f64 (fma.f64 re re (*.f64 im im)) #s(literal 1 binary64))
(exp.f64 (*.f64 (log.f64 (hypot.f64 re im)) #s(literal 2 binary64)))
(-.f64 (hypot.f64 re im) re)
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (neg.f64 re) re) re) #s(literal 2 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (*.f64 im im)))))) re))))
(.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (neg.f64 re) re) re) #s(literal 2 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 im im)))))) re)))
(pow.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (neg.f64 re) re) re) #s(literal 2 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 im im)))))) re)) #s(literal 1/2 binary64))
(sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (neg.f64 re) re) re) #s(literal 2 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 im im)))))) re)))
(.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (neg.f64 re) re) re) #s(literal 2 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 im im)))))) re))
(/.f64 (+.f64 (pow.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (neg.f64 re) re) re) #s(literal 2 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 im im)))))) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (fma.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (neg.f64 re) re) re) #s(literal 2 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 im im)))))) (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (neg.f64 re) re) re) #s(literal 2 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 im im)))))) (-.f64 (.f64 re re) (.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (neg.f64 re) re) re) #s(literal 2 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 im im)))))) re))))
(+.f64 (sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (neg.f64 re) re) re) #s(literal 2 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (*.f64 im im)))))) re)
(pow.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (neg.f64 re) re) re) #s(literal 2 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (*.f64 im im))))) #s(literal 1/2 binary64))
(/.f64 (sqrt.f64 (+.f64 (pow.f64 (.f64 (.f64 (neg.f64 re) re) re) #s(literal 2 binary64)) (pow.f64 im #s(literal 6 binary64)))) (sqrt.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (*.f64 im im))))))
(sqrt.f64 (/.f64 (+.f64 (pow.f64 (.f64 (.f64 (neg.f64 re) re) re) #s(literal 2 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (*.f64 im im))))))
(/.f64 (neg.f64 (+.f64 (pow.f64 (.f64 (.f64 (neg.f64 re) re) re) #s(literal 2 binary64)) (pow.f64 im #s(literal 6 binary64)))) (neg.f64 (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (*.f64 im im))))))
(/.f64 (+.f64 (pow.f64 (.f64 (.f64 (neg.f64 re) re) re) #s(literal 2 binary64)) (pow.f64 im #s(literal 6 binary64))) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (*.f64 im im)))))
(+.f64 (/.f64 (pow.f64 (.f64 (.f64 (neg.f64 re) re) re) #s(literal 2 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 im im))))) (/.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 im im))))))
(/.f64 (+.f64 (pow.f64 (pow.f64 (.f64 (.f64 (neg.f64 re) re) re) #s(literal 2 binary64)) #s(literal 3 binary64)) (pow.f64 (pow.f64 im #s(literal 6 binary64)) #s(literal 3 binary64))) (fma.f64 (pow.f64 (.f64 (.f64 (neg.f64 re) re) re) #s(literal 2 binary64)) (pow.f64 (.f64 (.f64 (neg.f64 re) re) re) #s(literal 2 binary64)) (-.f64 (.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (.f64 (pow.f64 (.f64 (.f64 (neg.f64 re) re) re) #s(literal 2 binary64)) (pow.f64 im #s(literal 6 binary64))))))
(fma.f64 (neg.f64 (.f64 (.f64 (neg.f64 re) re) re)) (neg.f64 (.f64 (.f64 (neg.f64 re) re) re)) (pow.f64 im #s(literal 6 binary64)))
(fma.f64 (fabs.f64 (.f64 (.f64 (neg.f64 re) re) re)) (fabs.f64 (.f64 (.f64 (neg.f64 re) re) re)) (pow.f64 im #s(literal 6 binary64)))
(fma.f64 (.f64 (.f64 (neg.f64 re) re) re) (.f64 (.f64 (neg.f64 re) re) re) (pow.f64 im #s(literal 6 binary64)))
(+.f64 (pow.f64 (.f64 (.f64 (neg.f64 re) re) re) #s(literal 2 binary64)) (pow.f64 im #s(literal 6 binary64)))
(.f64 (.f64 (neg.f64 re) re) re)
(*.f64 (neg.f64 re) re)
(neg.f64 re)
(pow.f64 im #s(literal 6 binary64))
(exp.f64 (*.f64 (log.f64 im) #s(literal 6 binary64)))
#s(literal 6 binary64)
(/.f64 (+.f64 (pow.f64 (pow.f64 re #s(literal 4 binary64)) #s(literal 3 binary64)) (pow.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 im im))) #s(literal 3 binary64))) (fma.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)) (-.f64 (.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 im im))) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 im im)))) (.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (.f64 im im)))))))
(+.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (*.f64 im im))))
(pow.f64 re #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 re) #s(literal 4 binary64)))
#s(literal 4 binary64)
(-.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 (.f64 re re) (*.f64 im im)))
(pow.f64 im #s(literal 4 binary64))
(exp.f64 (*.f64 (log.f64 im) #s(literal 4 binary64)))
(.f64 (.f64 re re) (*.f64 im im))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/2 binary64)) (pow.f64 (hypot.f64 im re) #s(literal 1/2 binary64)) re))))
(*.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (fma.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/2 binary64)) (pow.f64 (hypot.f64 im re) #s(literal 1/2 binary64)) re)))
(pow.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/2 binary64)) (pow.f64 (hypot.f64 im re) #s(literal 1/2 binary64)) re)) #s(literal 1/2 binary64))
(sqrt.f64 (*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/2 binary64)) (pow.f64 (hypot.f64 im re) #s(literal 1/2 binary64)) re)))
(*.f64 #s(literal 2 binary64) (fma.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/2 binary64)) (pow.f64 (hypot.f64 im re) #s(literal 1/2 binary64)) re))
(/.f64 (+.f64 (pow.f64 (.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/2 binary64)) (pow.f64 (hypot.f64 im re) #s(literal 1/2 binary64))) #s(literal 3 binary64)) (pow.f64 re #s(literal 3 binary64))) (fma.f64 (.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/2 binary64)) (pow.f64 (hypot.f64 im re) #s(literal 1/2 binary64))) (.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/2 binary64)) (pow.f64 (hypot.f64 im re) #s(literal 1/2 binary64))) (-.f64 (.f64 re re) (.f64 (.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/2 binary64)) (pow.f64 (hypot.f64 im re) #s(literal 1/2 binary64))) re))))
(fma.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/2 binary64)) (pow.f64 (hypot.f64 im re) #s(literal 1/2 binary64)) re)
(+.f64 (*.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/2 binary64)) (pow.f64 (hypot.f64 im re) #s(literal 1/2 binary64))) re)
(*.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (hypot.f64 im re) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64))) #s(literal 2 binary64)))
(pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64))
(pow.f64 (fma.f64 im im (*.f64 re re)) #s(literal 1/8 binary64))
(exp.f64 (*.f64 (log.f64 (hypot.f64 im re)) #s(literal 1/4 binary64)))
(pow.f64 (fma.f64 im im (*.f64 re re)) #s(literal 1/2 binary64))
(sqrt.f64 (fma.f64 im im (*.f64 re re)))
(hypot.f64 (fabs.f64 im) (fabs.f64 re))
(hypot.f64 (fabs.f64 im) (neg.f64 re))
(hypot.f64 (fabs.f64 im) re)
(hypot.f64 (neg.f64 im) (fabs.f64 re))
(hypot.f64 (neg.f64 im) (neg.f64 re))
(hypot.f64 (neg.f64 im) re)
(hypot.f64 im (fabs.f64 re))
(hypot.f64 im (neg.f64 re))
(hypot.f64 im re)
#s(literal 1/4 binary64)
(*.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64)) #s(literal 1/4 binary64))
(pow.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64)) #s(literal 2 binary64))
(pow.f64 (hypot.f64 im re) #s(literal 1/2 binary64))
(exp.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 2 binary64))) #s(literal 1/4 binary64)))
(exp.f64 (*.f64 (log.f64 (pow.f64 (hypot.f64 im re) #s(literal 1/4 binary64))) #s(literal 2 binary64)))
(*.f64 (hypot.f64 im re) (hypot.f64 im re))
(pow.f64 (hypot.f64 im re) #s(literal 2 binary64))
(pow.f64 (fma.f64 im im (*.f64 re re)) #s(literal 1 binary64))
(exp.f64 (*.f64 (log.f64 (hypot.f64 im re)) #s(literal 2 binary64)))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (*.f64 (sqrt.f64 im) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 (sqrt.f64 im) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (fma.f64 re (fma.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))))) (.f64 (sqrt.f64 im) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (fma.f64 re (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (.f64 re (fma.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))))))) (.f64 (sqrt.f64 im) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 im) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (fma.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 im) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (fma.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 im) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (.f64 re (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (fma.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 im) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (.f64 re (fma.f64 re (fma.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (sqrt.f64 im))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (+.f64 (sqrt.f64 im) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) re))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (+.f64 (sqrt.f64 im) (.f64 re (fma.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) re) (*.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 im)))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (+.f64 (sqrt.f64 im) (.f64 re (fma.f64 #s(literal 1/2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (.f64 re (fma.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) re) (.f64 #s(literal 1/8 binary64) (sqrt.f64 (pow.f64 im #s(literal -3 binary64))))))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) im)
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) (+.f64 im re))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) (+.f64 im (.f64 re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 re im))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) (+.f64 im (.f64 re (+.f64 #s(literal 1 binary64) (.f64 re (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 re re) (pow.f64 im #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -1 binary64)))))))))
#s(approx (sqrt (+ (* re re) (* im im))) im)
#s(approx (sqrt (+ (* re re) (* im im))) (+.f64 im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 re re) im))))
#s(approx (sqrt (+ (* re re) (* im im))) (+.f64 im (.f64 (.f64 re re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 re re) (pow.f64 im #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* re re) (* im im))) (+.f64 im (.f64 (.f64 re re) (fma.f64 (.f64 re re) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 re re) (pow.f64 im #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -1 binary64)))))))
#s(approx re re)
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (.f64 re (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) im)))))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))) (.f64 re (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (.f64 re (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im))))) im)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) im))) #s(literal 2 binary64)) im)))))) (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (*.f64 #s(literal -1 binary64) im)) im))))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))) (.f64 re (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) im))))) (.f64 re (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (.f64 re (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im))))) (.f64 im im)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (.f64 im im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im)))))) (.f64 im im))))) im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) im))) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im))))) im)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) im))) #s(literal 2 binary64)) im)))) im)))))) (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im))))) im)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (*.f64 #s(literal -1 binary64) im)) im))) #s(literal 2 binary64)) im))))))))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (.f64 re (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) im)))))) (sqrt.f64 (.f64 im #s(literal 2 binary64)))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (fma.f64 re (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (.f64 re (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im))))) im)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) im))) #s(literal 2 binary64)) im)))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) im))))))) (sqrt.f64 (.f64 im #s(literal 2 binary64)))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (fma.f64 re (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) im))))) (.f64 re (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (.f64 re (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im))))) (.f64 im im)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (.f64 im im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im)))))) (.f64 im im))))) im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) im))) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im))))) im)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) im))) #s(literal 2 binary64)) im)))) im)))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im))))) im)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) im))) #s(literal 2 binary64)) im))))))))) (sqrt.f64 (.f64 im #s(literal 2 binary64)))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (*.f64 #s(literal 2 binary64) im))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (fma.f64 #s(literal 2 binary64) im (.f64 #s(literal 2 binary64) (.f64 re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) im)))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (fma.f64 #s(literal 2 binary64) im (.f64 re (fma.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) im))) (.f64 re (-.f64 (pow.f64 im #s(literal -1 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (pow.f64 im #s(literal 3 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (*.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (pow.f64 im #s(literal 3 binary64)))))))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (fma.f64 #s(literal 2 binary64) im (.f64 re (fma.f64 #s(literal 2 binary64) (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) im))) (.f64 re (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im))))) (.f64 im im)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (.f64 im im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im)))))) (.f64 im im)))))) im) (pow.f64 im #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (pow.f64 im #s(literal 3 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (*.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (pow.f64 im #s(literal 3 binary64)))))))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) im)
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) (+.f64 im (.f64 re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (*.f64 #s(literal -1 binary64) im)) im))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) (+.f64 im (.f64 re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 re (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im)))))) im) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (*.f64 #s(literal -1 binary64) im)) im)))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) (+.f64 im (.f64 re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) im) (.f64 re (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im))))) (.f64 im im)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (.f64 im im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im)))))) (.f64 im im)))))) im) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (*.f64 im im))))) im)))))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) im)
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (+.f64 im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 re (+.f64 im (*.f64 #s(literal -1 binary64) im))) im))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (+.f64 im (.f64 re (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 re (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im)))))) im) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (*.f64 #s(literal -1 binary64) im)) im))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (+.f64 im (.f64 re (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) im) (.f64 re (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 re (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im))))) (.f64 im im)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (.f64 im im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im)))))) (.f64 im im)))))) im) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 im im)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (*.f64 im im))))) im))))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (.f64 (.f64 im im) (sqrt.f64 #s(literal -1 binary64))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (.f64 im im) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (.f64 im im) (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (fma.f64 (.f64 im im) (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 re #s(literal 4 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (.f64 im im) (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (fma.f64 (.f64 im im) (sqrt.f64 #s(literal -1 binary64)) (.f64 (pow.f64 re #s(literal 4 binary64)) (fma.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (pow.f64 im #s(literal 10 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64))))) (.f64 #s(literal 1/8 binary64) (pow.f64 (.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64))) #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 (.f64 (*.f64 im im) (sqrt.f64 #s(literal -1 binary64))) #s(literal -1 binary64)))))))
#s(approx (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im))) (*.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64))))
#s(approx (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im))) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))))
#s(approx (* re re) (*.f64 re re))
#s(approx (sqrt (* (+ re im) (- re im))) (*.f64 im (sqrt.f64 #s(literal -1 binary64))))
#s(approx (sqrt (* (+ re im) (- re im))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 re (+.f64 im (.f64 #s(literal -1 binary64) im))) (.f64 im (sqrt.f64 #s(literal -1 binary64)))) (.f64 im (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (* (+ re im) (- re im))) (fma.f64 im (sqrt.f64 #s(literal -1 binary64)) (.f64 re (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 re im) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 (.f64 im im) #s(literal -1 binary64))))) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (*.f64 im (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (sqrt (* (+ re im) (- re im))) (fma.f64 im (sqrt.f64 #s(literal -1 binary64)) (.f64 re (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (.f64 im (sqrt.f64 #s(literal -1 binary64)))) (.f64 re (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 re (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 (.f64 im im) #s(literal -1 binary64))))))) (pow.f64 (.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 (.f64 im im) #s(literal -1 binary64))))) (.f64 im (sqrt.f64 #s(literal -1 binary64)))))))))))
#s(approx (* (+ re im) (- re im)) (.f64 #s(literal -1 binary64) (.f64 im im)))
#s(approx (* (+ re im) (- re im)) (fma.f64 #s(literal -1 binary64) (.f64 im im) (.f64 re (+.f64 im (*.f64 #s(literal -1 binary64) im)))))
#s(approx (* (+ re im) (- re im)) (fma.f64 #s(literal -1 binary64) (.f64 im im) (.f64 re (+.f64 im (+.f64 re (*.f64 #s(literal -1 binary64) im))))))
#s(approx (+ re im) im)
#s(approx (+ re im) (+.f64 im re))
#s(approx (- re im) (*.f64 #s(literal -1 binary64) im))
#s(approx (- re im) (-.f64 re im))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64)))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))) (.f64 re (fma.f64 #s(literal 1/16 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64))))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))) (.f64 re (fma.f64 #s(literal 1/4 binary64) (sqrt.f64 (.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64))) (.f64 re (fma.f64 #s(literal -1/32 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/16 binary64) (sqrt.f64 (.f64 (pow.f64 im #s(literal -3 binary64)) #s(literal 2 binary64))))))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (fma.f64 re (fma.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (fma.f64 re (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64))) (.f64 re (fma.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/8 binary64) (sqrt.f64 (.f64 (pow.f64 im #s(literal -3 binary64)) #s(literal 2 binary64))))))) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (*.f64 #s(literal 2 binary64) im))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (fma.f64 #s(literal 2 binary64) im (*.f64 #s(literal 2 binary64) re)))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (fma.f64 #s(literal 2 binary64) im (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (fma.f64 #s(literal 2 binary64) im (.f64 re (+.f64 #s(literal 2 binary64) (.f64 re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 3 binary64))) (pow.f64 im #s(literal -1 binary64))))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) im)
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 im re))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 im (.f64 re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 re im))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 im (.f64 re (+.f64 #s(literal 1 binary64) (.f64 re (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 re re) (pow.f64 im #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -1 binary64)))))))))
#s(approx (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (*.f64 im im))
#s(approx (pow (sqrt (+ (* re re) (* im im))) 2) (*.f64 im im))
#s(approx (pow (sqrt (+ (* re re) (* im im))) 2) (fma.f64 im im (*.f64 re re)))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) im)
#s(approx (- (sqrt (+ (* re re) (* im im))) re) (+.f64 im (*.f64 #s(literal -1 binary64) re)))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) (+.f64 im (.f64 re (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 re im)) #s(literal 1 binary64)))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) (+.f64 im (.f64 re (-.f64 (.f64 re (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 re re) (pow.f64 im #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -1 binary64))))) #s(literal 1 binary64)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))) (.f64 re (fma.f64 #s(literal 1/16 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))) (.f64 re (fma.f64 #s(literal 1/4 binary64) (sqrt.f64 (.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64))) (.f64 re (fma.f64 #s(literal -1/32 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/16 binary64) (sqrt.f64 (.f64 (pow.f64 im #s(literal -3 binary64)) #s(literal 2 binary64))))))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (fma.f64 re (fma.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (fma.f64 re (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64))) (.f64 re (fma.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/8 binary64) (sqrt.f64 (.f64 (pow.f64 im #s(literal -3 binary64)) #s(literal 2 binary64))))))) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) (*.f64 #s(literal 2 binary64) im))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) (fma.f64 #s(literal 2 binary64) im (*.f64 #s(literal 2 binary64) re)))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) (fma.f64 #s(literal 2 binary64) im (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) (fma.f64 #s(literal 2 binary64) im (.f64 re (+.f64 #s(literal 2 binary64) (.f64 re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 3 binary64))) (pow.f64 im #s(literal -1 binary64))))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) im)
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) (+.f64 im re))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) (+.f64 im (.f64 re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 re im))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) (+.f64 im (.f64 re (+.f64 #s(literal 1 binary64) (.f64 re (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 re re) (pow.f64 im #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -1 binary64)))))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) im)
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) (+.f64 im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 re re) im))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) (+.f64 im (.f64 (.f64 re re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 re re) (pow.f64 im #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -1 binary64)))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) (+.f64 im (.f64 (.f64 re re) (fma.f64 (.f64 re re) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 re re) (pow.f64 im #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -1 binary64)))))))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) (*.f64 im im))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) (fma.f64 im im (*.f64 re re)))
#s(approx (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (pow.f64 im #s(literal 6 binary64)))
#s(approx (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))
#s(approx (* (* (neg re) re) re) (*.f64 #s(literal -1 binary64) (pow.f64 re #s(literal 3 binary64))))
#s(approx (* (neg re) re) (.f64 #s(literal -1 binary64) (.f64 re re)))
#s(approx (neg re) (*.f64 #s(literal -1 binary64) re))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) (pow.f64 im #s(literal 4 binary64)))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 im re) #s(literal 2 binary64)) (pow.f64 im #s(literal 4 binary64))))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) (fma.f64 (.f64 re re) (-.f64 (.f64 re re) (*.f64 im im)) (pow.f64 im #s(literal 4 binary64))))
#s(approx (pow re 4) (pow.f64 re #s(literal 4 binary64)))
#s(approx (- (pow im 4) (* (* re re) (* im im))) (pow.f64 im #s(literal 4 binary64)))
#s(approx (- (pow im 4) (* (* re re) (* im im))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 im re) #s(literal 2 binary64)) (pow.f64 im #s(literal 4 binary64))))
#s(approx (* (* re re) (* im im)) (pow.f64 (*.f64 im re) #s(literal 2 binary64)))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))) (.f64 re (fma.f64 #s(literal 1/16 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 im #s(literal 2 binary64))) (.f64 re (fma.f64 #s(literal 1/4 binary64) (sqrt.f64 (.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64))) (.f64 re (fma.f64 #s(literal -1/32 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/16 binary64) (sqrt.f64 (.f64 (pow.f64 im #s(literal -3 binary64)) #s(literal 2 binary64))))))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (sqrt.f64 (*.f64 im #s(literal 2 binary64))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (fma.f64 re (fma.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64))))) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (fma.f64 re (fma.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64))) (.f64 re (fma.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/8 binary64) (sqrt.f64 (.f64 (pow.f64 im #s(literal -3 binary64)) #s(literal 2 binary64))))))) (sqrt.f64 (*.f64 im #s(literal 2 binary64)))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (*.f64 #s(literal 2 binary64) im))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (fma.f64 #s(literal 2 binary64) im (*.f64 #s(literal 2 binary64) re)))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (fma.f64 #s(literal 2 binary64) im (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (fma.f64 #s(literal 2 binary64) im (.f64 re (+.f64 #s(literal 2 binary64) (.f64 re (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 re re) (pow.f64 im #s(literal 3 binary64))) (pow.f64 im #s(literal -1 binary64))))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) im)
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) (+.f64 im re))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) (+.f64 im (.f64 re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 re im))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) (+.f64 im (.f64 re (+.f64 #s(literal 1 binary64) (.f64 re (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 re re) (pow.f64 im #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -1 binary64)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (*.f64 #s(literal 1 binary64) (sqrt.f64 im)))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (fma.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re re))) (.f64 #s(literal 1 binary64) (sqrt.f64 im))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (fma.f64 #s(literal 1 binary64) (sqrt.f64 im) (.f64 (.f64 re re) (fma.f64 #s(literal -3/32 binary64) (.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -7 binary64))) (.f64 re re))) (.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 im #s(literal -3 binary64)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (fma.f64 #s(literal 1 binary64) (sqrt.f64 im) (.f64 (.f64 re re) (fma.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 im #s(literal -3 binary64)))) (.f64 (.f64 re re) (fma.f64 #s(literal -3/32 binary64) (.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 im #s(literal -7 binary64)))) (.f64 #s(literal 7/128 binary64) (.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -11 binary64))) (.f64 re re))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) (*.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 1/4 binary64))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) (fma.f64 #s(literal 1/8 binary64) (.f64 #s(literal 1 binary64) (.f64 (pow.f64 (pow.f64 im #s(literal -7 binary64)) #s(literal 1/4 binary64)) (.f64 re re))) (.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 1/4 binary64)))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) (fma.f64 (.f64 re re) (fma.f64 #s(literal -7/128 binary64) (.f64 #s(literal 1 binary64) (.f64 (pow.f64 (pow.f64 im #s(literal -15 binary64)) #s(literal 1/4 binary64)) (.f64 re re))) (.f64 #s(literal 1/8 binary64) (.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 im #s(literal -7 binary64)) #s(literal 1/4 binary64))))) (*.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 1/4 binary64)))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) (fma.f64 (.f64 re re) (fma.f64 #s(literal 1/8 binary64) (.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 im #s(literal -7 binary64)) #s(literal 1/4 binary64))) (.f64 (.f64 re re) (fma.f64 #s(literal -7/128 binary64) (.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 im #s(literal -15 binary64)) #s(literal 1/4 binary64))) (.f64 #s(literal 35/1024 binary64) (.f64 #s(literal 1 binary64) (.f64 (pow.f64 (pow.f64 im #s(literal -23 binary64)) #s(literal 1/4 binary64)) (.f64 re re))))))) (.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 1/4 binary64)))))
#s(approx (sqrt (+ (* im im) (* re re))) im)
#s(approx (sqrt (+ (* im im) (* re re))) (+.f64 im (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 re re) im))))
#s(approx (sqrt (+ (* im im) (* re re))) (+.f64 im (.f64 (.f64 re re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 re re) (pow.f64 im #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* im im) (* re re))) (+.f64 im (.f64 (.f64 re re) (fma.f64 (.f64 re re) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 re re) (pow.f64 im #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 im #s(literal -1 binary64)))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (*.f64 #s(literal 1 binary64) (sqrt.f64 im)))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (fma.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re re))) (.f64 #s(literal 1 binary64) (sqrt.f64 im))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (fma.f64 #s(literal 1 binary64) (sqrt.f64 im) (.f64 (.f64 re re) (fma.f64 #s(literal -3/32 binary64) (.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -7 binary64))) (.f64 re re))) (.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 im #s(literal -3 binary64)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (fma.f64 #s(literal 1 binary64) (sqrt.f64 im) (.f64 (.f64 re re) (fma.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 im #s(literal -3 binary64)))) (.f64 (.f64 re re) (fma.f64 #s(literal -3/32 binary64) (.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 im #s(literal -7 binary64)))) (.f64 #s(literal 7/128 binary64) (.f64 #s(literal 1 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -11 binary64))) (.f64 re re))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 2) (*.f64 im im))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 2) (fma.f64 im im (*.f64 re re)))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (sqrt.f64 re))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (.f64 re (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 im im) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 re #s(literal -5 binary64))))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (.f64 re (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) (fma.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 re #s(literal -9 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (*.f64 im im) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (.f64 re (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) (fma.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 re #s(literal -9 binary64)))) (fma.f64 #s(literal -1/32 binary64) (.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 4 binary64)) (sqrt.f64 (pow.f64 re #s(literal -9 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 im im) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 re #s(literal -5 binary64))))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (*.f64 #s(literal 2 binary64) (sqrt.f64 re)))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (.f64 re (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 im im) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (.f64 re (fma.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 re #s(literal -9 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 im im) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (*.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 re)))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (.f64 re (fma.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 re #s(literal -9 binary64)))) (fma.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 4 binary64)) (sqrt.f64 (pow.f64 re #s(literal -9 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 im im) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (.f64 #s(literal 2 binary64) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (sqrt.f64 (*.f64 re #s(literal 2 binary64))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (.f64 re (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 im im) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (sqrt.f64 (.f64 (pow.f64 re #s(literal -1 binary64)) #s(literal 2 binary64))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (.f64 re (fma.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -9 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 im im) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (sqrt.f64 (*.f64 (pow.f64 re #s(literal -1 binary64)) #s(literal 2 binary64)))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (.f64 re (fma.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -9 binary64)))) (fma.f64 #s(literal -1/32 binary64) (.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 #s(literal 2 binary64) #s(literal 3/2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -9 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 im im) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (sqrt.f64 (.f64 (pow.f64 re #s(literal -1 binary64)) #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 re (+.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im im) (.f64 re re))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) (.f64 re (+.f64 #s(literal 2 binary64) (fma.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 (.f64 im im) (.f64 re re)))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) (.f64 re (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (fma.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 (.f64 im im) (.f64 re re))))))))
#s(approx (sqrt (+ (* re re) (* im im))) re)
#s(approx (sqrt (+ (* re re) (* im im))) (.f64 re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im im) (.f64 re re))))))
#s(approx (sqrt (+ (* re re) (* im im))) (.f64 re (+.f64 #s(literal 1 binary64) (fma.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 (.f64 im im) (.f64 re re)))))))
#s(approx (sqrt (+ (* re re) (* im im))) (.f64 re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (fma.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 (.f64 im im) (.f64 re re))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 re) #s(literal 2 binary64))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (.f64 re (fma.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 re #s(literal -3 binary64))) (+.f64 im (.f64 #s(literal -1 binary64) im))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) #s(literal 2 binary64))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (.f64 re (fma.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 re #s(literal -3 binary64))) (+.f64 im (.f64 #s(literal -1 binary64) im))) (fma.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 re #s(literal -5 binary64))) (fma.f64 #s(literal -1 binary64) (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) #s(literal 2 binary64)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (.f64 re (fma.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 re #s(literal -3 binary64))) (+.f64 im (.f64 #s(literal -1 binary64) im))) (fma.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 re #s(literal -5 binary64))) (fma.f64 #s(literal -1 binary64) (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 re #s(literal -7 binary64))) (-.f64 (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -1 binary64) (.f64 im im) (.f64 #s(literal -1 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -1 binary64) (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))))) (.f64 (.f64 im im) (+.f64 im (.f64 #s(literal -1 binary64) im)))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 re (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) #s(literal 2 binary64))))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (*.f64 (sqrt.f64 re) #s(literal 2 binary64)))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (.f64 re (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 re #s(literal -3 binary64))) (+.f64 im (.f64 #s(literal -1 binary64) im))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) #s(literal 2 binary64)))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (.f64 re (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 re #s(literal -3 binary64))) (+.f64 im (.f64 #s(literal -1 binary64) im))) (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 re #s(literal -5 binary64))) (fma.f64 #s(literal -1 binary64) (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) #s(literal 2 binary64))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (.f64 re (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 re #s(literal -3 binary64))) (+.f64 im (.f64 #s(literal -1 binary64) im))) (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 re #s(literal -5 binary64))) (fma.f64 #s(literal -1 binary64) (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 re #s(literal -7 binary64))) (-.f64 (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -1 binary64) (.f64 im im) (.f64 #s(literal -1 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -1 binary64) (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))))) (.f64 (.f64 im im) (+.f64 im (.f64 #s(literal -1 binary64) im)))))) (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 re (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) #s(literal 2 binary64))))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) #s(literal 2 binary64)))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (*.f64 #s(literal 4 binary64) re))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (.f64 re (+.f64 #s(literal 4 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 im (*.f64 #s(literal -1 binary64) im)) re)))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (.f64 re (+.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) re) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (.f64 re re)))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (.f64 re (+.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -1 binary64) (.f64 im im) (.f64 #s(literal -1 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -1 binary64) (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))))) (.f64 (.f64 im im) (+.f64 im (.f64 #s(literal -1 binary64) im))))) (pow.f64 re #s(literal 3 binary64))) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (.f64 re re))))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) (*.f64 #s(literal 2 binary64) re))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) (.f64 re (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 im (*.f64 #s(literal -1 binary64) im)) re)))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) (.f64 re (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) re) (.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (.f64 re re)))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) (.f64 re (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -1 binary64) (.f64 im im) (.f64 #s(literal -1 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -1 binary64) (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))))) (.f64 (.f64 im im) (+.f64 im (.f64 #s(literal -1 binary64) im))))) (pow.f64 re #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (.f64 re re))))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (.f64 re (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 im (*.f64 #s(literal -1 binary64) im)) re)))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (.f64 re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) re) (.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (.f64 re re)))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (.f64 re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -1 binary64) (.f64 im im) (.f64 #s(literal -1 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal -1 binary64) (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))))) (.f64 (.f64 im im) (+.f64 im (.f64 #s(literal -1 binary64) im))))) (pow.f64 re #s(literal 3 binary64))) (.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (.f64 re re))))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (*.f64 re re))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (.f64 (.f64 re re) (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (.f64 (.f64 re re) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (*.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 im #s(literal 8 binary64)) (pow.f64 re #s(literal 8 binary64))))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (.f64 (.f64 re re) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 im #s(literal 8 binary64)) (pow.f64 re #s(literal 8 binary64))) (*.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 re #s(literal 12 binary64)))))))))
#s(approx (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im))) (pow.f64 re #s(literal 4 binary64)))
#s(approx (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im))) (.f64 (pow.f64 re #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))))))
#s(approx (sqrt (* (+ re im) (- re im))) re)
#s(approx (sqrt (* (+ re im) (- re im))) (.f64 re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (*.f64 #s(literal -1 binary64) im)) re)))))
#s(approx (sqrt (* (+ re im) (- re im))) (.f64 re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) re) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 im im)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (.f64 re re)))))))
#s(approx (sqrt (* (+ re im) (- re im))) (.f64 re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (-.f64 (.f64 #s(literal -1 binary64) (.f64 im im)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (pow.f64 re #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) re) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 #s(literal -1 binary64) (.f64 im im)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (.f64 re re))))))))
#s(approx (* (+ re im) (- re im)) (*.f64 re re))
#s(approx (* (+ re im) (- re im)) (.f64 (.f64 re re) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 im re) (/.f64 im re)))))
#s(approx (* (+ re im) (- re im)) (.f64 (.f64 re re) (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 im re) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 im im) (.f64 re re)) (/.f64 im re))))))
#s(approx (+ re im) re)
#s(approx (+ re im) (*.f64 re (+.f64 #s(literal 1 binary64) (/.f64 im re))))
#s(approx (- re im) re)
#s(approx (- re im) (.f64 re (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 im re)))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 re) #s(literal 2 binary64))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (.f64 re (fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) #s(literal 2 binary64))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (.f64 re (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 im im) (fma.f64 #s(literal -1/8 binary64) (.f64 im im) (.f64 #s(literal 1/4 binary64) (.f64 im im)))) (sqrt.f64 (pow.f64 re #s(literal -9 binary64)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) #s(literal 2 binary64)))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (.f64 re (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 im im) (fma.f64 #s(literal -1/8 binary64) (.f64 im im) (.f64 #s(literal 1/4 binary64) (.f64 im im)))) (sqrt.f64 (pow.f64 re #s(literal -9 binary64)))) (fma.f64 #s(literal -1/64 binary64) (.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 re #s(literal -9 binary64)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) #s(literal 2 binary64))))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (*.f64 (sqrt.f64 re) #s(literal 2 binary64)))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (.f64 re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) #s(literal 2 binary64)))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (.f64 re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 im im) (fma.f64 #s(literal -1/8 binary64) (.f64 im im) (.f64 #s(literal 1/4 binary64) (.f64 im im)))) (sqrt.f64 (pow.f64 re #s(literal -9 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) #s(literal 2 binary64))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (.f64 re (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 im im) (fma.f64 #s(literal -1/8 binary64) (.f64 im im) (.f64 #s(literal 1/4 binary64) (.f64 im im)))) (sqrt.f64 (pow.f64 re #s(literal -9 binary64)))) (fma.f64 #s(literal -1/32 binary64) (.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 re #s(literal -9 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) #s(literal 2 binary64)))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (*.f64 #s(literal 4 binary64) re))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re)))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (.f64 re (+.f64 #s(literal 4 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (.f64 im im) (.f64 re re))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (.f64 re (+.f64 #s(literal 4 binary64) (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.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)))) (.f64 im im)) (fma.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 im im) (fma.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)))))))) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (.f64 im im) (.f64 re re)))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal 2 binary64) re))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) (.f64 re (+.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im im) (.f64 re re))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) (.f64 re (-.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))))) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 im im) (.f64 re re))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) (.f64 re (-.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.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)))) (.f64 im im)) (fma.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64)) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 im im) (fma.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)))))))) (pow.f64 re #s(literal 6 binary64))))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 im im) (.f64 re re)) (fma.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/4 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))))))))
#s(approx (pow (sqrt (+ (* re re) (* im im))) 2) (*.f64 re re))
#s(approx (pow (sqrt (+ (* re re) (* im im))) 2) (.f64 (.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 im im) (.f64 re re)))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im im) re)))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 re re)) (.f64 #s(literal 1/2 binary64) (*.f64 im im))) re))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 re re)) (fma.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) (*.f64 im im)))) re))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.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))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 re re)) (fma.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) (.f64 im im))))) re))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 re) #s(literal 2 binary64))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (.f64 re (fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) #s(literal 2 binary64))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (.f64 re (fma.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 re #s(literal -9 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) #s(literal 2 binary64)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (.f64 re (fma.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 re #s(literal -9 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/64 binary64) (.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 re #s(literal -9 binary64)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) #s(literal 2 binary64))))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (*.f64 (sqrt.f64 re) #s(literal 2 binary64)))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (.f64 re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) #s(literal 2 binary64)))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (.f64 re (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 re #s(literal -9 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) #s(literal 2 binary64))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (.f64 re (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 re #s(literal -9 binary64))) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (fma.f64 #s(literal -1/32 binary64) (.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 re #s(literal -9 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) #s(literal 2 binary64)))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) (*.f64 #s(literal 4 binary64) re))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) (.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re)))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) (.f64 re (+.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))) (/.f64 (.f64 im im) (*.f64 re re))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) (.f64 re (+.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 6 binary64))) (/.f64 (.f64 im im) (*.f64 re re)))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) (*.f64 #s(literal 2 binary64) re))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) (.f64 re (+.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im im) (.f64 re re))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) (.f64 re (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im im) (.f64 re re)))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) (.f64 re (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im im) (.f64 re re))))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) (.f64 re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im im) (.f64 re re))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) (.f64 re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im im) (.f64 re re)))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) (.f64 re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im im) (.f64 re re))))))))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) (*.f64 re re))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) (.f64 (.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 im im) (.f64 re re)))))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) (.f64 (.f64 re re) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (pow.f64 re #s(literal 4 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 im im) (.f64 re re))))))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) (.f64 (.f64 re re) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 6 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 im im) (*.f64 re re)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))))))))
#s(approx (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (pow.f64 re #s(literal 6 binary64)))
#s(approx (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (*.f64 (pow.f64 re #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))))))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) (pow.f64 re #s(literal 4 binary64)))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) (.f64 (pow.f64 re #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 im im) (.f64 re re))))))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) (.f64 (pow.f64 re #s(literal 4 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (/.f64 (.f64 im im) (*.f64 re re)))))
#s(approx (- (pow im 4) (* (* re re) (* im im))) (.f64 #s(literal -1 binary64) (pow.f64 (.f64 im re) #s(literal 2 binary64))))
#s(approx (- (pow im 4) (* (* re re) (* im im))) (.f64 (.f64 re re) (-.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 re re)) (.f64 im im))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 re) #s(literal 2 binary64))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (.f64 re (fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) #s(literal 2 binary64))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (.f64 re (fma.f64 #s(literal -1/32 binary64) (.f64 (pow.f64 im #s(literal 4 binary64)) (sqrt.f64 (pow.f64 re #s(literal -9 binary64)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) #s(literal 2 binary64)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (.f64 re (fma.f64 #s(literal -1/32 binary64) (.f64 (pow.f64 im #s(literal 4 binary64)) (sqrt.f64 (pow.f64 re #s(literal -9 binary64)))) (fma.f64 #s(literal -1/64 binary64) (.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 re #s(literal -9 binary64)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) #s(literal 2 binary64))))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (*.f64 (sqrt.f64 re) #s(literal 2 binary64)))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (.f64 re (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) #s(literal 2 binary64)))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (.f64 re (fma.f64 #s(literal -1/16 binary64) (.f64 (pow.f64 im #s(literal 4 binary64)) (sqrt.f64 (pow.f64 re #s(literal -9 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) #s(literal 2 binary64))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (.f64 re (fma.f64 #s(literal -1/16 binary64) (.f64 (pow.f64 im #s(literal 4 binary64)) (sqrt.f64 (pow.f64 re #s(literal -9 binary64)))) (fma.f64 #s(literal -1/32 binary64) (.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 re #s(literal -9 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) #s(literal 2 binary64)))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (*.f64 #s(literal 4 binary64) re))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (.f64 re (+.f64 #s(literal 4 binary64) (/.f64 (.f64 im im) (*.f64 re re)))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (.f64 re (+.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (/.f64 (.f64 im im) (*.f64 re re))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (.f64 re (+.f64 #s(literal 4 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (/.f64 (.f64 im im) (*.f64 re re)))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) (*.f64 #s(literal 2 binary64) re))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) (.f64 re (+.f64 #s(literal 2 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im im) (.f64 re re))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) (.f64 re (+.f64 #s(literal 2 binary64) (fma.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 (.f64 im im) (.f64 re re)))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) (.f64 re (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (fma.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 (.f64 im im) (.f64 re re))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (sqrt.f64 re))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (+.f64 (sqrt.f64 re) (.f64 #s(literal 1/4 binary64) (.f64 (*.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (+.f64 (sqrt.f64 re) (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (.f64 (sqrt.f64 (pow.f64 re #s(literal -7 binary64))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64)) (.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 4 binary64))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (+.f64 (sqrt.f64 re) (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (fma.f64 (sqrt.f64 (pow.f64 re #s(literal -7 binary64))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64)) (.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 4 binary64)))) (.f64 (sqrt.f64 (pow.f64 re #s(literal -11 binary64))) (fma.f64 #s(literal -1/32 binary64) (pow.f64 im #s(literal 6 binary64)) (fma.f64 #s(literal 1/384 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 1/12 binary64) (pow.f64 im #s(literal 6 binary64))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) (pow.f64 (*.f64 #s(literal 1 binary64) re) #s(literal 1/4 binary64)))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 (pow.f64 re #s(literal -7 binary64)) #s(literal 1/4 binary64)) (.f64 im im)) (pow.f64 (*.f64 #s(literal 1 binary64) re) #s(literal 1/4 binary64))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 (pow.f64 re #s(literal -7 binary64)) #s(literal 1/4 binary64)) (.f64 im im)) (fma.f64 (pow.f64 (pow.f64 re #s(literal -15 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal -1/16 binary64) (pow.f64 im #s(literal 4 binary64)) (.f64 #s(literal 1/128 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 (.f64 #s(literal 1 binary64) re) #s(literal 1/4 binary64)))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 (pow.f64 re #s(literal -7 binary64)) #s(literal 1/4 binary64)) (.f64 im im)) (fma.f64 (pow.f64 (pow.f64 re #s(literal -15 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal -1/16 binary64) (pow.f64 im #s(literal 4 binary64)) (.f64 #s(literal 1/128 binary64) (pow.f64 im #s(literal 4 binary64)))) (fma.f64 (pow.f64 (pow.f64 re #s(literal -23 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal -1/128 binary64) (pow.f64 im #s(literal 6 binary64)) (fma.f64 #s(literal 1/3072 binary64) (pow.f64 im #s(literal 6 binary64)) (.f64 #s(literal 1/24 binary64) (pow.f64 im #s(literal 6 binary64))))) (pow.f64 (*.f64 #s(literal 1 binary64) re) #s(literal 1/4 binary64))))))
#s(approx (sqrt (+ (* im im) (* re re))) re)
#s(approx (sqrt (+ (* im im) (* re re))) (.f64 re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im im) (.f64 re re))))))
#s(approx (sqrt (+ (* im im) (* re re))) (.f64 re (+.f64 #s(literal 1 binary64) (fma.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 (.f64 im im) (.f64 re re)))))))
#s(approx (sqrt (+ (* im im) (* re re))) (.f64 re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (fma.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 (.f64 im im) (.f64 re re))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (sqrt.f64 re))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (+.f64 (sqrt.f64 re) (.f64 #s(literal 1/4 binary64) (.f64 (*.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (+.f64 (sqrt.f64 re) (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (.f64 (sqrt.f64 (pow.f64 re #s(literal -7 binary64))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64)) (.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 4 binary64))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (+.f64 (sqrt.f64 re) (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (fma.f64 (sqrt.f64 (pow.f64 re #s(literal -7 binary64))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64)) (.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 4 binary64)))) (.f64 (sqrt.f64 (pow.f64 re #s(literal -11 binary64))) (fma.f64 #s(literal -1/32 binary64) (pow.f64 im #s(literal 6 binary64)) (fma.f64 #s(literal 1/384 binary64) (pow.f64 im #s(literal 6 binary64)) (*.f64 #s(literal 1/12 binary64) (pow.f64 im #s(literal 6 binary64))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 2) (*.f64 re re))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 2) (.f64 (.f64 re re) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 im im) (.f64 re re)))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (.f64 (/.f64 (.f64 im (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (fma.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) #s(literal 1 binary64)) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (.f64 (/.f64 (.f64 im (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re)))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) #s(literal 1 binary64)) (sqrt.f64 re)) (.f64 #s(literal 1/32 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -1 binary64))) #s(literal 1 binary64)) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))))) (pow.f64 re #s(literal 3 binary64))) (.f64 (/.f64 (*.f64 im (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re)))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) #s(literal 1 binary64)) (sqrt.f64 re)) (fma.f64 #s(literal 1/512 binary64) (.f64 (.f64 (/.f64 (pow.f64 im #s(literal 5 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64))) (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (.f64 #s(literal 1/32 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -1 binary64))) #s(literal 1 binary64)) (sqrt.f64 (pow.f64 re #s(literal -3 binary64))))))) (pow.f64 re #s(literal 3 binary64))) (.f64 (/.f64 (*.f64 im (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re)))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (.f64 #s(literal 2 binary64) (.f64 (/.f64 (*.f64 im (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re)))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (fma.f64 #s(literal 1/8 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) #s(literal 1 binary64)) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (.f64 #s(literal 2 binary64) (.f64 (/.f64 (*.f64 im (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) #s(literal 1 binary64)) (sqrt.f64 re)) (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -1 binary64))) #s(literal 1 binary64)) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))))) (pow.f64 re #s(literal 3 binary64))) (.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 im (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) #s(literal 1 binary64)) (sqrt.f64 re)) (fma.f64 #s(literal 1/256 binary64) (.f64 (.f64 (/.f64 (pow.f64 im #s(literal 5 binary64)) (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64))) (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -1 binary64))) #s(literal 1 binary64)) (sqrt.f64 (pow.f64 re #s(literal -3 binary64))))))) (pow.f64 re #s(literal 3 binary64))) (.f64 #s(literal 2 binary64) (.f64 (/.f64 (.f64 im (sqrt.f64 #s(literal -1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (.f64 (.f64 im (sqrt.f64 #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (fma.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (.f64 (.f64 im (sqrt.f64 #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re)))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 re)) (.f64 #s(literal 1/32 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))))) (pow.f64 re #s(literal 3 binary64))) (.f64 (*.f64 im (sqrt.f64 #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re)))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 3 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 re)) (fma.f64 #s(literal 1/512 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -1 binary64))) (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (.f64 #s(literal 1/32 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64))))))) (pow.f64 re #s(literal 3 binary64))) (.f64 (*.f64 im (sqrt.f64 #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re)))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 im im) re)))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 re re)) (.f64 #s(literal 1/2 binary64) (.f64 im im))) re)))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 re re)) (fma.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) (.f64 im im)))) re)))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.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))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 re re)) (fma.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) (*.f64 im im))))) 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 (.f64 im im) (*.f64 re re)))))))
#s(approx (sqrt (+ (* re re) (* im im))) (.f64 #s(literal -1 binary64) (.f64 re (+.f64 #s(literal 1 binary64) (fma.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 (.f64 im im) (*.f64 re re))))))))
#s(approx (sqrt (+ (* re re) (* im im))) (.f64 #s(literal -1 binary64) (.f64 re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (fma.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 (.f64 im im) (*.f64 re re)))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (+.f64 im (*.f64 #s(literal -1 binary64) im))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (.f64 re (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 im (.f64 #s(literal -1 binary64) im))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (+.f64 im (*.f64 #s(literal -1 binary64) im)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) re) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) #s(literal -1 binary64)) (fma.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (.f64 (.f64 im im) (+.f64 im (.f64 #s(literal -1 binary64) im))))) #s(literal -1 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal -1 binary64) (.f64 #s(literal -1/2 binary64) (+.f64 im (.f64 #s(literal -1 binary64) im)))))))) (sqrt.f64 #s(literal -1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 im (.f64 #s(literal -1 binary64) im))))) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 im (.f64 #s(literal -1 binary64) im))))))) re) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (+.f64 im (*.f64 #s(literal -1 binary64) im)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) re) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) #s(literal -1 binary64)) (fma.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (.f64 (.f64 im im) (+.f64 im (.f64 #s(literal -1 binary64) im)))))) #s(literal -1 binary64)) (fma.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (.f64 (.f64 im im) (+.f64 im (.f64 #s(literal -1 binary64) im)))) (.f64 (.f64 im im) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))))))) #s(literal -1 binary64))) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) #s(literal -1 binary64)) (fma.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (.f64 (.f64 im im) (+.f64 im (.f64 #s(literal -1 binary64) im))))) #s(literal -1 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal -1 binary64) (.f64 #s(literal -1/2 binary64) (+.f64 im (.f64 #s(literal -1 binary64) im))))))) (+.f64 im (.f64 #s(literal -1 binary64) im))))))) (sqrt.f64 #s(literal -1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 im (.f64 #s(literal -1 binary64) im))))) (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) #s(literal -1 binary64)) (fma.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (.f64 (.f64 im im) (+.f64 im (.f64 #s(literal -1 binary64) im))))) #s(literal -1 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal -1 binary64) (.f64 #s(literal -1/2 binary64) (+.f64 im (.f64 #s(literal -1 binary64) im))))))))) (sqrt.f64 #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 im (.f64 #s(literal -1 binary64) im))))))) re) (.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 im (.f64 #s(literal -1 binary64) im))))))) re) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (.f64 re (sqrt.f64 #s(literal 1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 im (.f64 #s(literal -1 binary64) im))))) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (+.f64 im (.f64 #s(literal -1 binary64) im))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) re) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) #s(literal -1 binary64)) (fma.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (.f64 (.f64 im im) (+.f64 im (.f64 #s(literal -1 binary64) im))))) #s(literal -1 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal -1 binary64) (.f64 #s(literal -1/2 binary64) (+.f64 im (.f64 #s(literal -1 binary64) im)))))))) (sqrt.f64 #s(literal -1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 im (.f64 #s(literal -1 binary64) im))))) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 im (.f64 #s(literal -1 binary64) im))))))) re) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (+.f64 im (.f64 #s(literal -1 binary64) im))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) re) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) #s(literal -1 binary64)) (fma.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (.f64 (.f64 im im) (+.f64 im (.f64 #s(literal -1 binary64) im)))))) #s(literal -1 binary64)) (fma.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (.f64 (.f64 im im) (+.f64 im (.f64 #s(literal -1 binary64) im)))) (.f64 (.f64 im im) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))))))) #s(literal -1 binary64))) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) #s(literal -1/2 binary64)) (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) #s(literal -1 binary64)) (fma.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (.f64 (.f64 im im) (+.f64 im (.f64 #s(literal -1 binary64) im))))) #s(literal -1 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal -1 binary64) (.f64 #s(literal -1/2 binary64) (+.f64 im (.f64 #s(literal -1 binary64) im))))))) (+.f64 im (.f64 #s(literal -1 binary64) im))))))) (sqrt.f64 #s(literal -1/2 binary64)))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 im (.f64 #s(literal -1 binary64) im))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) #s(literal -1 binary64)) (fma.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (.f64 (.f64 im im) (+.f64 im (.f64 #s(literal -1 binary64) im))))) #s(literal -1 binary64))) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) #s(literal 2 binary64)) (.f64 #s(literal -1 binary64) (.f64 #s(literal -1/2 binary64) (+.f64 im (.f64 #s(literal -1 binary64) im))))))))) (sqrt.f64 #s(literal -1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 im (.f64 #s(literal -1 binary64) im))))))) re) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) (sqrt.f64 #s(literal 1/2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 (+.f64 im (.f64 #s(literal -1 binary64) im))))))) re) (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (+.f64 im (*.f64 #s(literal -1 binary64) im))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) (.f64 re #s(literal 1 binary64))) (/.f64 (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (*.f64 re #s(literal -1 binary64))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) re) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) #s(literal 1 binary64))) (/.f64 (fma.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (.f64 (.f64 im im) (+.f64 im (.f64 #s(literal -1 binary64) im)))) (.f64 re #s(literal -1 binary64))))) re))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) #s(literal -1 binary64)) (fma.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (.f64 (.f64 im im) (+.f64 im (.f64 #s(literal -1 binary64) im))))) #s(literal -1 binary64)) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (/.f64 (pow.f64 im #s(literal 4 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal 1 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) #s(literal -1 binary64)) (fma.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (.f64 (.f64 im im) (+.f64 im (.f64 #s(literal -1 binary64) im)))))) #s(literal 1 binary64)) (/.f64 (fma.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (.f64 (.f64 im im) (+.f64 im (.f64 #s(literal -1 binary64) im)))) (.f64 (.f64 im im) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) #s(literal -1 binary64))))) re))) re) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (*.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) #s(literal -1 binary64)))) re))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (*.f64 re #s(literal -1 binary64))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) #s(literal -1 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) #s(literal -1 binary64)) (fma.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (.f64 (.f64 im im) (+.f64 im (.f64 #s(literal -1 binary64) im))))) (.f64 re #s(literal -1 binary64))))) re) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 im (*.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64)))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) #s(literal -1 binary64)) (fma.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (.f64 (.f64 im im) (+.f64 im (.f64 #s(literal -1 binary64) im))))) #s(literal -1 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) #s(literal -1 binary64)) (fma.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (.f64 (.f64 im im) (+.f64 im (.f64 #s(literal -1 binary64) im)))))) #s(literal -1 binary64)) (fma.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (.f64 (.f64 im im) (+.f64 im (.f64 #s(literal -1 binary64) im)))) (.f64 (.f64 im im) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))))))) (.f64 re #s(literal -1 binary64))))) re) (.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) #s(literal -1 binary64)))) re) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64)))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (*.f64 #s(literal -1 binary64) re))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (.f64 #s(literal -1 binary64) (.f64 re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (*.f64 re #s(literal -1 binary64))))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (.f64 #s(literal -1 binary64) (.f64 re (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) (.f64 re #s(literal -1 binary64))))) re))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (.f64 #s(literal -1 binary64) (.f64 re (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)))) #s(literal -1 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))))) #s(literal -1 binary64)) (fma.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (fma.f64 im im (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64))) (.f64 (.f64 im im) (+.f64 im (.f64 #s(literal -1 binary64) im))))) (.f64 re #s(literal -1 binary64))))) re) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal -1 binary64)))) re))))))
#s(approx (sqrt (* (+ re im) (- re im))) (.f64 #s(literal -1 binary64) (.f64 re #s(literal -1 binary64))))
#s(approx (sqrt (* (+ re im) (- re im))) (.f64 #s(literal -1 binary64) (.f64 re (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 im (*.f64 #s(literal -1 binary64) im)) re) #s(literal -1 binary64)))))
#s(approx (sqrt (* (+ re im) (- re im))) (.f64 #s(literal -1 binary64) (.f64 re (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 im im) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)))) re) (.f64 #s(literal 1/2 binary64) (+.f64 im (*.f64 #s(literal -1 binary64) im)))) re) #s(literal -1 binary64)))))
#s(approx (sqrt (* (+ re im) (- re im))) (.f64 #s(literal -1 binary64) (.f64 re (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) (-.f64 (.f64 im im) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (.f64 re #s(literal -1 binary64))) (.f64 #s(literal 1/2 binary64) (-.f64 (.f64 im im) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 im (.f64 #s(literal -1 binary64) im)) #s(literal 2 binary64)) #s(literal -1 binary64)))))) re) (.f64 #s(literal 1/2 binary64) (+.f64 im (.f64 #s(literal -1 binary64) im)))) re) #s(literal -1 binary64)))))
#s(approx (* (+ re im) (- re im)) (.f64 (.f64 re re) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (+.f64 im (.f64 #s(literal -1 binary64) im)) (/.f64 (*.f64 im im) re)) re)))))
#s(approx (+ re im) (.f64 #s(literal -1 binary64) (.f64 re (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 im re)) #s(literal 1 binary64)))))
#s(approx (- re im) (.f64 #s(literal -1 binary64) (.f64 re (-.f64 (/.f64 im re) #s(literal 1 binary64)))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 im (.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re)))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (fma.f64 #s(literal 1/32 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 3 binary64)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 im (.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/32 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 3 binary64)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 re)) (.f64 #s(literal 1/64 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))))) (pow.f64 re #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/32 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 3 binary64)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 re)) (fma.f64 #s(literal 1/1024 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -2 binary64))) (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (.f64 #s(literal 1/64 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64))))))) (pow.f64 re #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (.f64 (.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (fma.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 3 binary64)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (.f64 (.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re)))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 3 binary64)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 re)) (.f64 #s(literal 1/32 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))))) (pow.f64 re #s(literal 3 binary64))) (.f64 (.f64 im (.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re)))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 3 binary64)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 re)) (fma.f64 #s(literal 1/512 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -2 binary64))) (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (.f64 #s(literal 1/32 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64))))))) (pow.f64 re #s(literal 3 binary64))) (.f64 (.f64 im (.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re)))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (.f64 #s(literal -1 binary64) (/.f64 (.f64 im im) re)))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 re re)) (*.f64 im im)) re)))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 re re)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im))) re)))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (fma.f64 #s(literal 1/128 binary64) (pow.f64 im #s(literal 8 binary64)) (.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 8 binary64)))) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 re re)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64))) (.f64 im im)))) re)))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 im im) re)))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 re re)) (.f64 #s(literal 1/2 binary64) (.f64 im im))) re)))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.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) (.f64 im im))) (.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (*.f64 re re)))) re)))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/128 binary64) (pow.f64 im #s(literal 8 binary64)) (.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 8 binary64)))) (pow.f64 re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 im im))) (fma.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)) (.f64 re re))))) re)))
#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 (.f64 im im) (*.f64 re re)))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) (.f64 #s(literal -1 binary64) (.f64 re (+.f64 #s(literal 2 binary64) (fma.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 (.f64 im im) (*.f64 re re))))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) (.f64 #s(literal -1 binary64) (.f64 re (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (fma.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 (.f64 im im) (*.f64 re re)))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 im (.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 im (.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 re)) (.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) im) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))))) (pow.f64 re #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 im (.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 re)) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) im) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (.f64 #s(literal 1/64 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) #s(literal 2 binary64)))) (pow.f64 (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 3 binary64))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64))))))) (pow.f64 re #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 im (.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (.f64 (.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (.f64 (.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re)))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 re)) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) im) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))))) (pow.f64 re #s(literal 3 binary64))) (.f64 (.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re)))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 re)) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (/.f64 (sqrt.f64 #s(literal -1 binary64)) im) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (.f64 #s(literal 1/32 binary64) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) #s(literal 2 binary64)))) (pow.f64 (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) #s(literal 3 binary64))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64))))))) (pow.f64 re #s(literal 3 binary64))) (.f64 (.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re)))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 im im) re)))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (.f64 re re)) (*.f64 im im)) re)))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (.f64 re re)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im))) re)))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 im im) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) #s(literal 2 binary64)) (.f64 (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))))) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (.f64 re re)) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im)))) re)))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 im im) re)))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (.f64 re re)) (.f64 #s(literal 1/2 binary64) (.f64 im im))) re)))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (.f64 re re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 im im)))) re)))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 im im) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))))) (fma.f64 #s(literal 1/4 binary64) (pow.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) #s(literal 2 binary64)) (.f64 (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))))) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (.f64 re re)) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 im im))))) re)))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) (*.f64 #s(literal -1 binary64) re))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) (.f64 #s(literal -1 binary64) (.f64 re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im im) (*.f64 re re)))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) (.f64 #s(literal -1 binary64) (.f64 re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im im) (*.f64 re re))))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) (.f64 #s(literal -1 binary64) (.f64 re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 re #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))) (pow.f64 re #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im im) (*.f64 re re)))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 im (.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (fma.f64 #s(literal 1/32 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 3 binary64)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 im (.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/32 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 3 binary64)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 re)) (.f64 #s(literal 1/64 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))))) (pow.f64 re #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/32 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 3 binary64)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 re)) (fma.f64 #s(literal 1/1024 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -2 binary64))) (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (.f64 #s(literal 1/64 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64))))))) (pow.f64 re #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (.f64 (.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (fma.f64 #s(literal 1/16 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 3 binary64)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -5 binary64)))) (.f64 (.f64 im (*.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re)))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 3 binary64)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 re)) (.f64 #s(literal 1/32 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))))) (pow.f64 re #s(literal 3 binary64))) (.f64 (.f64 im (.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re)))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/16 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 3 binary64)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 re)) (fma.f64 #s(literal 1/512 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -2 binary64))) (pow.f64 #s(literal 1/2 binary64) #s(literal 3/2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (.f64 #s(literal 1/32 binary64) (.f64 (/.f64 (.f64 (pow.f64 im #s(literal 5 binary64)) (sqrt.f64 #s(literal -2 binary64))) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64))))))) (pow.f64 re #s(literal 3 binary64))) (.f64 (.f64 im (.f64 (sqrt.f64 #s(literal -1 binary64)) #s(literal 1 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re)))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (.f64 #s(literal -1 binary64) (/.f64 (.f64 im im) re)))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 re re)) (*.f64 im im)) re)))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 re re)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64))) (*.f64 im im))) re)))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.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))) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 re re)) (fma.f64 #s(literal 1/8 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 4 binary64))) (.f64 im im)))) re)))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 im im) re)))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 re re)) (.f64 #s(literal 1/2 binary64) (.f64 im im))) re)))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 re re)) (fma.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) (.f64 im im)))) re)))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.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))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 re re)) (fma.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) (*.f64 im im))))) re)))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (sqrt.f64 (*.f64 re #s(literal -1 binary64))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 im im) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (sqrt.f64 (.f64 re #s(literal -1 binary64)))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 im im) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (fma.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 (pow.f64 re #s(literal -7 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64)) (.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 4 binary64)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 im im) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (fma.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64)) (fma.f64 (sqrt.f64 (pow.f64 re #s(literal -7 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64)) (.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 4 binary64))))) (.f64 (sqrt.f64 (pow.f64 re #s(literal -11 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/32 binary64) (pow.f64 im #s(literal 6 binary64)) (fma.f64 #s(literal 1/384 binary64) (pow.f64 im #s(literal 6 binary64)) (.f64 #s(literal 1/12 binary64) (pow.f64 im #s(literal 6 binary64)))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) (pow.f64 (*.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64)))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (pow.f64 re #s(literal 7 binary64))) #s(literal 1/4 binary64)) (.f64 im im)) (pow.f64 (*.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (pow.f64 re #s(literal 7 binary64))) #s(literal 1/4 binary64)) (.f64 im im)) (fma.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (pow.f64 re #s(literal 15 binary64))) #s(literal 1/4 binary64)) (fma.f64 #s(literal -1/16 binary64) (pow.f64 im #s(literal 4 binary64)) (.f64 #s(literal 1/128 binary64) (pow.f64 im #s(literal 4 binary64)))) (pow.f64 (.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64)))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (pow.f64 re #s(literal 7 binary64))) #s(literal 1/4 binary64)) (.f64 im im)) (fma.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (pow.f64 re #s(literal 15 binary64))) #s(literal 1/4 binary64)) (fma.f64 #s(literal -1/16 binary64) (pow.f64 im #s(literal 4 binary64)) (.f64 #s(literal 1/128 binary64) (pow.f64 im #s(literal 4 binary64)))) (fma.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (pow.f64 re #s(literal 23 binary64))) #s(literal 1/4 binary64)) (fma.f64 #s(literal -1/128 binary64) (pow.f64 im #s(literal 6 binary64)) (fma.f64 #s(literal 1/3072 binary64) (pow.f64 im #s(literal 6 binary64)) (.f64 #s(literal 1/24 binary64) (pow.f64 im #s(literal 6 binary64))))) (pow.f64 (*.f64 #s(literal -1 binary64) re) #s(literal 1/4 binary64))))))
#s(approx (sqrt (+ (* im im) (* re re))) (*.f64 #s(literal -1 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 (.f64 im im) (*.f64 re re)))))))
#s(approx (sqrt (+ (* im im) (* re re))) (.f64 #s(literal -1 binary64) (.f64 re (+.f64 #s(literal 1 binary64) (fma.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 (.f64 im im) (*.f64 re re))))))))
#s(approx (sqrt (+ (* im im) (* re re))) (.f64 #s(literal -1 binary64) (.f64 re (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (fma.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 (.f64 im im) (*.f64 re re)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (sqrt.f64 (*.f64 re #s(literal -1 binary64))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 im im) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (sqrt.f64 (.f64 re #s(literal -1 binary64)))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 im im) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (fma.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 (pow.f64 re #s(literal -7 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64)) (.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 4 binary64)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 im im) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (fma.f64 (sqrt.f64 re) (sqrt.f64 #s(literal -1 binary64)) (fma.f64 (sqrt.f64 (pow.f64 re #s(literal -7 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 im #s(literal 4 binary64)) (.f64 #s(literal 1/32 binary64) (pow.f64 im #s(literal 4 binary64))))) (.f64 (sqrt.f64 (pow.f64 re #s(literal -11 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/32 binary64) (pow.f64 im #s(literal 6 binary64)) (fma.f64 #s(literal 1/384 binary64) (pow.f64 im #s(literal 6 binary64)) (.f64 #s(literal 1/12 binary64) (pow.f64 im #s(literal 6 binary64)))))))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (+.f64 (sqrt.f64 re) (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (*.f64 im im) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (+.f64 (sqrt.f64 re) (.f64 (.f64 im im) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 im im) (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64))))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))) (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (pow.f64 re #s(literal -3 binary64))) #s(literal 1/2 binary64)))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (+.f64 (sqrt.f64 re) (.f64 (.f64 im im) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 re #s(literal -3 binary64))) #s(literal 1/2 binary64)) (.f64 (.f64 im im) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) (/.f64 (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64)))) #s(literal 2 binary64))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (.f64 im im) (-.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal -5 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64)))) (.f64 (.f64 re re) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 im im) #s(literal 2 binary64)) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (*.f64 #s(literal 2 binary64) (sqrt.f64 re))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (fma.f64 #s(literal 2 binary64) (sqrt.f64 re) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (.f64 (/.f64 (.f64 (.f64 im im) (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64))))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))) (.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (pow.f64 re #s(literal -3 binary64))) #s(literal 1/2 binary64)))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (fma.f64 #s(literal 2 binary64) (sqrt.f64 re) (.f64 (.f64 im im) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 re #s(literal -3 binary64))) #s(literal 1/2 binary64)) (.f64 (.f64 im im) (fma.f64 #s(literal -1 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) (/.f64 (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64)))) #s(literal 2 binary64))) (.f64 (/.f64 (.f64 (.f64 im im) (-.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal -5 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64)))) (.f64 (*.f64 re re) #s(literal 2 binary64)))))) #s(literal 2 binary64)) (/.f64 #s(literal 1 binary64) (sqrt.f64 re)))))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 (.f64 im im) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (sqrt.f64 (*.f64 re #s(literal 2 binary64)))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 im im) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 (.f64 (.f64 im im) (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))) (.f64 #s(literal 1/4 binary64) (*.f64 (sqrt.f64 (pow.f64 re #s(literal -3 binary64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (sqrt.f64 re) (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 im im) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 re #s(literal -3 binary64))) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (.f64 (.f64 im im) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) (/.f64 (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 (.f64 (.f64 im im) (-.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal -5 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64)))) (.f64 (.f64 re re) #s(literal 2 binary64)))))) (sqrt.f64 #s(literal 2 binary64))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im im) re) (.f64 #s(literal 2 binary64) re)))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) (fma.f64 #s(literal 2 binary64) re (.f64 (.f64 im im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 im im) (pow.f64 re #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1 binary64)))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) (fma.f64 #s(literal 2 binary64) re (.f64 (.f64 im im) (fma.f64 (.f64 im im) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 im im) (pow.f64 re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* re re) (* im im))) (+.f64 re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im im) re))))
#s(approx (sqrt (+ (* re re) (* im im))) (+.f64 re (.f64 (.f64 im im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 im im) (pow.f64 re #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* re re) (* im im))) (+.f64 re (.f64 (.f64 im im) (fma.f64 (.f64 im im) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 im im) (pow.f64 re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1 binary64)))))))
#s(approx im im)
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 im (+.f64 re (.f64 #s(literal -1 binary64) re))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 re) #s(literal 2 binary64)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 re) #s(literal 2 binary64)) (.f64 im (fma.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 re #s(literal -3 binary64))) (+.f64 re (.f64 #s(literal -1 binary64) re))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 im (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re))))) re)) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 re) #s(literal 2 binary64)) (.f64 im (fma.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 re #s(literal -3 binary64))) (+.f64 re (.f64 #s(literal -1 binary64) re))) (.f64 im (fma.f64 #s(literal 1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re))))) re)) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 im (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re)))))) (.f64 re re)) (/.f64 (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re))))) (.f64 re re))) re)) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (.f64 re re)) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re))))) re)) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 im (+.f64 re (.f64 #s(literal -1 binary64) re))) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (.f64 (sqrt.f64 re) #s(literal 2 binary64))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (fma.f64 im (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 re #s(literal -3 binary64))) (+.f64 re (.f64 #s(literal -1 binary64) re))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 im (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re))))) re)) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))) (*.f64 (sqrt.f64 re) #s(literal 2 binary64))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (fma.f64 im (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 re #s(literal -3 binary64))) (+.f64 re (.f64 #s(literal -1 binary64) re))) (.f64 im (fma.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re))))) re)) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 im (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re)))))) (.f64 re re)) (/.f64 (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re))))) (.f64 re re))) re)) (.f64 #s(literal -1/4 binary64) (.f64 (/.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (.f64 re re)) (/.f64 (-.f64 (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re))))) re)) (.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64))))) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))))) (*.f64 (sqrt.f64 re) #s(literal 2 binary64))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 im (+.f64 re (.f64 #s(literal -1 binary64) re))) re) (*.f64 #s(literal 4 binary64) re)))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (fma.f64 #s(literal 4 binary64) re (.f64 im (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) re) (.f64 im (-.f64 (pow.f64 re #s(literal -1 binary64)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (pow.f64 re #s(literal 3 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (pow.f64 re #s(literal 3 binary64)))))))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (fma.f64 #s(literal 4 binary64) re (.f64 im (fma.f64 #s(literal -1 binary64) (/.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) re) (.f64 im (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 im (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re)))))) (.f64 re re)) (/.f64 (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re))))) (.f64 re re)))) re) (pow.f64 re #s(literal -1 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (pow.f64 re #s(literal 3 binary64))) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (*.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (pow.f64 re #s(literal 3 binary64)))))))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 im (+.f64 re (.f64 #s(literal -1 binary64) re))) re) (*.f64 #s(literal 2 binary64) re)))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) (fma.f64 #s(literal 2 binary64) re (.f64 im (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) re) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (*.f64 re re)))))) re))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) (fma.f64 #s(literal 2 binary64) re (.f64 im (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) re) (.f64 im (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 im (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re)))))) (.f64 re re)) (/.f64 (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re))))) (.f64 re re)))) re) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re))))) re))))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (+.f64 re (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 im (+.f64 re (*.f64 #s(literal -1 binary64) re))) re))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (+.f64 re (.f64 im (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) re) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (*.f64 re re)))))) re))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (+.f64 re (.f64 im (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) re) (.f64 im (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 im (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re)))))) (.f64 re re)) (/.f64 (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (-.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re))))) (.f64 re re)))) re) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re)) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re))))) re))))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (.f64 re re)) (.f64 re re)))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (fma.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 6 binary64)))) (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -2 binary64)))) (*.f64 re re)))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (fma.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (.f64 #s(literal -1/16 binary64) (/.f64 (pow.f64 im #s(literal 4 binary64)) (pow.f64 re #s(literal 10 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -6 binary64))))) (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -2 binary64)))) (*.f64 re re)))
#s(approx (* (* (neg im) im) (* im im)) (*.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 4 binary64))))
#s(approx (* (neg im) im) (.f64 #s(literal -1 binary64) (.f64 im im)))
#s(approx (neg im) (*.f64 #s(literal -1 binary64) im))
#s(approx (* im im) (*.f64 im im))
#s(approx (sqrt (* (+ re im) (- re im))) (+.f64 re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im (+.f64 re (*.f64 #s(literal -1 binary64) re))) re))))
#s(approx (sqrt (* (+ re im) (- re im))) (+.f64 re (.f64 im (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re))))) re) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 re (*.f64 #s(literal -1 binary64) re)) re))))))
#s(approx (sqrt (* (+ re im) (- re im))) (+.f64 re (.f64 im (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) re) (.f64 im (fma.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re)))) re) (.f64 #s(literal 1/4 binary64) (/.f64 (.f64 im (.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 re re)))) (+.f64 re (*.f64 #s(literal -1 binary64) re)))) (pow.f64 re #s(literal 3 binary64))))))))))
#s(approx (* (+ re im) (- re im)) (fma.f64 im (+.f64 re (.f64 #s(literal -1 binary64) re)) (.f64 re re)))
#s(approx (* (+ re im) (- re im)) (fma.f64 im (+.f64 re (fma.f64 #s(literal -1 binary64) im (.f64 #s(literal -1 binary64) re))) (.f64 re re)))
#s(approx (- re im) (+.f64 re (*.f64 #s(literal -1 binary64) im)))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 re) #s(literal 2 binary64)))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 re) #s(literal 2 binary64)) (.f64 (.f64 im im) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 im im) (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))) (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (pow.f64 re #s(literal -3 binary64))))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 re) #s(literal 2 binary64)) (.f64 (.f64 im im) (fma.f64 #s(literal 1/8 binary64) (sqrt.f64 (pow.f64 re #s(literal -3 binary64))) (.f64 (.f64 im im) (fma.f64 #s(literal -1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 im im) (-.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal -5 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64)))) (.f64 (.f64 re re) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (*.f64 (sqrt.f64 re) #s(literal 2 binary64))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (fma.f64 (sqrt.f64 re) #s(literal 2 binary64) (.f64 (.f64 im im) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 im im) (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 re #s(literal -3 binary64))))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (fma.f64 (sqrt.f64 re) #s(literal 2 binary64) (.f64 (.f64 im im) (fma.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 re #s(literal -3 binary64))) (.f64 (.f64 im im) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 im im) (-.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal -5 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64)))) (.f64 (*.f64 re re) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (fma.f64 #s(literal 4 binary64) re (/.f64 (*.f64 im im) re)))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (fma.f64 #s(literal 4 binary64) re (.f64 (.f64 im im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 im im) (pow.f64 re #s(literal 3 binary64))) (pow.f64 re #s(literal -1 binary64))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (fma.f64 #s(literal 4 binary64) re (.f64 (.f64 im im) (fma.f64 (.f64 im im) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 im im) (pow.f64 re #s(literal 5 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal -3 binary64)))) (pow.f64 re #s(literal -1 binary64))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im im) re) (.f64 #s(literal 2 binary64) re)))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 #s(literal 2 binary64) re (.f64 (.f64 im im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 im im) (pow.f64 re #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1 binary64)))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 #s(literal 2 binary64) re (.f64 (.f64 im im) (fma.f64 (.f64 im im) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 im im) (pow.f64 re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1 binary64)))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) (.f64 (.f64 im im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 im im) (pow.f64 re #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1 binary64))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) (.f64 (.f64 im im) (fma.f64 (.f64 im im) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 im im) (pow.f64 re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1 binary64))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) (.f64 (.f64 im im) (fma.f64 (.f64 im im) (-.f64 (.f64 (.f64 im im) (fma.f64 #s(literal -5/128 binary64) (/.f64 (.f64 im im) (pow.f64 re #s(literal 7 binary64))) (.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal -5 binary64))))) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1 binary64))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 re) #s(literal 2 binary64)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 re) #s(literal 2 binary64)) (.f64 (.f64 im im) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 im im) (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))) (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (pow.f64 re #s(literal -3 binary64))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 re) #s(literal 2 binary64)) (.f64 (.f64 im im) (fma.f64 #s(literal 1/8 binary64) (sqrt.f64 (pow.f64 re #s(literal -3 binary64))) (.f64 (.f64 im im) (fma.f64 #s(literal -1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 im im) (-.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal -5 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64)))) (.f64 (.f64 re re) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (*.f64 (sqrt.f64 re) #s(literal 2 binary64))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (fma.f64 (sqrt.f64 re) #s(literal 2 binary64) (.f64 (.f64 im im) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 im im) (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 re #s(literal -3 binary64))))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (fma.f64 (sqrt.f64 re) #s(literal 2 binary64) (.f64 (.f64 im im) (fma.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 re #s(literal -3 binary64))) (.f64 (.f64 im im) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 im im) (-.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal -5 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64)))) (.f64 (*.f64 re re) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) (fma.f64 #s(literal 4 binary64) re (/.f64 (*.f64 im im) re)))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) (fma.f64 #s(literal 4 binary64) re (.f64 (.f64 im im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 im im) (pow.f64 re #s(literal 3 binary64))) (pow.f64 re #s(literal -1 binary64))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) (fma.f64 #s(literal 4 binary64) re (.f64 (.f64 im im) (fma.f64 (.f64 im im) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 im im) (pow.f64 re #s(literal 5 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal -3 binary64)))) (pow.f64 re #s(literal -1 binary64))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im im) re) (.f64 #s(literal 2 binary64) re)))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) (fma.f64 #s(literal 2 binary64) re (.f64 (.f64 im im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 im im) (pow.f64 re #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1 binary64)))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) (fma.f64 #s(literal 2 binary64) re (.f64 (.f64 im im) (fma.f64 (.f64 im im) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 im im) (pow.f64 re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1 binary64)))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) (+.f64 re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im im) re))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) (+.f64 re (.f64 (.f64 im im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 im im) (pow.f64 re #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1 binary64)))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) (+.f64 re (.f64 (.f64 im im) (fma.f64 (.f64 im im) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 im im) (pow.f64 re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1 binary64)))))))
#s(approx (pow im 6) (pow.f64 im #s(literal 6 binary64)))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) (fma.f64 #s(literal -1 binary64) (pow.f64 (*.f64 im re) #s(literal 2 binary64)) (pow.f64 re #s(literal 4 binary64))))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) (fma.f64 (.f64 im im) (-.f64 (.f64 im im) (*.f64 re re)) (pow.f64 re #s(literal 4 binary64))))
#s(approx (- (pow im 4) (* (* re re) (* im im))) (.f64 (.f64 im im) (-.f64 (.f64 im im) (.f64 re re))))
#s(approx (pow im 4) (pow.f64 im #s(literal 4 binary64)))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 re) #s(literal 2 binary64)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 re) #s(literal 2 binary64)) (.f64 (.f64 im im) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (.f64 im im) (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))) (*.f64 #s(literal 1/8 binary64) (sqrt.f64 (pow.f64 re #s(literal -3 binary64))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 re) #s(literal 2 binary64)) (.f64 (.f64 im im) (fma.f64 #s(literal 1/8 binary64) (sqrt.f64 (pow.f64 re #s(literal -3 binary64))) (.f64 (.f64 im im) (fma.f64 #s(literal -1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64))))) (.f64 #s(literal 1/4 binary64) (.f64 (.f64 (.f64 im im) (-.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal -5 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64)))) (.f64 (.f64 re re) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (fma.f64 #s(literal 1/4 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (*.f64 (sqrt.f64 re) #s(literal 2 binary64))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (fma.f64 (sqrt.f64 re) #s(literal 2 binary64) (.f64 (.f64 im im) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (.f64 im im) (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))) (.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 re #s(literal -3 binary64))))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (fma.f64 (sqrt.f64 re) #s(literal 2 binary64) (.f64 (.f64 im im) (fma.f64 #s(literal 1/4 binary64) (sqrt.f64 (pow.f64 re #s(literal -3 binary64))) (.f64 (.f64 im im) (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64))))) (.f64 #s(literal 1/2 binary64) (.f64 (.f64 (.f64 im im) (-.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal -5 binary64))) (.f64 #s(literal -1/4 binary64) (/.f64 (fma.f64 #s(literal 1/16 binary64) (pow.f64 (.f64 (pow.f64 re #s(literal 3 binary64)) #s(literal 2 binary64)) #s(literal -1 binary64)) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64)))) (.f64 (*.f64 re re) #s(literal 2 binary64)))))) (/.f64 #s(literal 1 binary64) (sqrt.f64 re))))))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (fma.f64 #s(literal 4 binary64) re (/.f64 (*.f64 im im) re)))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (fma.f64 #s(literal 4 binary64) re (.f64 (.f64 im im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (*.f64 im im) (pow.f64 re #s(literal 3 binary64))) (pow.f64 re #s(literal -1 binary64))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (fma.f64 #s(literal 4 binary64) re (.f64 (.f64 im im) (fma.f64 (.f64 im im) (-.f64 (.f64 #s(literal 1/8 binary64) (/.f64 (.f64 im im) (pow.f64 re #s(literal 5 binary64)))) (.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal -3 binary64)))) (pow.f64 re #s(literal -1 binary64))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im im) re) (.f64 #s(literal 2 binary64) re)))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) (fma.f64 #s(literal 2 binary64) re (.f64 (.f64 im im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 im im) (pow.f64 re #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1 binary64)))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) (fma.f64 #s(literal 2 binary64) re (.f64 (.f64 im im) (fma.f64 (.f64 im im) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 im im) (pow.f64 re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1 binary64)))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (*.f64 #s(literal 1 binary64) (sqrt.f64 re)))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (fma.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -3 binary64))))) (.f64 #s(literal 1 binary64) (sqrt.f64 re))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (fma.f64 #s(literal 1 binary64) (sqrt.f64 re) (.f64 (.f64 im im) (fma.f64 #s(literal -3/32 binary64) (.f64 #s(literal 1 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -7 binary64))))) (.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (fma.f64 #s(literal 1 binary64) (sqrt.f64 re) (.f64 (.f64 im im) (fma.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (.f64 (.f64 im im) (fma.f64 #s(literal -3/32 binary64) (.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 re #s(literal -7 binary64)))) (.f64 #s(literal 7/128 binary64) (.f64 #s(literal 1 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -11 binary64))))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) (pow.f64 (*.f64 #s(literal 1 binary64) re) #s(literal 1/4 binary64)))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) (fma.f64 #s(literal 1/8 binary64) (.f64 #s(literal 1 binary64) (.f64 (.f64 im im) (pow.f64 (pow.f64 re #s(literal -7 binary64)) #s(literal 1/4 binary64)))) (pow.f64 (.f64 #s(literal 1 binary64) re) #s(literal 1/4 binary64))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) (fma.f64 (.f64 im im) (fma.f64 #s(literal -7/128 binary64) (.f64 #s(literal 1 binary64) (.f64 (.f64 im im) (pow.f64 (pow.f64 re #s(literal -15 binary64)) #s(literal 1/4 binary64)))) (.f64 #s(literal 1/8 binary64) (.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 re #s(literal -7 binary64)) #s(literal 1/4 binary64))))) (pow.f64 (*.f64 #s(literal 1 binary64) re) #s(literal 1/4 binary64))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) (fma.f64 (.f64 im im) (fma.f64 #s(literal 1/8 binary64) (.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 re #s(literal -7 binary64)) #s(literal 1/4 binary64))) (.f64 (.f64 im im) (fma.f64 #s(literal -7/128 binary64) (.f64 #s(literal 1 binary64) (pow.f64 (pow.f64 re #s(literal -15 binary64)) #s(literal 1/4 binary64))) (.f64 #s(literal 35/1024 binary64) (.f64 #s(literal 1 binary64) (.f64 (.f64 im im) (pow.f64 (pow.f64 re #s(literal -23 binary64)) #s(literal 1/4 binary64)))))))) (pow.f64 (.f64 #s(literal 1 binary64) re) #s(literal 1/4 binary64))))
#s(approx (sqrt (+ (* im im) (* re re))) (+.f64 re (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im im) re))))
#s(approx (sqrt (+ (* im im) (* re re))) (+.f64 re (.f64 (.f64 im im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 im im) (pow.f64 re #s(literal 3 binary64))) (.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (* im im) (* re re))) (+.f64 re (.f64 (.f64 im im) (fma.f64 (.f64 im im) (-.f64 (.f64 #s(literal 1/16 binary64) (/.f64 (.f64 im im) (pow.f64 re #s(literal 5 binary64)))) (.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal -3 binary64)))) (*.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal -1 binary64)))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (*.f64 #s(literal 1 binary64) (sqrt.f64 re)))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (fma.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -3 binary64))))) (.f64 #s(literal 1 binary64) (sqrt.f64 re))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (fma.f64 #s(literal 1 binary64) (sqrt.f64 re) (.f64 (.f64 im im) (fma.f64 #s(literal -3/32 binary64) (.f64 #s(literal 1 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -7 binary64))))) (.f64 #s(literal 1/4 binary64) (*.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (fma.f64 #s(literal 1 binary64) (sqrt.f64 re) (.f64 (.f64 im im) (fma.f64 #s(literal 1/4 binary64) (.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 re #s(literal -3 binary64)))) (.f64 (.f64 im im) (fma.f64 #s(literal -3/32 binary64) (.f64 #s(literal 1 binary64) (sqrt.f64 (pow.f64 re #s(literal -7 binary64)))) (.f64 #s(literal 7/128 binary64) (.f64 #s(literal 1 binary64) (.f64 (.f64 im im) (sqrt.f64 (pow.f64 re #s(literal -11 binary64))))))))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (.f64 im (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (.f64 im (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (/.f64 (.f64 re re) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64)))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (.f64 im (fma.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (/.f64 (.f64 re re) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (/.f64 (.f64 re re) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (.f64 im (fma.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (.f64 im (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (/.f64 (.f64 re re) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (/.f64 re (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (.f64 im (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (/.f64 (.f64 re re) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (/.f64 (.f64 re re) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (pow.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1 binary64))) (*.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (/.f64 re (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (.f64 im (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) re)))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (.f64 im (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 re re)) (.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) re))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (.f64 im (+.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (fma.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 re re)) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 re re)) (.f64 #s(literal 1/2 binary64) (*.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) re)))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) (*.f64 im (+.f64 #s(literal 1 binary64) (/.f64 re im))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) (.f64 im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 re re) (*.f64 im im)) (/.f64 re im)))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) (.f64 im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 re re) (*.f64 im im)) (/.f64 re im))))))
#s(approx (sqrt (+ (* re re) (* im im))) (.f64 im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 re re) (.f64 im im))))))
#s(approx (sqrt (+ (* re re) (* im im))) (.f64 im (+.f64 #s(literal 1 binary64) (fma.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 (.f64 re re) (.f64 im im)))))))
#s(approx (sqrt (+ (* re re) (* im im))) (.f64 im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (fma.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 (.f64 re re) (.f64 im im))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (.f64 im (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 re (.f64 #s(literal -1 binary64) re)))))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (.f64 im (fma.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 re (.f64 #s(literal -1 binary64) re)))))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (.f64 im (fma.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 re (.f64 #s(literal -1 binary64) re)))))) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -7 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 re re) (+.f64 re (.f64 #s(literal -1 binary64) re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))) (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/4 binary64) (.f64 im (pow.f64 (+.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 re (.f64 #s(literal -1 binary64) re)))) #s(literal 2 binary64))))))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64)))))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (.f64 im (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 re (.f64 #s(literal -1 binary64) re)))))) (sqrt.f64 (.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (.f64 im (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 re (.f64 #s(literal -1 binary64) re)))))) (sqrt.f64 (.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64)))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (.f64 im (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 re (.f64 #s(literal -1 binary64) re)))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -7 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 re re) (+.f64 re (.f64 #s(literal -1 binary64) re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))) (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))))) (.f64 #s(literal 1/4 binary64) (.f64 im (pow.f64 (+.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 re (.f64 #s(literal -1 binary64) re)))) #s(literal 2 binary64))))))) (sqrt.f64 (*.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64))))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (.f64 im (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 re (.f64 #s(literal -1 binary64) re)))) im)))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (.f64 im (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (.f64 im im)) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 re (*.f64 #s(literal -1 binary64) re)))) im))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (.f64 im (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 re re) (+.f64 re (.f64 #s(literal -1 binary64) re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))) (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))))) (pow.f64 im #s(literal 3 binary64))) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (.f64 im im)) (.f64 #s(literal 2 binary64) (/.f64 (+.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 re (*.f64 #s(literal -1 binary64) re)))) im)))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) (.f64 im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) im) (/.f64 re im)))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) (.f64 im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (.f64 im im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 re (*.f64 #s(literal -1 binary64) re)) im) (/.f64 re im))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) (.f64 im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 re re) (+.f64 re (.f64 #s(literal -1 binary64) re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))) (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))))) (pow.f64 im #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (.f64 im im)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 re (*.f64 #s(literal -1 binary64) re)) im) (/.f64 re im)))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (.f64 im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 re (*.f64 #s(literal -1 binary64) re)) im)))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (.f64 im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (.f64 im im)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) im))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (.f64 im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 re re) (+.f64 re (.f64 #s(literal -1 binary64) re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))) (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))))) (pow.f64 im #s(literal 3 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (.f64 im im)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) im)))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (.f64 (.f64 im im) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (pow.f64 im #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (.f64 (.f64 im im) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 re #s(literal 8 binary64)) (.f64 (pow.f64 im #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (*.f64 (pow.f64 im #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (.f64 (.f64 im im) (+.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 re #s(literal 8 binary64)) (.f64 (pow.f64 im #s(literal 8 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 re #s(literal 12 binary64)) (.f64 (pow.f64 im #s(literal 12 binary64)) (pow.f64 #s(literal -1 binary64) #s(literal 5/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 (pow.f64 im #s(literal 4 binary64)) (sqrt.f64 #s(literal -1 binary64))))))))))
#s(approx (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im))) (*.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) #s(literal 1 binary64))))
#s(approx (sqrt (* (+ re im) (- re im))) (.f64 im (+.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (.f64 im (sqrt.f64 #s(literal -1 binary64))))))))
#s(approx (sqrt (* (+ re im) (- re im))) (.f64 im (+.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (.f64 im (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 re re) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (.f64 (*.f64 im im) (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (sqrt (* (+ re im) (- re im))) (.f64 im (+.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (-.f64 (.f64 re re) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (pow.f64 (.f64 im (sqrt.f64 #s(literal -1 binary64))) #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (.f64 im (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 re re) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (.f64 (*.f64 im im) (sqrt.f64 #s(literal -1 binary64))))))))))
#s(approx (* (+ re im) (- re im)) (.f64 (.f64 im im) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 re im) (/.f64 re im)) #s(literal 1 binary64))))
#s(approx (* (+ re im) (- re im)) (.f64 (.f64 im im) (-.f64 (fma.f64 #s(literal -1 binary64) (/.f64 re im) (+.f64 (/.f64 re im) (/.f64 (.f64 re re) (.f64 im im)))) #s(literal 1 binary64))))
#s(approx (+ re im) (*.f64 im (+.f64 #s(literal 1 binary64) (/.f64 re im))))
#s(approx (- re im) (*.f64 im (-.f64 (/.f64 re im) #s(literal 1 binary64))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (.f64 im (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64)))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (.f64 im (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 #s(literal 1/2 binary64) (.f64 re re))))) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64))))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (.f64 im (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 #s(literal 1/2 binary64) (.f64 re re))))) (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -7 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (.f64 im (.f64 re re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 3 binary64)) (.f64 re (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 #s(literal 1/2 binary64) (.f64 re re)))))))) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64)))))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (.f64 im (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (.f64 im (fma.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 #s(literal 1/2 binary64) (.f64 re re))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64)))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (.f64 im (fma.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 #s(literal 1/2 binary64) (.f64 re re))))) (fma.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -7 binary64))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal 1/4 binary64) (.f64 im (.f64 re re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 3 binary64)) (.f64 re (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 #s(literal 1/2 binary64) (.f64 re re)))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64))))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (.f64 im (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (/.f64 re im)))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (.f64 im (-.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -2 binary64) (.f64 re re) (.f64 re re)) (.f64 im im)))) (.f64 #s(literal -2 binary64) (/.f64 re im)))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (.f64 im (-.f64 (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 re (fma.f64 #s(literal -2 binary64) (.f64 re re) (.f64 re re)) (pow.f64 re #s(literal 3 binary64))) (pow.f64 im #s(literal 3 binary64))))) (fma.f64 #s(literal -2 binary64) (/.f64 re im) (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 re re) (.f64 im im)) (/.f64 (.f64 re re) (.f64 im im)))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im (+.f64 #s(literal 1 binary64) (/.f64 re im))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 #s(literal 1/2 binary64) (.f64 re re))) (.f64 im im)))) (*.f64 #s(literal -1 binary64) (/.f64 re im)))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 3 binary64)) (.f64 re (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 #s(literal 1/2 binary64) (.f64 re re))))) (pow.f64 im #s(literal 3 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 re im) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 re re) (.f64 im im)) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 re re) (*.f64 im im))))))))
#s(approx (pow (sqrt (+ (* re re) (* im im))) 2) (.f64 (.f64 im im) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 re re) (.f64 im im)))))
#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 (.f64 re re) (.f64 im im)))) (/.f64 re im))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) (.f64 im (-.f64 (+.f64 #s(literal 1 binary64) (fma.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 (.f64 re re) (.f64 im im))))) (/.f64 re im))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (.f64 im (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (.f64 im (fma.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (.f64 re re) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (.f64 im (fma.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (.f64 re re) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (.f64 re re) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64)))))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (.f64 im (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (.f64 im (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (.f64 re re) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64)))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (.f64 im (fma.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (.f64 re re) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (.f64 re re) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64))))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) (.f64 im (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (/.f64 re im)))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) (.f64 im (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 re im) (/.f64 (.f64 re re) (*.f64 im im))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) (.f64 im (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 re #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 re im) (/.f64 (.f64 re re) (*.f64 im im)))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) (*.f64 im (+.f64 #s(literal 1 binary64) (/.f64 re im))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) (.f64 im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 re re) (*.f64 im im)) (/.f64 re im)))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) (.f64 im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 re #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 re re) (*.f64 im im)) (/.f64 re im))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) (.f64 im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 re re) (.f64 im im))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) (.f64 im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 re #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 re re) (.f64 im im)))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) (.f64 im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 re #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 re #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))))) (.f64 (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 re #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 re re) (.f64 im im))))))))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) (.f64 (.f64 im im) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 re re) (.f64 im im)))))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) (.f64 (.f64 im im) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 re #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))) (pow.f64 im #s(literal 4 binary64))))) (.f64 #s(literal -1 binary64) (/.f64 (.f64 re re) (.f64 im im))))))
#s(approx (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im))))) (.f64 (.f64 im im) (-.f64 (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 re #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 6 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 re re) (*.f64 im im)) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))))))))
#s(approx (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (*.f64 (pow.f64 im #s(literal 6 binary64)) (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))))))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) (.f64 (pow.f64 im #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 re re) (.f64 im im))))))
#s(approx (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))) (.f64 (pow.f64 im #s(literal 4 binary64)) (-.f64 (+.f64 #s(literal 1 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64)))) (/.f64 (.f64 re re) (*.f64 im im)))))
#s(approx (- (pow im 4) (* (* re re) (* im im))) (.f64 (pow.f64 im #s(literal 4 binary64)) (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (.f64 re re) (.f64 im im))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (.f64 im (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64)))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (.f64 im (fma.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (.f64 re re) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (.f64 im (fma.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (.f64 re re) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (.f64 re re) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64)))))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (.f64 im (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (.f64 im (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (.f64 re re) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (*.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64)))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (.f64 im (fma.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (.f64 re re) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (.f64 re re) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 (.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal 2 binary64))))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (.f64 im (+.f64 #s(literal 2 binary64) (.f64 #s(literal 2 binary64) (/.f64 re im)))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (.f64 im (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal 2 binary64) (/.f64 re im) (/.f64 (.f64 re re) (*.f64 im im))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (.f64 im (+.f64 #s(literal 2 binary64) (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (fma.f64 #s(literal 2 binary64) (/.f64 re im) (/.f64 (.f64 re re) (*.f64 im im)))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) (*.f64 im (+.f64 #s(literal 1 binary64) (/.f64 re im))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) (.f64 im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 re re) (*.f64 im im)) (/.f64 re im)))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) (.f64 im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 re re) (*.f64 im im)) (/.f64 re im))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (sqrt.f64 im))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (+.f64 (sqrt.f64 im) (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (*.f64 re re)))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (+.f64 (sqrt.f64 im) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re re)) (.f64 (sqrt.f64 (pow.f64 im #s(literal -7 binary64))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64)) (.f64 #s(literal 1/32 binary64) (pow.f64 re #s(literal 4 binary64))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (+.f64 (sqrt.f64 im) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re re)) (fma.f64 (sqrt.f64 (pow.f64 im #s(literal -7 binary64))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64)) (.f64 #s(literal 1/32 binary64) (pow.f64 re #s(literal 4 binary64)))) (.f64 (sqrt.f64 (pow.f64 im #s(literal -11 binary64))) (fma.f64 #s(literal -1/32 binary64) (pow.f64 re #s(literal 6 binary64)) (fma.f64 #s(literal 1/384 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 1/12 binary64) (pow.f64 re #s(literal 6 binary64))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) (*.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 1/4 binary64))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 (pow.f64 im #s(literal -7 binary64)) #s(literal 1/4 binary64)) (.f64 re re)) (*.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 1/4 binary64)))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 (pow.f64 im #s(literal -7 binary64)) #s(literal 1/4 binary64)) (.f64 re re)) (fma.f64 (pow.f64 (pow.f64 im #s(literal -15 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal -1/16 binary64) (pow.f64 re #s(literal 4 binary64)) (.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 4 binary64)))) (.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 1/4 binary64))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 (pow.f64 im #s(literal -7 binary64)) #s(literal 1/4 binary64)) (.f64 re re)) (fma.f64 (pow.f64 (pow.f64 im #s(literal -15 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal -1/16 binary64) (pow.f64 re #s(literal 4 binary64)) (.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 4 binary64)))) (fma.f64 (pow.f64 (pow.f64 im #s(literal -23 binary64)) #s(literal 1/4 binary64)) (fma.f64 #s(literal -1/128 binary64) (pow.f64 re #s(literal 6 binary64)) (fma.f64 #s(literal 1/3072 binary64) (pow.f64 re #s(literal 6 binary64)) (.f64 #s(literal 1/24 binary64) (pow.f64 re #s(literal 6 binary64))))) (*.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 1/4 binary64)))))))
#s(approx (sqrt (+ (* im im) (* re re))) (.f64 im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 re re) (.f64 im im))))))
#s(approx (sqrt (+ (* im im) (* re re))) (.f64 im (+.f64 #s(literal 1 binary64) (fma.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 (.f64 re re) (.f64 im im)))))))
#s(approx (sqrt (+ (* im im) (* re re))) (.f64 im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (fma.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 (.f64 re re) (.f64 im im))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (sqrt.f64 im))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (+.f64 (sqrt.f64 im) (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (*.f64 re re)))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (+.f64 (sqrt.f64 im) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re re)) (.f64 (sqrt.f64 (pow.f64 im #s(literal -7 binary64))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64)) (.f64 #s(literal 1/32 binary64) (pow.f64 re #s(literal 4 binary64))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (+.f64 (sqrt.f64 im) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re re)) (fma.f64 (sqrt.f64 (pow.f64 im #s(literal -7 binary64))) (fma.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64)) (.f64 #s(literal 1/32 binary64) (pow.f64 re #s(literal 4 binary64)))) (.f64 (sqrt.f64 (pow.f64 im #s(literal -11 binary64))) (fma.f64 #s(literal -1/32 binary64) (pow.f64 re #s(literal 6 binary64)) (fma.f64 #s(literal 1/384 binary64) (pow.f64 re #s(literal 6 binary64)) (*.f64 #s(literal 1/12 binary64) (pow.f64 re #s(literal 6 binary64))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 2) (.f64 (.f64 im im) (+.f64 #s(literal 1 binary64) (/.f64 (.f64 re re) (.f64 im im)))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -1/2 binary64)))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (/.f64 (.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -1/2 binary64)))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (/.f64 (.f64 (.f64 re re) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (/.f64 (.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -1/2 binary64))))))))
#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 im) (/.f64 (.f64 (.f64 re re) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 im) (/.f64 (.f64 (.f64 re re) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))) (pow.f64 im #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (/.f64 (.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -1/2 binary64))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (.f64 #s(literal -2 binary64) (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -1/2 binary64)))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -1/2 binary64))) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (/.f64 (*.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (/.f64 (.f64 (.f64 re re) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (fma.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -1/2 binary64))) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (/.f64 (.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 im) (/.f64 (.f64 (.f64 re re) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 im) (/.f64 (.f64 (.f64 re re) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))) (pow.f64 im #s(literal 3 binary64))) (fma.f64 #s(literal 2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -1/2 binary64))) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (/.f64 (.f64 re (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -1 binary64) (sqrt.f64 (.f64 im #s(literal -1 binary64)))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (*.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal -1 binary64)))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (.f64 re re) (sqrt.f64 #s(literal -1 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal -1 binary64))))))))
#s(approx (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 im) (.f64 (.f64 re re) (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 im) (.f64 (.f64 re re) (sqrt.f64 #s(literal -1 binary64)))))) (pow.f64 im #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (.f64 (pow.f64 im #s(literal -1 binary64)) #s(literal -1 binary64))))))))
#s(approx (+ (sqrt (+ (* re re) (* im im))) re) (*.f64 #s(literal -1 binary64) 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 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 re (.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) im))) 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 re (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 im im)) (.f64 #s(literal 1/2 binary64) (*.f64 re re))) im))) 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 (.f64 re re) (*.f64 im im)))))))
#s(approx (sqrt (+ (* re re) (* im im))) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (fma.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 (.f64 re re) (*.f64 im im))))))))
#s(approx (sqrt (+ (* re re) (* im im))) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (fma.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 (.f64 re re) (*.f64 im im)))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -2 binary64)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 re (.f64 #s(literal -1 binary64) re))))))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 re (.f64 #s(literal -1 binary64) re))))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64)))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)))) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 re re) (+.f64 re (.f64 #s(literal -1 binary64) re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))) (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))))) (.f64 #s(literal -1/4 binary64) (.f64 im (pow.f64 (+.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 re (.f64 #s(literal -1 binary64) re)))) #s(literal 2 binary64)))))))) (.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))))))) (pow.f64 im #s(literal 3 binary64))) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 re (.f64 #s(literal -1 binary64) re))))))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64)))))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -2 binary64)))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 re (.f64 #s(literal -1 binary64) re))))))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64)))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 re (.f64 #s(literal -1 binary64) re))))))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64))))))))
#s(approx (sqrt (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re))) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.f64 (.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (.f64 (.f64 re re) (+.f64 re (.f64 #s(literal -1 binary64) re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))) (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))))) (.f64 #s(literal -1/4 binary64) (.f64 im (pow.f64 (+.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 re (.f64 #s(literal -1 binary64) re)))) #s(literal 2 binary64)))))))) (.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))))))) (pow.f64 im #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (+.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 re (.f64 #s(literal -1 binary64) re))))))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64))))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (*.f64 #s(literal -2 binary64) im))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 2 binary64) (.f64 #s(literal -2 binary64) (/.f64 (+.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 re (*.f64 #s(literal -1 binary64) re)))) im))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 re re) im) (fma.f64 #s(literal -1 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) im) (fma.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) im) (.f64 #s(literal 2 binary64) (+.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 re (*.f64 #s(literal -1 binary64) re)))))))) im))))))
#s(approx (* 2 (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re)) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 (.f64 re re) (+.f64 re (.f64 #s(literal -1 binary64) re))) im) (fma.f64 #s(literal -1/2 binary64) (/.f64 (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))) im) (/.f64 (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) im)))) im) (.f64 #s(literal 2 binary64) (+.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 re (.f64 #s(literal -1 binary64) re)))))) im))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) (*.f64 #s(literal -1 binary64) im))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 re (.f64 #s(literal 1/2 binary64) (+.f64 re (*.f64 #s(literal -1 binary64) re)))) im))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 re (fma.f64 #s(literal 1/2 binary64) (+.f64 re (.f64 #s(literal -1 binary64) re)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (*.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) im)))) im))))))
#s(approx (+ (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) re) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 re (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 re re) (+.f64 re (.f64 #s(literal -1 binary64) re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))) (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))))) im))) im) (.f64 #s(literal 1/2 binary64) (+.f64 re (.f64 #s(literal -1 binary64) re))))) im))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (*.f64 #s(literal -1 binary64) im))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) im))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/2 binary64) (+.f64 re (.f64 #s(literal -1 binary64) re)) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (*.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) im))) im))))))
#s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))) (.f64 #s(literal 1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (.f64 (.f64 re re) (+.f64 re (.f64 #s(literal -1 binary64) re))) (fma.f64 #s(literal -1/2 binary64) (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) (.f64 #s(literal 1/4 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)))))) (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 #s(literal -1 binary64) (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64))))))) im))) im) (.f64 #s(literal 1/2 binary64) (+.f64 re (.f64 #s(literal -1 binary64) re)))) im))))))
#s(approx (sqrt (* (+ re im) (- re im))) (.f64 #s(literal -1 binary64) (.f64 im (sqrt.f64 #s(literal -1 binary64)))))
#s(approx (sqrt (* (+ re im) (- re im))) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 #s(literal -1/2 binary64) (/.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal -1 binary64)))))))))
#s(approx (sqrt (* (+ re im) (- re im))) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (-.f64 (.f64 re re) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (.f64 im (sqrt.f64 #s(literal -1 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 re (*.f64 #s(literal -1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))) im))))))
#s(approx (sqrt (* (+ re im) (- re im))) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/4 binary64) (/.f64 (.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) (-.f64 (.f64 re re) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal -1 binary64))))) (.f64 im (pow.f64 #s(literal -1 binary64) #s(literal 3/2 binary64)))) (.f64 #s(literal 1/2 binary64) (/.f64 (-.f64 (.f64 re re) (.f64 #s(literal 1/4 binary64) (/.f64 (pow.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) #s(literal 2 binary64)) #s(literal -1 binary64)))) (sqrt.f64 #s(literal -1 binary64))))) im) (.f64 #s(literal 1/2 binary64) (/.f64 (+.f64 re (*.f64 #s(literal -1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))))) im))))))
#s(approx (* (+ re im) (- re im)) (.f64 (.f64 im im) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 re (.f64 #s(literal -1 binary64) re)) im)) #s(literal 1 binary64))))
#s(approx (* (+ re im) (- re im)) (.f64 (.f64 im im) (-.f64 (.f64 #s(literal -1 binary64) (/.f64 (+.f64 re (fma.f64 #s(literal -1 binary64) re (.f64 #s(literal -1 binary64) (/.f64 (*.f64 re re) im)))) im)) #s(literal 1 binary64))))
#s(approx (+ re im) (.f64 #s(literal -1 binary64) (.f64 im (-.f64 (*.f64 #s(literal -1 binary64) (/.f64 re im)) #s(literal 1 binary64)))))
#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 (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -2 binary64)))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal -2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64))))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal -2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 #s(literal 1/2 binary64) (.f64 re re)))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64)))))))))
#s(approx (* (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) 1/2) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 #s(literal 1/2 binary64) (.f64 re re)))))) (.f64 #s(literal 1/4 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (.f64 im (.f64 re re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 3 binary64)) (.f64 re (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 #s(literal 1/2 binary64) (.f64 re re))))))))))) (pow.f64 im #s(literal 3 binary64))) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal -2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64)))))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -2 binary64)))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal -2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64)))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal -2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 #s(literal 1/2 binary64) (.f64 re re)))))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64))))))))
#s(approx (sqrt (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2)) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 #s(literal 1/2 binary64) (.f64 re re)))))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (fma.f64 #s(literal -1/4 binary64) (.f64 im (.f64 re re)) (fma.f64 #s(literal 1/2 binary64) (pow.f64 re #s(literal 3 binary64)) (.f64 re (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 #s(literal 1/2 binary64) (.f64 re re))))))))))) (pow.f64 im #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal -2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64))))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (*.f64 #s(literal -2 binary64) im))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 re im))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (-.f64 (fma.f64 #s(literal -2 binary64) (/.f64 (.f64 re re) im) (/.f64 (.f64 re re) im)) (.f64 #s(literal -2 binary64) re)) im))))))
#s(approx (* (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (.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 (fma.f64 re (fma.f64 #s(literal -2 binary64) (.f64 re re) (.f64 re re)) (pow.f64 re #s(literal 3 binary64))) im) (fma.f64 #s(literal -2 binary64) (.f64 re re) (.f64 re re))) im)) (*.f64 #s(literal -2 binary64) re)) im))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -1 binary64) im))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 re im))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (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 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 re re) im) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 re re) im))) (*.f64 #s(literal -1 binary64) re)) im))))))
#s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (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 (fma.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 re #s(literal 3 binary64)) im) (/.f64 (.f64 re (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 #s(literal 1/2 binary64) (.f64 re re)))) im)) (fma.f64 #s(literal -1 binary64) (.f64 re re) (.f64 #s(literal 1/2 binary64) (.f64 re re)))) im)) (.f64 #s(literal -1 binary64) re)) im))))))
#s(approx (- (sqrt (+ (* re re) (* im im))) re) (*.f64 #s(literal -1 binary64) im))
#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 (*.f64 re re) 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 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 im im)) (.f64 #s(literal 1/2 binary64) (*.f64 re re))) im)) re) im))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -2 binary64)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal -2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (.f64 re re) (sqrt.f64 #s(literal -2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal -2 binary64)))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64)))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)))) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/16 binary64) (.f64 (sqrt.f64 im) (.f64 (.f64 re re) (sqrt.f64 #s(literal -2 binary64)))) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 im) (.f64 (.f64 re re) (sqrt.f64 #s(literal -2 binary64)))))) (pow.f64 im #s(literal 3 binary64))) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal -2 binary64)))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64)))))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -2 binary64)))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal -2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64)))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (.f64 re re) (sqrt.f64 #s(literal -2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal -2 binary64)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64))))))))
#s(approx (sqrt (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re))) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 im) (.f64 (.f64 re re) (sqrt.f64 #s(literal -2 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 im) (.f64 (.f64 re re) (sqrt.f64 #s(literal -2 binary64)))))) (pow.f64 im #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal -2 binary64)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64))))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) (*.f64 #s(literal -2 binary64) im))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* 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 (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 re re) im) (*.f64 #s(literal 2 binary64) re)) im))))))
#s(approx (* 2 (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re)) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 re #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (.f64 im im)) (.f64 re re)) im) (.f64 #s(literal 2 binary64) re)) im))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) (*.f64 #s(literal -1 binary64) im))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 re im))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 re (.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) im))) im))))))
#s(approx (+ (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) re) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 re (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 re #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (.f64 im im)) (.f64 #s(literal 1/2 binary64) (*.f64 re re))) im))) im))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) (*.f64 #s(literal -1 binary64) im))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 re re) (*.f64 im im)))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 re #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 re re) (*.f64 im im))))))))
#s(approx (sqrt (/ (+ (* (* (* (neg re) re) re) (* (* (neg re) re) re)) (pow im 6)) (+ (pow re 4) (- (pow im 4) (* (* re re) (* im im)))))) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (pow.f64 re #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 im #s(literal 4 binary64))) (fma.f64 #s(literal -1/2 binary64) (/.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 re #s(literal 4 binary64)) (fma.f64 #s(literal 1/4 binary64) (pow.f64 re #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))))) (.f64 (.f64 re re) (fma.f64 #s(literal -1 binary64) (pow.f64 re #s(literal 4 binary64)) (pow.f64 re #s(literal 4 binary64))))) (pow.f64 im #s(literal 6 binary64))) (.f64 #s(literal 1/2 binary64) (/.f64 (.f64 re re) (*.f64 im im)))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (.f64 #s(literal -1/2 binary64) (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -2 binary64)))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal -2 binary64)))) (.f64 #s(literal 1/2 binary64) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal -1/8 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (.f64 re re) (sqrt.f64 #s(literal -2 binary64)))) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal -2 binary64)))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64)))))))))
#s(approx (* 1/2 (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)))) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/16 binary64) (.f64 (sqrt.f64 im) (.f64 (.f64 re re) (sqrt.f64 #s(literal -2 binary64)))) (.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 im) (.f64 (.f64 re re) (sqrt.f64 #s(literal -2 binary64)))))) (pow.f64 im #s(literal 3 binary64))) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal -2 binary64)))) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64)))))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (.f64 #s(literal -1 binary64) (.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -2 binary64)))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal -2 binary64)))) (*.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64)))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal -1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -5 binary64))) (.f64 (.f64 re re) (sqrt.f64 #s(literal -2 binary64)))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal -2 binary64)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64))))))))
#s(approx (sqrt (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re))) (.f64 #s(literal -1 binary64) (.f64 im (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal 1/8 binary64) (.f64 (sqrt.f64 im) (.f64 (.f64 re re) (sqrt.f64 #s(literal -2 binary64)))) (.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 im) (.f64 (.f64 re re) (sqrt.f64 #s(literal -2 binary64)))))) (pow.f64 im #s(literal 3 binary64))) (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 re (sqrt.f64 #s(literal -2 binary64)))) (.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 im)) (sqrt.f64 #s(literal -2 binary64))))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (*.f64 #s(literal -2 binary64) im))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 2 binary64) (*.f64 #s(literal -2 binary64) (/.f64 re im))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (.f64 re re) im) (*.f64 #s(literal 2 binary64) re)) im))))))
#s(approx (* 2 (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re)) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 2 binary64) (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 im im)) (.f64 re re)) im) (.f64 #s(literal 2 binary64) re)) im))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) (*.f64 #s(literal -1 binary64) im))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (*.f64 #s(literal -1 binary64) (/.f64 re im))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 re (.f64 #s(literal -1/2 binary64) (/.f64 (*.f64 re re) im))) im))))))
#s(approx (+ (* (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (pow (pow (sqrt (+ (* im im) (* re re))) 2) 1/4)) re) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (.f64 #s(literal -1 binary64) (/.f64 (+.f64 re (.f64 #s(literal -1 binary64) (/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (.f64 im im)) (.f64 #s(literal 1/2 binary64) (*.f64 re re))) im))) im))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (sqrt.f64 (*.f64 im #s(literal -1 binary64))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 (.f64 re re) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (.f64 im #s(literal -1 binary64)))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 (.f64 re re) (sqrt.f64 #s(literal -1 binary64)))) (fma.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 (pow.f64 im #s(literal -7 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64)) (.f64 #s(literal 1/32 binary64) (pow.f64 re #s(literal 4 binary64)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 (.f64 re re) (sqrt.f64 #s(literal -1 binary64)))) (fma.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -1 binary64)) (fma.f64 (sqrt.f64 (pow.f64 im #s(literal -7 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64)) (.f64 #s(literal 1/32 binary64) (pow.f64 re #s(literal 4 binary64))))) (.f64 (sqrt.f64 (pow.f64 im #s(literal -11 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/32 binary64) (pow.f64 re #s(literal 6 binary64)) (fma.f64 #s(literal 1/384 binary64) (pow.f64 re #s(literal 6 binary64)) (.f64 #s(literal 1/12 binary64) (pow.f64 re #s(literal 6 binary64)))))))))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) (pow.f64 (*.f64 #s(literal -1 binary64) im) #s(literal 1/4 binary64)))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 7 binary64))) #s(literal 1/4 binary64)) (.f64 re re)) (pow.f64 (*.f64 #s(literal -1 binary64) im) #s(literal 1/4 binary64))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 7 binary64))) #s(literal 1/4 binary64)) (.f64 re re)) (fma.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 15 binary64))) #s(literal 1/4 binary64)) (fma.f64 #s(literal -1/16 binary64) (pow.f64 re #s(literal 4 binary64)) (.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 4 binary64)))) (pow.f64 (.f64 #s(literal -1 binary64) im) #s(literal 1/4 binary64)))))
#s(approx (pow (sqrt (+ (* im im) (* re re))) 1/4) (fma.f64 #s(literal 1/8 binary64) (.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 7 binary64))) #s(literal 1/4 binary64)) (.f64 re re)) (fma.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 15 binary64))) #s(literal 1/4 binary64)) (fma.f64 #s(literal -1/16 binary64) (pow.f64 re #s(literal 4 binary64)) (.f64 #s(literal 1/128 binary64) (pow.f64 re #s(literal 4 binary64)))) (fma.f64 (pow.f64 (/.f64 #s(literal -1 binary64) (pow.f64 im #s(literal 23 binary64))) #s(literal 1/4 binary64)) (fma.f64 #s(literal -1/128 binary64) (pow.f64 re #s(literal 6 binary64)) (fma.f64 #s(literal 1/3072 binary64) (pow.f64 re #s(literal 6 binary64)) (.f64 #s(literal 1/24 binary64) (pow.f64 re #s(literal 6 binary64))))) (pow.f64 (*.f64 #s(literal -1 binary64) im) #s(literal 1/4 binary64))))))
#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 (.f64 re re) (*.f64 im im)))))))
#s(approx (sqrt (+ (* im im) (* re re))) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (fma.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 (.f64 re re) (*.f64 im im))))))))
#s(approx (sqrt (+ (* im im) (* re re))) (.f64 #s(literal -1 binary64) (.f64 im (+.f64 #s(literal 1 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (pow.f64 re #s(literal 4 binary64)) (pow.f64 im #s(literal 4 binary64))) (fma.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 (.f64 re re) (*.f64 im im)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (sqrt.f64 (*.f64 im #s(literal -1 binary64))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 (.f64 re re) (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 (.f64 im #s(literal -1 binary64)))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 (.f64 re re) (sqrt.f64 #s(literal -1 binary64)))) (fma.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -1 binary64)) (.f64 (sqrt.f64 (pow.f64 im #s(literal -7 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64)) (.f64 #s(literal 1/32 binary64) (pow.f64 re #s(literal 4 binary64)))))))))
#s(approx (pow (pow (sqrt (+ (* im im) (* re re))) 1/4) 2) (fma.f64 #s(literal 1/4 binary64) (.f64 (sqrt.f64 (pow.f64 im #s(literal -3 binary64))) (.f64 (.f64 re re) (sqrt.f64 #s(literal -1 binary64)))) (fma.f64 (sqrt.f64 im) (sqrt.f64 #s(literal -1 binary64)) (fma.f64 (sqrt.f64 (pow.f64 im #s(literal -7 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/8 binary64) (pow.f64 re #s(literal 4 binary64)) (.f64 #s(literal 1/32 binary64) (pow.f64 re #s(literal 4 binary64))))) (.f64 (sqrt.f64 (pow.f64 im #s(literal -11 binary64))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (fma.f64 #s(literal -1/32 binary64) (pow.f64 re #s(literal 6 binary64)) (fma.f64 #s(literal 1/384 binary64) (pow.f64 re #s(literal 6 binary64)) (.f64 #s(literal 1/12 binary64) (pow.f64 re #s(literal 6 binary64)))))))))))

eval154.0ms (4.3%)

Memory: 28.6MiB live, 310.4MiB allocated; 34ms collecting garbage
Compiler: Compiled 54 444 to 6 591 computations (87.9% saved)

prune41.0ms (1.1%)

Memory

-13.4MiB live, 126.7MiB allocated; 7ms collecting garbage

Pruning

15 alts after pruning (12 fresh and 3 done)

	Pruned	Kept	Total
New	964	12	976
Fresh	16	0	16
Picked	5	0	5
Done	1	3	4
Total	986	15	1 001

Accuracy

87.2%

Counts

1 001 → 15

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	74.5%	(.f64 (.f64 (sqrt.f64 (+.f64 (hypot.f64 re im) re)) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
	40.3%	(.f64 (.f64 (sqrt.f64 (+.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)) (/.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64))
	0.0%	(.f64 (.f64 (sqrt.f64 #s(approx (+ (sqrt (+ (* re re) (* im im))) re) (*.f64 #s(literal -1 binary64) im))) (/.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64))
	50.5%	(.f64 (.f64 (sqrt.f64 #s(approx (+ (sqrt (+ (* re re) (* im im))) re) im)) (/.f64 #s(literal 2 binary64) (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/2 binary64))
	42.8%	(.f64 (sqrt.f64 (.f64 (/.f64 #s(approx (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (*.f64 im im)) (-.f64 (hypot.f64 re im) re)) #s(literal 2 binary64))) #s(literal 1/2 binary64))
✓	74.6%	(.f64 (sqrt.f64 (.f64 (+.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))
	52.2%	(.f64 (sqrt.f64 (.f64 #s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) (+.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64))
	50.9%	(.f64 (sqrt.f64 (.f64 #s(approx (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) im) #s(literal 2 binary64))) #s(literal 1/2 binary64))
	50.4%	(.f64 (sqrt.f64 #s(approx ( (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (fma.f64 #s(literal 2 binary64) im (*.f64 re (+.f64 #s(literal 2 binary64) (/.f64 re im)))))) #s(literal 1/2 binary64))
	17.2%	(.f64 (sqrt.f64 #s(approx ( (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (.f64 #s(literal -1 binary64) (/.f64 (.f64 im im) re)))) #s(literal 1/2 binary64))
	0.0%	(.f64 (sqrt.f64 #s(approx ( (/ (- (pow (sqrt (+ (* re re) (* im im))) 2) (* re re)) (- (sqrt (+ (* re re) (* im im))) re)) 2) (*.f64 #s(literal -2 binary64) im))) #s(literal 1/2 binary64))
✓	40.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))
	5.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 #s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (*.f64 #s(literal -1 binary64) re)) re))))
	4.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 #s(approx (/ (sqrt (+ (* (* re re) (* re re)) (* (* (neg im) im) (* im im)))) (sqrt (* (+ re im) (- re im)))) (*.f64 #s(literal -1 binary64) im)) re))))
	23.6%	#s(approx (* (* (sqrt (+ (sqrt (+ (* re re) (* im im))) re)) (/ 2 (sqrt 2))) 1/2) (sqrt.f64 re))

Compiler

Compiled 1 763 to 655 computations (62.8% saved)

regimes160.0ms (4.5%)

Memory

-21.2MiB live, 231.2MiB allocated; 40ms collecting garbage

Counts

58 → 2

Calls

Call 1

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

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

Outputs

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

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

Calls

7 calls:

46.0ms	re
29.0ms	(sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))
23.0ms	im
19.0ms	(*.f64 im im)
15.0ms	(+.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)

Results

Accuracy	Segments	Branch
78.1%	3	`(*.f64 im im)`
82.1%	2	`(+.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`
82.1%	2	`(.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))`
82.9%	2	`(sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`
82.9%	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))))`
79.9%	2	`re`
78.1%	3	`im`

Compiler

Compiled 55 to 45 computations (18.2% saved)

regimes30.0ms (0.8%)

Memory

-6.9MiB live, 86.1MiB allocated; 4ms collecting garbage

Counts

14 → 3

Calls

Call 1

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

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

Outputs

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

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

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

Calls

7 calls:

6.0ms	(.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))
4.0ms	(*.f64 im im)
4.0ms	im
4.0ms	re
4.0ms	(+.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)

Results

Accuracy	Segments	Branch
69.4%	4	`(*.f64 im im)`
69.4%	4	`im`
70.9%	4	`re`
71.3%	3	`(+.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`
71.3%	3	`(.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))`
71.9%	3	`(sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`
71.9%	3	`(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))`

Compiler

Compiled 55 to 45 computations (18.2% saved)

regimes15.0ms (0.4%)

Memory

-0.5MiB live, 46.5MiB allocated; 2ms collecting garbage

Counts

9 → 3

Calls

Call 1

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

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

Outputs

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

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

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

Calls

5 calls:

4.0ms	re
3.0ms	(+.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)
3.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))))
3.0ms	(sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))
2.0ms	(.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))

Results

Accuracy	Segments	Branch
68.6%	3	`re`
62.3%	3	`(+.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`
62.3%	3	`(.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))`
63.0%	3	`(sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`
63.0%	3	`(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (+.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))`

Compiler

Compiled 51 to 40 computations (21.6% saved)

regimes7.0ms (0.2%)

Memory

20.6MiB live, 20.7MiB allocated; 0ms collecting garbage

Counts

6 → 2

Calls

Call 1

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

Outputs

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

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

Calls

3 calls:

2.0ms	im
2.0ms	re
2.0ms	(*.f64 im im)

Results

Accuracy	Segments	Branch
62.9%	2	`(*.f64 im im)`
62.9%	2	`im`
63.8%	2	`re`

Compiler

Compiled 5 to 7 computations (-40% saved)

regimes11.0ms (0.3%)

Memory

-26.6MiB live, 24.2MiB allocated; 4ms collecting garbage

Accuracy

Total -15.1b remaining (-30.9%)

Threshold costs -15.1b (-30.9%)

Counts

2 → 1

Calls

Call 1

Inputs

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

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

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

Calls

7 calls:

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

Results

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

Compiler

Compiled 55 to 45 computations (18.2% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.0	1.7333498277162227e-113

Compiler

Compiled 18 to 17 computations (5.6% saved)

bsearch1.0ms (0%)

Memory

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

Algorithm

2×	left-value

Steps

Time	Left	Right
0.0ms	2.494578025895015e+71	6.89494655316801e+72
0.0ms	0.0	1.7333498277162227e-113

Compiler

Compiled 18 to 17 computations (5.6% saved)

bsearch38.0ms (1.1%)

Memory

27.7MiB live, 72.8MiB allocated; 3ms collecting garbage

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
11.0ms	1.7288631236349317e+63	8.851897361163663e+64
25.0ms	-3.525591310094678e-24	-1.5691383001364095e-30

Samples

10.0ms	179×	0	valid
8.0ms	45×	2	valid
3.0ms	22×	1	valid
2.0ms	10×	3	valid

Compiler

Compiled 1 051 to 626 computations (40.4% saved)

Precisions

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

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

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

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

adjust: 2.0ms (11.8% of total)

ival-add!: 1.0ms (5.9% of total)

bsearch40.0ms (1.1%)

Memory

-28.7MiB live, 16.5MiB allocated; 3ms collecting garbage

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
39.0ms	4.3664258765538375e-68	6.874115352388187e-67

Samples

35.0ms

96×

valid

Compiler

Compiled 336 to 224 computations (33.3% saved)

Precisions

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

ival-hypot: 2.0ms (57.4% of total)

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

ival-mult!: 1.0ms (28.7% of total)

adjust: 0.0ms (0% of total)

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

derivations110.0ms (3.1%)

Memory

7.1MiB live, 143.7MiB allocated; 15ms collecting garbage

Stop Event

1×

fuel

Compiler

Compiled 367 to 73 computations (80.1% saved)

preprocess42.0ms (1.2%)

Memory: 14.0MiB live, 105.1MiB allocated; 10ms collecting garbage
Remove: (abs im)
Compiler: Compiled 1 576 to 546 computations (65.4% saved)

end0.0ms (0%)

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

start0.0ms (0%)

analyze99.0ms (2.8%)

sample1.2s (33%)

explain160.0ms (4.5%)

preprocess60.0ms (1.7%)

rewrite76.0ms (2.1%)

eval76.0ms (2.1%)

prune26.0ms (0.7%)

rewrite44.0ms (1.2%)

eval27.0ms (0.8%)

prune17.0ms (0.5%)

rewrite176.0ms (4.9%)

eval159.0ms (4.4%)

prune40.0ms (1.1%)

series421.0ms (11.7%)

rewrite374.0ms (10.4%)

eval154.0ms (4.3%)

prune41.0ms (1.1%)

regimes160.0ms (4.5%)

regimes30.0ms (0.8%)

regimes15.0ms (0.4%)

regimes7.0ms (0.2%)

regimes11.0ms (0.3%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch38.0ms (1.1%)

bsearch40.0ms (1.1%)

derivations110.0ms (3.1%)

preprocess42.0ms (1.2%)

end0.0ms (0%)

Profiling