Metrics for math.abs on complex

start0.0ms (0.0%)

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

analyze0.0ms (0.0%)

Memory

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

Algorithm

1×

Search

Probability	Valid	Unknown	Precondition	Infinite	Domain	Can't	Iter
0.0%	0.0%	99.9%	0.1%	0.0%	0.0%	0.0%	0
100.0%	99.9%	0.0%	0.1%	0.0%	0.0%	0.0%	1

Compiler

Compiled 10 to 5 computations (50.0% saved)

sample395.0ms (30.9%)

Memory

7.2MiB live, 138.6MiB allocated; 7ms collecting garbage

Samples

248.0ms

8 256×

valid

Precisions

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

ival-hypot!: 106.0ms (95.8% of total, 20.1 MiB)

adjust: 5.0ms (4.5% of total, 1.3 MiB)

Bogosity

preprocess33.0ms (2.6%)

Memory

-0.0MiB live, 7.5MiB allocated; 1ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	18	50
1	62	50
2	157	50
3	226	50
4	520	50
5	2747	50

Stop Event

1×	node-limit

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	53.4%	(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))

Symmetry

(abs re)

(abs im)

(sort re im)

Compiler

Compiled 16 to 12 computations (25.0% saved)

series17.0ms (1.3%)

Memory

2.1MiB live, 9.7MiB allocated; 1ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	141	764

Stop Event

1×	iter-limit

Counts

6 → 30

Calls

Call 1

Inputs
re
(*.f64 re re)
im
(*.f64 im im)
(+.f64 (.f64 re re) (.f64 im im))
(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))

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

Calls

6 calls:

Time	Variable	Point
1.0ms	re	inf
1.0ms	im	0
1.0ms	re	0
1.0ms	im	inf
0.0ms	re	-inf

rewrite97.0ms (7.6%)

Memory

-3.1MiB live, 40.0MiB allocated; 3ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	6	23
0	10	23
1	46	23
2	164	23
3	482	23
4	1052	23
0	4206	23

Stop Event

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

Counts

6 → 314

Calls

Call 1

Inputs
re
(*.f64 re re)
im
(*.f64 im im)
(+.f64 (.f64 re re) (.f64 im im))
(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))

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

eval28.0ms (2.2%)

Memory: 1.9MiB live, 24.0MiB allocated; 2ms collecting garbage
Compiler: Compiled 5 607 to 1 230 computations (78.1% saved)

prune7.0ms (0.5%)

Memory

-2.0MiB live, 7.5MiB allocated; 1ms collecting garbage

Pruning

6 alts after pruning (5 fresh and 1 done)

	Pruned	Kept	Total
New	334	5	339
Fresh	0	0	0
Picked	0	1	1
Done	0	0	0
Total	334	6	340

Accuracy

92.6%

Counts

340 → 6

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	53.4%	(sqrt.f64 (+.f64 (*.f64 re re) (/.f64 (pow.f64 im #s(literal 1 binary64)) (pow.f64 im #s(literal -1 binary64)))))
✓	53.4%	(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))
▶	4.8%	#s(approx (sqrt (+ (* re re) (* im im))) (.f64 re (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 im #s(literal 2 binary64)) (pow.f64 re #s(literal 2 binary64)))))))
▶	85.9%	#s(approx (sqrt (+ (* re re) (* im im))) (.f64 im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (/.f64 (pow.f64 re #s(literal 2 binary64)) (pow.f64 im #s(literal 2 binary64)))))))
▶	1.8%	#s(approx (sqrt (+ (* re re) (* im im))) (*.f64 #s(literal -1 binary64) re))
▶	1.1%	#s(approx (sqrt (+ (* re re) (* im im))) (*.f64 #s(literal -1 binary64) im))

Compiler

Compiled 96 to 51 computations (46.9% saved)

series17.0ms (1.3%)

Memory

3.1MiB live, 10.6MiB allocated; 1ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	208	1283

Stop Event

1×	iter-limit

Counts

28 → 52

Calls

Call 1

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

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

Calls

6 calls:

Time	Variable	Point
2.0ms	re	inf
2.0ms	re	0
2.0ms	im	0
1.0ms	im	inf
0.0ms	im	-inf

rewrite90.0ms (7.1%)

Memory

-2.3MiB live, 43.0MiB allocated; 3ms collecting garbage

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	32	205
0	50	187
1	198	187
2	889	159
0	4225	159

Stop Event

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

Counts

28 → 777

Calls

Call 1

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

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

eval66.0ms (5.1%)

Memory: 1.0MiB live, 60.4MiB allocated; 10ms collecting garbage
Compiler: Compiled 13 403 to 2 920 computations (78.2% saved)

prune13.0ms (1.0%)

Memory

-8.3MiB live, 16.8MiB allocated; 1ms collecting garbage

Pruning

9 alts after pruning (8 fresh and 1 done)

	Pruned	Kept	Total
New	758	8	766
Fresh	0	0	0
Picked	5	0	5
Done	0	1	1
Total	763	9	772

Accuracy

99.3%

Counts

772 → 9

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	0.0%	(/.f64 (sqrt.f64 (neg.f64 (+.f64 (/.f64 (*.f64 re re) im) im))) (sqrt.f64 (/.f64 #s(literal -1 binary64) im)))
✓	53.4%	(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))
	18.9%	(sqrt.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (/.f64 im (.f64 re re)) im)) (.f64 re re)))
	1.1%	#s(approx (sqrt (+ (* re re) (* im im))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) im)))
▶	6.5%	#s(approx (sqrt (+ (* re re) (* im im))) (+.f64 re (.f64 #s(literal 1/2 binary64) (.f64 im (/.f64 im re)))))
▶	99.8%	#s(approx (sqrt (+ (* re re) (* im im))) (.f64 im (+.f64 #s(literal 1 binary64) (.f64 #s(literal 1/2 binary64) (*.f64 (/.f64 re im) (/.f64 re im))))))
▶	1.8%	#s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 re))
	1.1%	#s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 im))
▶	98.8%	#s(approx (sqrt (+ (* re re) (* im im))) #s(approx (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))) im))

Compiler

Compiled 128 to 63 computations (50.8% saved)

series36.0ms (2.8%)

Memory

8.3MiB live, 23.1MiB allocated; 1ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	543	3594

Stop Event

1×	iter-limit

Counts

28 → 106

Calls

Call 1

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

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

Calls

6 calls:

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

rewrite82.0ms (6.5%)

Memory

-2.3MiB live, 37.5MiB allocated; 2ms collecting garbage

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	39	217
0	57	202
1	258	201
2	976	189
0	4268	189

Stop Event

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

Counts

28 → 576

Calls

Call 1

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

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

eval50.0ms (3.9%)

Memory: 1.5MiB live, 48.5MiB allocated; 8ms collecting garbage
Compiler: Compiled 12 649 to 2 710 computations (78.6% saved)

prune11.0ms (0.9%)

Memory

-3.8MiB live, 14.3MiB allocated; 0ms collecting garbage

Pruning

13 alts after pruning (9 fresh and 4 done)

	Pruned	Kept	Total
New	658	6	664
Fresh	0	3	3
Picked	2	3	5
Done	0	1	1
Total	660	13	673

Accuracy

100.0%

Counts

673 → 13

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	0.0%	(/.f64 (sqrt.f64 (-.f64 (*.f64 (/.f64 (neg.f64 re) im) re) im)) (sqrt.f64 (/.f64 #s(literal -1 binary64) im)))
▶	0.0%	(/.f64 #s(approx (sqrt (neg (+ (/ (* re re) im) im))) (sqrt.f64 (neg.f64 im))) (sqrt.f64 (/.f64 #s(literal -1 binary64) im)))
	0.0%	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 (/.f64 #s(literal -1 binary64) im)) (sqrt.f64 (neg.f64 (+.f64 (*.f64 (/.f64 re im) re) im)))))
	99.3%	(.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 re im) re) im)) (sqrt.f64 im))
	0.0%	(.f64 (sqrt.f64 (neg.f64 (+.f64 (.f64 (/.f64 re im) re) im))) (sqrt.f64 (neg.f64 im)))
✓	53.4%	(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))
▶	18.9%	(sqrt.f64 (.f64 (+.f64 #s(literal 1 binary64) (.f64 (/.f64 im (.f64 re re)) im)) (.f64 re re)))
	1.1%	#s(approx (sqrt (+ (* re re) (* im im))) (/.f64 #s(literal 1 binary64) (/.f64 #s(literal -1 binary64) im)))
▶	99.8%	#s(approx (sqrt (+ (* re re) (* im im))) (-.f64 im (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 re im) re))))
✓	6.5%	#s(approx (sqrt (+ (* re re) (* im im))) (+.f64 re (.f64 #s(literal 1/2 binary64) (.f64 im (/.f64 im re)))))
✓	1.8%	#s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 re))
▶	1.1%	#s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 im))
✓	98.8%	#s(approx (sqrt (+ (* re re) (* im im))) #s(approx (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))) im))

Compiler

Compiled 204 to 80 computations (60.8% saved)

series31.0ms (2.4%)

Memory

-0.2MiB live, 21.5MiB allocated; 1ms collecting garbage

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	527	3437

Stop Event

1×	iter-limit

Counts

29 → 101

Calls

Call 1

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

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

Calls

6 calls:

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

rewrite108.0ms (8.5%)

Memory

3.6MiB live, 44.4MiB allocated; 2ms collecting garbage

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	37	195
0	59	195
1	244	177
2	892	173
3	3412	173
0	4125	173

Stop Event

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

Counts

29 → 848

Calls

Call 1

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

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

eval72.0ms (5.6%)

Memory: 5.0MiB live, 65.6MiB allocated; 12ms collecting garbage
Compiler: Compiled 17 983 to 3 645 computations (79.7% saved)

prune15.0ms (1.1%)

Memory

-4.5MiB live, 18.6MiB allocated; 1ms collecting garbage

Pruning

13 alts after pruning (7 fresh and 6 done)

	Pruned	Kept	Total
New	988	6	994
Fresh	3	1	4
Picked	3	2	5
Done	0	4	4
Total	994	13	1 007

Accuracy

100.0%

Counts

1 007 → 13

Alt Table

Click to see full alt table

Status	Accuracy	Program
	26.8%	(.f64 (sqrt.f64 (-.f64 (.f64 (/.f64 im (*.f64 re re)) im) #s(literal -1 binary64))) (fabs.f64 re))
	99.3%	(.f64 (sqrt.f64 (+.f64 (.f64 (/.f64 re im) re) im)) (sqrt.f64 im))
	51.5%	(.f64 (sqrt.f64 (+.f64 re (.f64 (/.f64 im re) im))) (sqrt.f64 re))
	0.0%	(.f64 (sqrt.f64 (neg.f64 (+.f64 re (.f64 (/.f64 im re) im)))) (sqrt.f64 (neg.f64 re)))
✓	53.4%	(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))
	4.4%	(sqrt.f64 (.f64 #s(approx (+ 1 ( (/ im (* re re)) im)) #s(literal 1 binary64)) (*.f64 re re)))
✓	99.8%	#s(approx (sqrt (+ (* re re) (* im im))) (-.f64 im (.f64 #s(literal -1/2 binary64) (.f64 (/.f64 re im) re))))
✓	6.5%	#s(approx (sqrt (+ (* re re) (* im im))) (+.f64 re (.f64 #s(literal 1/2 binary64) (.f64 im (/.f64 im re)))))
	0.0%	#s(approx (sqrt (+ (* re re) (* im im))) (*.f64 (sqrt.f64 (neg.f64 im)) (sqrt.f64 (neg.f64 im))))
	53.3%	#s(approx (sqrt (+ (* re re) (* im im))) (sqrt.f64 (*.f64 im im)))
✓	1.8%	#s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 re))
✓	1.1%	#s(approx (sqrt (+ (* re re) (* im im))) (neg.f64 im))
✓	98.8%	#s(approx (sqrt (+ (* re re) (* im im))) #s(approx (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))) im))

Compiler

Compiled 96 to 44 computations (54.2% saved)

regimes59.0ms (4.6%)

Memory

6.4MiB live, 38.7MiB allocated; 1ms collecting garbage

Counts

10 → 1

26 → 1

Calls

Call 1

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

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

Call 2

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

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

Calls

12 calls:

7.0ms	re
6.0ms	im
6.0ms	(+.f64 (.f64 re re) (.f64 im im))
6.0ms	(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))
6.0ms	(*.f64 im im)

Results

Accuracy	Segments	Branch
98.8%	1	`(*.f64 im im)`
98.8%	1	`(*.f64 re re)`
98.8%	1	`(+.f64 (.f64 re re) (.f64 im im))`
98.8%	1	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`
98.8%	1	`re`
98.8%	1	`im`
99.8%	1	`(*.f64 im im)`
99.8%	1	`(*.f64 re re)`
99.8%	1	`(+.f64 (.f64 re re) (.f64 im im))`
99.8%	1	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`
99.8%	1	`re`
99.8%	1	`im`

Compiler

Compiled 283 to 122 computations (56.9% saved)

derivations35.0ms (2.7%)

Memory

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

Stop Event

1×

fuel

Compiler

Compiled 10 to 7 computations (30.0% saved)

preprocess16.0ms (1.2%)

Memory

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

Symmetry

(abs re)

(abs im)

(sort re im)

Compiler

Compiled 98 to 65 computations (33.7% saved)

end0.0ms (0.0%)

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

start0.0ms (0.0%)

analyze0.0ms (0.0%)

sample395.0ms (30.9%)

preprocess33.0ms (2.6%)

series17.0ms (1.3%)

rewrite97.0ms (7.6%)

eval28.0ms (2.2%)

prune7.0ms (0.5%)

series17.0ms (1.3%)

rewrite90.0ms (7.1%)

eval66.0ms (5.1%)

prune13.0ms (1.0%)

series36.0ms (2.8%)

rewrite82.0ms (6.5%)

eval50.0ms (3.9%)

prune11.0ms (0.9%)

series31.0ms (2.4%)

rewrite108.0ms (8.5%)

eval72.0ms (5.6%)

prune15.0ms (1.1%)

regimes59.0ms (4.6%)

derivations35.0ms (2.7%)

preprocess16.0ms (1.2%)

end0.0ms (0.0%)

Profiling