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

start0.0ms (0%)

Memory: 0.1MiB live, 0.1MiB allocated

analyze112.0ms (1.6%)

Memory

-21.0MiB live, 175.4MiB allocated

Algorithm

1×

Search

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

Compiler

Compiled 19 to 12 computations (36.8% saved)

sample1.9s (26.6%)

Memory

37.4MiB live, 2 080.6MiB allocated

Samples

513.0ms	6 215×	0	valid
233.0ms	482×	3	valid
218.0ms	795×	2	valid
156.0ms	764×	1	valid

Precisions

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

ival-hypot: 332.0ms (40% of total)

ival-mult: 170.0ms (20.5% of total)

ival-sub: 125.0ms (15% of total)

ival-sqrt: 86.0ms (10.4% of total)

adjust: 70.0ms (8.4% of total)

ival->: 31.0ms (3.7% of total)

exact: 13.0ms (1.6% of total)

ival-assert: 3.0ms (0.4% of total)

Bogosity

explain237.0ms (3.3%)

Memory

-56.4MiB live, 411.5MiB allocated

FPErrors

Click to see full error table

Ground Truth	Overpredictions	Example	Underpredictions	Example	Subexpression
119	0	-	4	(-1.9274605882813903e-158 6.39236557874411e-307)	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`
31	0	-	1	(7.833887910122618e-242 1.4933026094938342e-282)	`(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`
30	1	(7.833887910122618e-242 1.4933026094938342e-282)	0	-	`(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`
0	0	-	0	-	`(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))`
0	0	-	0	-	`(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))`
0	0	-	0	-	`(*.f64 re re)`
0	0	-	0	-	`im`
0	0	-	0	-	`(+.f64 (.f64 re re) (.f64 im im))`
0	0	-	0	-	`#s(literal 2 binary64)`
0	0	-	0	-	`re`
0	0	-	0	-	`#s(literal 1/2 binary64)`
0	0	-	0	-	`(*.f64 im im)`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`sqrt.f64`	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`	oflow-rescue	93	0
↳	`(+.f64 (.f64 re re) (.f64 im im))`	overflow	93
↳	`(*.f64 re re)`	overflow	47
↳	`(*.f64 im im)`	overflow	60
`-.f64`	`(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`	cancellation	31	0
`sqrt.f64`	`(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`	uflow-rescue	30	0
↳	`(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))`	underflow	35
↳	`(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`	underflow	5
↳	`(*.f64 re re)`	underflow	59
↳	`(*.f64 im im)`	underflow	77
↳	`(+.f64 (.f64 re re) (.f64 im im))`	underflow	22
↳	`(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`	underflow	35
`sqrt.f64`	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`	uflow-rescue	22	0
↳	`(+.f64 (.f64 re re) (.f64 im im))`	underflow	22
↳	`(*.f64 re re)`	underflow	59
↳	`(*.f64 im im)`	underflow	77

Confusion

	Predicted +	Predicted -
+	147	3
-	0	106

Precision

1.0

Recall

0.98

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	147	0	3
-	0	0	106

Precision?

1.0

Recall?

0.98

Freqs

test

number	freq
0	109
1	118
2	29

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

38.0ms	382×	0	valid
15.0ms	46×	2	valid
12.0ms	28×	3	valid
10.0ms	56×	1	valid

Compiler

Compiled 244 to 52 computations (78.7% saved)

Precisions

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

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

ival-mult: 16.0ms (30.1% of total)

adjust: 6.0ms (11.3% of total)

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

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

ival-add: 3.0ms (5.6% of total)

exact: 1.0ms (1.9% of total)

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

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

preprocess49.0ms (0.7%)

Memory

12.6MiB live, 48.4MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	30	77
1	71	75
2	152	75
3	285	75
4	424	75
5	515	75
6	637	75
7	775	75
8	830	75
0	12	15
0	20	15
1	25	15
2	36	15
3	52	15
4	73	15
5	98	15
6	154	15
7	227	15
8	310	15
9	360	15
10	420	15
11	434	15
12	450	15
13	470	15
14	500	15
15	531	15
16	543	15
17	545	15
0	545	10

Stop Event

1×	iter limit
1×	saturated
1×	iter limit
1×	saturated

Calls

Call 1

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

Outputs

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

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

Symmetry

(abs im)

Compiler

Compiled 15 to 12 computations (20% saved)

eval0.0ms (0%)

Memory: 0.3MiB live, 0.3MiB allocated
Compiler: Compiled 0 to 2 computations (-∞% saved)

prune1.0ms (0%)

Memory

1.2MiB live, 1.2MiB allocated

Alt Table

Click to see full alt table

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

Compiler

Compiled 15 to 12 computations (20% saved)

simplify35.0ms (0.5%)

Memory

-6.1MiB live, 33.5MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 4 expressions of interest:

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

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	12	75
0	20	75
1	25	75
2	36	75
3	52	75
4	73	75
5	98	75
6	154	75
7	227	75
8	310	75
9	360	75
10	420	75
11	434	75
12	450	75
13	470	75
14	500	75
15	531	75
16	543	75
17	545	75
0	545	49

Stop Event

1×	iter limit
1×	saturated
1×	iter limit

Calls

Call 1

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

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

localize52.0ms (0.7%)

Memory

19.5MiB live, 88.4MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score
accuracy	0.01171875	(+.f64 (.f64 re re) (.f64 im im))
accuracy	6.9713965729354195	(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)
accuracy	7.028791824078562	(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))
accuracy	27.190157484134534	(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))

Samples

26.0ms	191×	0	valid
6.0ms	23×	2	valid
5.0ms	28×	1	valid
5.0ms	14×	3	valid

Compiler

Compiled 152 to 26 computations (82.9% saved)

Precisions

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

ival-mult: 10.0ms (32.1% of total)

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

ival-sub: 7.0ms (22.4% of total)

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

adjust: 2.0ms (6.4% of total)

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

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

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

exact: 0.0ms (0% of total)

series25.0ms (0.3%)

Memory

4.0MiB live, 42.5MiB allocated

Counts

6 → 144

Calls

Call 1

Inputs
#s(alt (+.f64 (.f64 re re) (.f64 im im)) (patch (+.f64 (.f64 re re) (.f64 im im)) #<representation binary64>) () ())
#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #<representation binary64>) () ())
#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (patch (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #<representation binary64>) () ())
#s(alt (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #<representation binary64>) () ())

Outputs
#s(alt (pow im 2) (taylor 0 re) (#s(alt (+.f64 (.f64 re re) (.f64 im im)) (patch (+.f64 (.f64 re re) (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (+ (pow im 2) (pow re 2)) (taylor 0 re) (#s(alt (+.f64 (.f64 re re) (.f64 im im)) (patch (+.f64 (.f64 re re) (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (+ (pow im 2) (pow re 2)) (taylor 0 re) (#s(alt (+.f64 (.f64 re re) (.f64 im im)) (patch (+.f64 (.f64 re re) (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (+ (pow im 2) (pow re 2)) (taylor 0 re) (#s(alt (+.f64 (.f64 re re) (.f64 im im)) (patch (+.f64 (.f64 re re) (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor 0 re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 re) (* 2 im)) (taylor 0 re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (/ re im) 2))) (taylor 0 re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2))) (taylor 0 re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt im (taylor 0 re) (#s(alt (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (patch (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ im (* 1/2 (/ (pow re 2) im))) (taylor 0 re) (#s(alt (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (patch (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im))))) (taylor 0 re) (#s(alt (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (patch (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im))))) (taylor 0 re) (#s(alt (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (patch (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt im (taylor 0 re) (#s(alt (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (+ im (* -1 re)) (taylor 0 re) (#s(alt (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (+ im (* re (- (* 1/2 (/ re im)) 1))) (taylor 0 re) (#s(alt (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1))) (taylor 0 re) (#s(alt (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (pow re 2) (taylor inf re) (#s(alt (+.f64 (.f64 re re) (.f64 im im)) (patch (+.f64 (.f64 re re) (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2)))) (taylor inf re) (#s(alt (+.f64 (.f64 re re) (.f64 im im)) (patch (+.f64 (.f64 re re) (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2)))) (taylor inf re) (#s(alt (+.f64 (.f64 re re) (.f64 im im)) (patch (+.f64 (.f64 re re) (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2)))) (taylor inf re) (#s(alt (+.f64 (.f64 re re) (.f64 im im)) (patch (+.f64 (.f64 re re) (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re) (taylor inf re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re) (taylor inf re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re) (taylor inf re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt re (taylor inf re) (#s(alt (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (patch (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))) (taylor inf re) (#s(alt (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (patch (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))) (taylor inf re) (#s(alt (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (patch (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))) (taylor inf re) (#s(alt (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (patch (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (pow im 2) re)) (taylor inf re) (#s(alt (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re) (taylor inf re) (#s(alt (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re) (taylor inf re) (#s(alt (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re) (taylor inf re) (#s(alt (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (pow re 2) (taylor -inf re) (#s(alt (+.f64 (.f64 re re) (.f64 im im)) (patch (+.f64 (.f64 re re) (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2)))) (taylor -inf re) (#s(alt (+.f64 (.f64 re re) (.f64 im im)) (patch (+.f64 (.f64 re re) (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2)))) (taylor -inf re) (#s(alt (+.f64 (.f64 re re) (.f64 im im)) (patch (+.f64 (.f64 re re) (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2)))) (taylor -inf re) (#s(alt (+.f64 (.f64 re re) (.f64 im im)) (patch (+.f64 (.f64 re re) (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2))))) (taylor -inf re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 re) (taylor -inf re) (#s(alt (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (patch (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (patch (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (patch (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))) (taylor -inf re) (#s(alt (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (patch (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -2 re) (taylor -inf re) (#s(alt (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))) (taylor -inf re) (#s(alt (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (pow re 2) (taylor 0 im) (#s(alt (+.f64 (.f64 re re) (.f64 im im)) (patch (+.f64 (.f64 re re) (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (+ (pow im 2) (pow re 2)) (taylor 0 im) (#s(alt (+.f64 (.f64 re re) (.f64 im im)) (patch (+.f64 (.f64 re re) (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (+ (pow im 2) (pow re 2)) (taylor 0 im) (#s(alt (+.f64 (.f64 re re) (.f64 im im)) (patch (+.f64 (.f64 re re) (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (+ (pow im 2) (pow re 2)) (taylor 0 im) (#s(alt (+.f64 (.f64 re re) (.f64 im im)) (patch (+.f64 (.f64 re re) (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))) (taylor 0 im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))) (taylor 0 im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt re (taylor 0 im) (#s(alt (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (patch (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ re (* 1/2 (/ (pow im 2) re))) (taylor 0 im) (#s(alt (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (patch (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))) (taylor 0 im) (#s(alt (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (patch (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))) (taylor 0 im) (#s(alt (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (patch (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (pow im 2) re)) (taylor 0 im) (#s(alt (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor inf im) (#s(alt (+.f64 (.f64 re re) (.f64 im im)) (patch (+.f64 (.f64 re re) (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2)))) (taylor inf im) (#s(alt (+.f64 (.f64 re re) (.f64 im im)) (patch (+.f64 (.f64 re re) (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2)))) (taylor inf im) (#s(alt (+.f64 (.f64 re re) (.f64 im im)) (patch (+.f64 (.f64 re re) (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2)))) (taylor inf im) (#s(alt (+.f64 (.f64 re re) (.f64 im im)) (patch (+.f64 (.f64 re re) (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor inf im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))) (taylor inf im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (* -2 (/ re im)))) (taylor inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2)))))) (taylor inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt im (taylor inf im) (#s(alt (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (patch (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (patch (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))) (taylor inf im) (#s(alt (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (patch (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))) (taylor inf im) (#s(alt (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (patch (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt im (taylor inf im) (#s(alt (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (* -1 (/ re im)))) (taylor inf im) (#s(alt (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im))) (taylor inf im) (#s(alt (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im))) (taylor inf im) (#s(alt (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor -inf im) (#s(alt (+.f64 (.f64 re re) (.f64 im im)) (patch (+.f64 (.f64 re re) (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2)))) (taylor -inf im) (#s(alt (+.f64 (.f64 re re) (.f64 im im)) (patch (+.f64 (.f64 re re) (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2)))) (taylor -inf im) (#s(alt (+.f64 (.f64 re re) (.f64 im im)) (patch (+.f64 (.f64 re re) (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2)))) (taylor -inf im) (#s(alt (+.f64 (.f64 re re) (.f64 im im)) (patch (+.f64 (.f64 re re) (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor -inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* 2 (/ re im))))) (taylor -inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im))))) (taylor -inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im))))) (taylor -inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (patch (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))) (taylor -inf im) (#s(alt (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (patch (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (patch (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))) (taylor -inf im) (#s(alt (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) (patch (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (/ re im)))) (taylor -inf im) (#s(alt (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im))))) (taylor -inf im) (#s(alt (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im))))) (taylor -inf im) (#s(alt (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #<representation binary64>) () ())) ())

Calls

6 calls:

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

simplify243.0ms (3.4%)

Memory

2.3MiB live, 244.0MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	551	3257
1	1814	3103
2	6380	3088
0	8199	2913

Stop Event

1×	iter limit
1×	node limit

Counts

144 → 138

Calls

Call 1

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

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

rewrite167.0ms (2.3%)

Memory

4.0MiB live, 175.2MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	12	65
0	20	65
1	56	65
2	374	65
3	4192	65
0	8391	38

Stop Event

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

Counts

6 → 292

Calls

Call 1

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

Outputs
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval100.0ms (1.4%)

Memory: -1.2MiB live, 72.9MiB allocated
Compiler: Compiled 11 147 to 2 488 computations (77.7% saved)

prune33.0ms (0.5%)

Memory

-8.7MiB live, 43.4MiB allocated

Pruning

14 alts after pruning (14 fresh and 0 done)

	Pruned	Kept	Total
New	416	14	430
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	417	14	431

Accuracy

99.7%

Counts

431 → 14

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	77.9%	(.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))
	76.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (sqrt.f64 (hypot.f64 im re)) #s(literal 2 binary64)) re))))
	44.8%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))
	31.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))))
	53.8%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 #s(approx (sqrt (+ (* re re) (* im im))) (.f64 (fma.f64 (/.f64 (.f64 re (/.f64 re im)) im) #s(literal 1/2 binary64) #s(literal 1 binary64)) im)) re))))
	55.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
▶	53.9%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))))
▶	13.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))))
	54.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (fma.f64 (/.f64 re im) #s(literal -2 binary64) #s(literal 2 binary64)) im))))
	53.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal 2 binary64) im))))
▶	24.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))))
	17.6%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (fma.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 #s(literal -1/16 binary64) (.f64 im im)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) im)))
▶	27.0%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
	27.0%	#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))

Compiler

Compiled 380 to 328 computations (13.7% saved)

simplify131.0ms (1.8%)

Memory

4.1MiB live, 42.8MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	43	357
0	71	302
1	101	302
2	140	302
3	210	302
4	245	302
5	298	302
6	410	302
7	641	302
8	968	302
9	1342	302
10	2329	302
11	2942	302
12	3928	302
13	4231	302
14	4525	302
15	4568	302
16	4568	302
17	4568	302
18	4572	302
0	4572	302

Stop Event

1×	iter limit
1×	saturated
1×	iter limit

Calls

Call 1

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

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

localize155.0ms (2.2%)

Memory

-12.6MiB live, 177.5MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.16015625	(.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64))))
accuracy	0.174160009768442	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))
accuracy	0.234375	(*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))
accuracy	13.74022868386055	#s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))
accuracy	0	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))))
accuracy	0.0390625	(fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))
accuracy	7.024885574078562	(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))))
accuracy	16.176556204552746	#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))
accuracy	0	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))))
accuracy	3.8870467147672563	(/.f64 (*.f64 im im) re)
accuracy	7.024885574078562	(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))
accuracy	13.794954920813348	#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))
accuracy	0	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))))
accuracy	0	(*.f64 #s(literal -4 binary64) re)
accuracy	7.024885574078562	(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))
accuracy	30.499242009407933	#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))
accuracy	0	(*.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))
accuracy	0	(.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))
accuracy	6.9674903229354195	(-.f64 (hypot.f64 im re) re)
accuracy	7.024885574078562	(sqrt.f64 (*.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)))

Samples

35.0ms	131×	0	invalid
29.0ms	23×	2	valid
26.0ms	60×	0	valid
23.0ms	28×	1	valid
15.0ms	14×	3	valid

Compiler

Compiled 519 to 69 computations (86.7% saved)

Precisions

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

ival-mult: 50.0ms (55.4% of total)

ival-hypot: 14.0ms (15.5% of total)

ival-sqrt: 9.0ms (10% of total)

ival-div: 6.0ms (6.6% of total)

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

adjust: 4.0ms (4.4% of total)

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

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

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

exact: 0.0ms (0% of total)

series47.0ms (0.7%)

Memory

29.5MiB live, 107.5MiB allocated

Counts

21 → 480

Calls

Call 1

Inputs
#s(alt (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) (patch (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (-.f64 (hypot.f64 im re) re) (patch (-.f64 (hypot.f64 im re) re) #<representation binary64>) () ())
#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))) #<representation binary64>) () ())
#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #<representation binary64>) () ())
#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #<representation binary64>) () ())
#s(alt (.f64 #s(literal -4 binary64) re) (patch (.f64 #s(literal -4 binary64) re) #<representation binary64>) () ())
#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))) #<representation binary64>) () ())
#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())
#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())
#s(alt (/.f64 (.f64 im im) re) (patch (/.f64 (.f64 im im) re) #<representation binary64>) () ())
#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))))) #<representation binary64>) () ())
#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))) #<representation binary64>) () ())
#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())
#s(alt (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) (patch (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())
#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())
#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())
#s(alt (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())

Outputs
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor 0 re) (#s(alt (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 re) (#s(alt (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) (patch (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 re) (* 2 im)) (taylor 0 re) (#s(alt (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) (patch (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (/ re im) 2))) (taylor 0 re) (#s(alt (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) (patch (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2))) (taylor 0 re) (#s(alt (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) (patch (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt im (taylor 0 re) (#s(alt (-.f64 (hypot.f64 im re) re) (patch (-.f64 (hypot.f64 im re) re) #<representation binary64>) () ())) ())
#s(alt (+ im (* -1 re)) (taylor 0 re) (#s(alt (-.f64 (hypot.f64 im re) re) (patch (-.f64 (hypot.f64 im re) re) #<representation binary64>) () ())) ())
#s(alt (+ im (* re (- (* 1/2 (/ re im)) 1))) (taylor 0 re) (#s(alt (-.f64 (hypot.f64 im re) re) (patch (-.f64 (hypot.f64 im re) re) #<representation binary64>) () ())) ())
#s(alt (+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1))) (taylor 0 re) (#s(alt (-.f64 (hypot.f64 im re) re) (patch (-.f64 (hypot.f64 im re) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 re) (* 2 im)) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (/ re im) 2))) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2))) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor 0 re) (#s(alt (.f64 #s(literal -4 binary64) re) (patch (.f64 #s(literal -4 binary64) re) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor 0 re) (#s(alt (.f64 #s(literal -4 binary64) re) (patch (.f64 #s(literal -4 binary64) re) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor 0 re) (#s(alt (.f64 #s(literal -4 binary64) re) (patch (.f64 #s(literal -4 binary64) re) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor 0 re) (#s(alt (.f64 #s(literal -4 binary64) re) (patch (.f64 #s(literal -4 binary64) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 re) (* 2 im)) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (/ re im) 2))) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2))) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 re) (#s(alt (/.f64 (.f64 im im) re) (patch (/.f64 (.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 re) (#s(alt (/.f64 (.f64 im im) re) (patch (/.f64 (.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 re) (#s(alt (/.f64 (.f64 im im) re) (patch (/.f64 (.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 re) (#s(alt (/.f64 (.f64 im im) re) (patch (/.f64 (.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 re) (* 2 im)) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (/ re im) 2))) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2))) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 re) (#s(alt (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) (patch (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 re) (* 2 im)) (taylor 0 re) (#s(alt (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) (patch (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (/ re im) 2))) (taylor 0 re) (#s(alt (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) (patch (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (/ re im) 2))) (taylor 0 re) (#s(alt (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) (patch (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor 0 re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) (patch (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re) (taylor inf re) (#s(alt (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) (patch (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re) (taylor inf re) (#s(alt (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) (patch (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re) (taylor inf re) (#s(alt (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) (patch (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (pow im 2) re)) (taylor inf re) (#s(alt (-.f64 (hypot.f64 im re) re) (patch (-.f64 (hypot.f64 im re) re) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re) (taylor inf re) (#s(alt (-.f64 (hypot.f64 im re) re) (patch (-.f64 (hypot.f64 im re) re) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re) (taylor inf re) (#s(alt (-.f64 (hypot.f64 im re) re) (patch (-.f64 (hypot.f64 im re) re) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re) (taylor inf re) (#s(alt (-.f64 (hypot.f64 im re) re) (patch (-.f64 (hypot.f64 im re) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor inf re) (#s(alt (.f64 #s(literal -4 binary64) re) (patch (.f64 #s(literal -4 binary64) re) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor inf re) (#s(alt (.f64 #s(literal -4 binary64) re) (patch (.f64 #s(literal -4 binary64) re) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor inf re) (#s(alt (.f64 #s(literal -4 binary64) re) (patch (.f64 #s(literal -4 binary64) re) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor inf re) (#s(alt (.f64 #s(literal -4 binary64) re) (patch (.f64 #s(literal -4 binary64) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt (/.f64 (.f64 im im) re) (patch (/.f64 (.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt (/.f64 (.f64 im im) re) (patch (/.f64 (.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt (/.f64 (.f64 im im) re) (patch (/.f64 (.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt (/.f64 (.f64 im im) re) (patch (/.f64 (.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (/ (pow re 2) im) (taylor inf re) (#s(alt (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) (patch (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re)))) (taylor inf re) (#s(alt (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) (patch (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re)))) (taylor inf re) (#s(alt (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) (patch (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re)))) (taylor inf re) (#s(alt (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) (patch (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) (patch (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2))))) (taylor -inf re) (#s(alt (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) (patch (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) (patch (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) (patch (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -2 re) (taylor -inf re) (#s(alt (-.f64 (hypot.f64 im re) re) (patch (-.f64 (hypot.f64 im re) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt (-.f64 (hypot.f64 im re) re) (patch (-.f64 (hypot.f64 im re) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt (-.f64 (hypot.f64 im re) re) (patch (-.f64 (hypot.f64 im re) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))) (taylor -inf re) (#s(alt (-.f64 (hypot.f64 im re) re) (patch (-.f64 (hypot.f64 im re) re) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2))))) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt (.f64 #s(literal -4 binary64) re) (patch (.f64 #s(literal -4 binary64) re) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt (.f64 #s(literal -4 binary64) re) (patch (.f64 #s(literal -4 binary64) re) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt (.f64 #s(literal -4 binary64) re) (patch (.f64 #s(literal -4 binary64) re) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt (.f64 #s(literal -4 binary64) re) (patch (.f64 #s(literal -4 binary64) re) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2))))) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor -inf re) (#s(alt (/.f64 (.f64 im im) re) (patch (/.f64 (.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor -inf re) (#s(alt (/.f64 (.f64 im im) re) (patch (/.f64 (.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor -inf re) (#s(alt (/.f64 (.f64 im im) re) (patch (/.f64 (.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor -inf re) (#s(alt (/.f64 (.f64 im im) re) (patch (/.f64 (.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2))))) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (/ (pow re 2) im) (taylor -inf re) (#s(alt (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) (patch (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re)))) (taylor -inf re) (#s(alt (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) (patch (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im))) (taylor -inf re) (#s(alt (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) (patch (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im))) (taylor -inf re) (#s(alt (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) (patch (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (pow (sqrt -1) 2) (* (sqrt 1/2) (sqrt 2)))) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (pow (sqrt -1) 2) (sqrt 1/2))) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (pow (sqrt -1) 2) (sqrt 1/2))) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (pow (sqrt -1) 2) (sqrt 1/2))) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (pow (sqrt -1) 2) (sqrt 1/2))) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))) (taylor 0 im) (#s(alt (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) (patch (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))) (taylor 0 im) (#s(alt (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) (patch (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) (patch (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) (patch (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (pow im 2) re)) (taylor 0 im) (#s(alt (-.f64 (hypot.f64 im re) re) (patch (-.f64 (hypot.f64 im re) re) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt (-.f64 (hypot.f64 im re) re) (patch (-.f64 (hypot.f64 im re) re) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt (-.f64 (hypot.f64 im re) re) (patch (-.f64 (hypot.f64 im re) re) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt (-.f64 (hypot.f64 im re) re) (patch (-.f64 (hypot.f64 im re) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt (/.f64 (.f64 im im) re) (patch (/.f64 (.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt (/.f64 (.f64 im im) re) (patch (/.f64 (.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt (/.f64 (.f64 im im) re) (patch (/.f64 (.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt (/.f64 (.f64 im im) re) (patch (/.f64 (.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (/ (pow re 2) im) (taylor 0 im) (#s(alt (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) (patch (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* im re)) (pow re 2)) im) (taylor 0 im) (#s(alt (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) (patch (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im) (taylor 0 im) (#s(alt (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) (patch (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im) (taylor 0 im) (#s(alt (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) (patch (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))) (taylor 0 im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt 1/2)) (taylor 0 im) (#s(alt (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt 1/2)) (taylor 0 im) (#s(alt (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt 1/2)) (taylor 0 im) (#s(alt (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt 1/2)) (taylor 0 im) (#s(alt (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor inf im) (#s(alt (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))) (taylor inf im) (#s(alt (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) (patch (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (* -2 (/ re im)))) (taylor inf im) (#s(alt (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) (patch (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) (patch (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2)))))) (taylor inf im) (#s(alt (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) (patch (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt im (taylor inf im) (#s(alt (-.f64 (hypot.f64 im re) re) (patch (-.f64 (hypot.f64 im re) re) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (* -1 (/ re im)))) (taylor inf im) (#s(alt (-.f64 (hypot.f64 im re) re) (patch (-.f64 (hypot.f64 im re) re) #<representation binary64>) () ())) ())
#s(alt (* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im))) (taylor inf im) (#s(alt (-.f64 (hypot.f64 im re) re) (patch (-.f64 (hypot.f64 im re) re) #<representation binary64>) () ())) ())
#s(alt (* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im))) (taylor inf im) (#s(alt (-.f64 (hypot.f64 im re) re) (patch (-.f64 (hypot.f64 im re) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (* -2 (/ re im)))) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2)))))) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (* -2 (/ re im)))) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2)))))) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf im) (#s(alt (/.f64 (.f64 im im) re) (patch (/.f64 (.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf im) (#s(alt (/.f64 (.f64 im im) re) (patch (/.f64 (.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf im) (#s(alt (/.f64 (.f64 im im) re) (patch (/.f64 (.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf im) (#s(alt (/.f64 (.f64 im im) re) (patch (/.f64 (.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (* -2 (/ re im)))) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2)))))) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) (patch (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (* -2 (/ re im)))) (taylor inf im) (#s(alt (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) (patch (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) (patch (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) (patch (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))) (taylor inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf im) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf im) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf im) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf im) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor inf im) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor inf im) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor inf im) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor inf im) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt 1/2)) (taylor inf im) (#s(alt (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt 1/2)) (taylor inf im) (#s(alt (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt 1/2)) (taylor inf im) (#s(alt (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt 1/2)) (taylor inf im) (#s(alt (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf im) (#s(alt (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor -inf im) (#s(alt (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) (patch (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* 2 (/ re im))))) (taylor -inf im) (#s(alt (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) (patch (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im))))) (taylor -inf im) (#s(alt (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) (patch (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im))))) (taylor -inf im) (#s(alt (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) (patch (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (-.f64 (hypot.f64 im re) re) (patch (-.f64 (hypot.f64 im re) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (/ re im)))) (taylor -inf im) (#s(alt (-.f64 (hypot.f64 im re) re) (patch (-.f64 (hypot.f64 im re) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im))))) (taylor -inf im) (#s(alt (-.f64 (hypot.f64 im re) re) (patch (-.f64 (hypot.f64 im re) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im))))) (taylor -inf im) (#s(alt (-.f64 (hypot.f64 im re) re) (patch (-.f64 (hypot.f64 im re) re) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* 2 (/ re im))))) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im))))) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im))))) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* 2 (/ re im))))) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im))))) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im))))) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (.f64 im im) re)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor -inf im) (#s(alt (/.f64 (.f64 im im) re) (patch (/.f64 (.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor -inf im) (#s(alt (/.f64 (.f64 im im) re) (patch (/.f64 (.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor -inf im) (#s(alt (/.f64 (.f64 im im) re) (patch (/.f64 (.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor -inf im) (#s(alt (/.f64 (.f64 im im) re) (patch (/.f64 (.f64 im im) re) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* 2 (/ re im))))) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im))))) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im))))) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor -inf im) (#s(alt (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) (patch (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (- (* 2 (/ re im)) 2))) (taylor -inf im) (#s(alt (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) (patch (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2))) (taylor -inf im) (#s(alt (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) (patch (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2))) (taylor -inf im) (#s(alt (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) (patch (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt 1/2)) (taylor -inf im) (#s(alt (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt 1/2)) (taylor -inf im) (#s(alt (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt 1/2)) (taylor -inf im) (#s(alt (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt 1/2)) (taylor -inf im) (#s(alt (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) (patch (.f64 im (sqrt.f64 #s(literal 1/2 binary64))) #<representation binary64>) () ())) ())

Calls

6 calls:

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

simplify201.0ms (2.8%)

Memory

1.7MiB live, 268.6MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	551	12223
1	1782	11434
2	6417	11361
0	8135	10876

Stop Event

1×	iter limit
1×	node limit

Counts

480 → 478

Calls

Call 1

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

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

rewrite182.0ms (2.5%)

Memory

-5.2MiB live, 272.5MiB allocated

Iterations

Useful iterations: 2 (0.0ms)

Iter	Nodes	Cost
0	43	310
0	71	255
1	209	247
2	1073	229
0	8605	229

Stop Event

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

Counts

21 → 342

Calls

Call 1

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

Outputs
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval137.0ms (1.9%)

Memory: 14.5MiB live, 290.5MiB allocated
Compiler: Compiled 20 145 to 2 400 computations (88.1% saved)

prune36.0ms (0.5%)

Memory

-15.3MiB live, 106.5MiB allocated

Pruning

18 alts after pruning (13 fresh and 5 done)

	Pruned	Kept	Total
New	809	11	820
Fresh	7	2	9
Picked	0	5	5
Done	0	0	0
Total	816	18	834

Accuracy

99.9%

Counts

834 → 18

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	77.9%	(.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))
▶	55.6%	(.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64))
	54.5%	(.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 (fma.f64 (/.f64 re im) #s(literal -2 binary64) #s(literal 2 binary64)) im))) #s(literal 1/2 binary64))
▶	53.6%	(.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64))
	27.3%	(.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64))
▶	44.8%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))
	31.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))))
✓	53.9%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))))
✓	13.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))))
	16.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))))
✓	24.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))))
	15.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (exp.f64 (fma.f64 (log.f64 im) #s(literal 2 binary64) (neg.f64 (log.f64 re)))))))
	53.8%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (+ (* (- (/ re im) 2) re) (* 2 im)) (.f64 (-.f64 #s(literal -2 binary64) (/.f64 (.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re) im)) (neg.f64 im))))))
▶	26.7%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))))
	27.3%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (*.f64 (pow.f64 re #s(literal -1/2 binary64)) im)))
▶	27.1%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))))
	27.1%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (/.f64 im (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
✓	27.0%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))

Compiler

Compiled 343 to 318 computations (7.3% saved)

simplify140.0ms (2%)

Memory

-1.5MiB live, 75.6MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

New	Metric	Score
cost-diff	0	(/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re))
cost-diff	0	(.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))
cost-diff	0	#s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))
cost-diff	0	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))))
cost-diff	0	(-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)
cost-diff	0	(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))
cost-diff	0	(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))
cost-diff	0	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))
cost-diff	0	(/.f64 (sqrt.f64 re) im)
cost-diff	0	#s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))
cost-diff	0	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))))
cost-diff	704	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))
cost-diff	0	(*.f64 #s(literal 2 binary64) im)
cost-diff	0	#s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))
cost-diff	0	(sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)))
cost-diff	0	(.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64))
cost-diff	0	#s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))
cost-diff	0	(.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))
cost-diff	0	(sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)))
cost-diff	0	(.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64))

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	44	332
0	69	325
1	94	325
2	123	319
3	172	319
4	293	319
5	462	319
6	623	319
7	794	319
8	1537	319
9	1978	319
10	3132	319
11	3883	319
12	4406	319
13	4440	319
14	4454	319
15	4466	319
16	4466	319
17	4482	319
18	4498	319
19	4523	319
20	4536	319
21	4536	319
22	4536	319
0	4536	255

Stop Event

1×	iter limit
1×	saturated
1×	iter limit

Calls

Call 1

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

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

localize128.0ms (1.8%)

Memory

18.6MiB live, 253.5MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.14910126953688402	(/.f64 (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re))
accuracy	0.174160009768442	(.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))
accuracy	0.234375	(*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)
accuracy	13.74022868386055	#s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))
accuracy	0.0078125	(fma.f64 re re (*.f64 im im))
accuracy	6.9674903229354195	(-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)
accuracy	7.024885574078562	(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))
accuracy	13.299711861343994	(sqrt.f64 (fma.f64 re re (*.f64 im im)))
accuracy	0	(sqrt.f64 re)
accuracy	0.125	(/.f64 (sqrt.f64 re) im)
accuracy	0.47111065218877485	(/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))
accuracy	13.74022868386055	#s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))
accuracy	0	(.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64))
accuracy	0	(*.f64 #s(literal 2 binary64) im)
accuracy	7.024885574078562	(sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)))
accuracy	16.05431719884843	#s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))
accuracy	0	(.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64))
accuracy	0	(.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))
accuracy	7.024885574078562	(sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)))
accuracy	16.497842865037565	#s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))

Samples

33.0ms	131×	0	invalid
14.0ms	23×	2	valid
14.0ms	14×	3	valid
14.0ms	60×	0	valid
11.0ms	28×	1	valid

Compiler

Compiled 488 to 63 computations (87.1% saved)

Precisions

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

ival-mult: 16.0ms (27.2% of total)

ival-hypot: 15.0ms (25.5% of total)

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

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

adjust: 4.0ms (6.8% of total)

ival-div: 3.0ms (5.1% of total)

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

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

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

exact: 0.0ms (0% of total)

series65.0ms (0.9%)

Memory

7.2MiB live, 82.8MiB allocated

Counts

24 → 540

Calls

Call 1

Inputs
#s(alt (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) (patch (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())
#s(alt (.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) (patch (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())
#s(alt #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im)) (patch #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())
#s(alt (.f64 #s(literal 2 binary64) im) (patch (.f64 #s(literal 2 binary64) im) #<representation binary64>) () ())
#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())
#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) #<representation binary64>) () ())
#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())
#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())
#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #<representation binary64>) () ())
#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) #<representation binary64>) () ())
#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #<representation binary64>) () ())
#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())
#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (patch (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) #<representation binary64>) () ())
#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())
#s(alt (sqrt.f64 (fma.f64 re re (.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (.f64 im im))) #<representation binary64>) () ())
#s(alt (fma.f64 re re (.f64 im im)) (patch (fma.f64 re re (.f64 im im)) #<representation binary64>) () ())
#s(alt (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (patch (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) #<representation binary64>) () ())

Outputs
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor 0 re) (#s(alt (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 re) (#s(alt (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) (patch (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 re) (* 2 im)) (taylor 0 re) (#s(alt (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) (patch (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (/ re im) 2))) (taylor 0 re) (#s(alt (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) (patch (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2))) (taylor 0 re) (#s(alt (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) (patch (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt im (taylor 0 re) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (+ im (* -1 re)) (taylor 0 re) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (+ im (* re (- (* 1/2 (/ re im)) 1))) (taylor 0 re) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1))) (taylor 0 re) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt (.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt (.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt (.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) (patch (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) (patch (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) (patch (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) (patch (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 re) (#s(alt #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im)) (patch #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 re) (* 2 im)) (taylor 0 re) (#s(alt #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im)) (patch #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (/ re im) 2))) (taylor 0 re) (#s(alt #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im)) (patch #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2))) (taylor 0 re) (#s(alt #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im)) (patch #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor 0 re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor 0 re) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor 0 re) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor 0 re) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor 0 re) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor 0 re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 re) (* 2 im)) (taylor 0 re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (/ re im) 2))) (taylor 0 re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2))) (taylor 0 re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt im (taylor 0 re) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (+ im (* -1 re)) (taylor 0 re) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (+ im (* re (- (* 1/2 (/ re im)) 1))) (taylor 0 re) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1))) (taylor 0 re) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor 0 re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (patch (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (patch (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (patch (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (patch (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor 0 re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor 0 re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor 0 re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor 0 re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt im (taylor 0 re) (#s(alt (sqrt.f64 (fma.f64 re re (.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ im (* 1/2 (/ (pow re 2) im))) (taylor 0 re) (#s(alt (sqrt.f64 (fma.f64 re re (.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im))))) (taylor 0 re) (#s(alt (sqrt.f64 (fma.f64 re re (.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im))))) (taylor 0 re) (#s(alt (sqrt.f64 (fma.f64 re re (.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor 0 re) (#s(alt (fma.f64 re re (.f64 im im)) (patch (fma.f64 re re (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (+ (pow im 2) (pow re 2)) (taylor 0 re) (#s(alt (fma.f64 re re (.f64 im im)) (patch (fma.f64 re re (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (+ (pow im 2) (pow re 2)) (taylor 0 re) (#s(alt (fma.f64 re re (.f64 im im)) (patch (fma.f64 re re (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (+ (pow im 2) (pow re 2)) (taylor 0 re) (#s(alt (fma.f64 re re (.f64 im im)) (patch (fma.f64 re re (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) (patch (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re) (taylor inf re) (#s(alt (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) (patch (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re) (taylor inf re) (#s(alt (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) (patch (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re) (taylor inf re) (#s(alt (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) (patch (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (pow im 2) re)) (taylor inf re) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re) (taylor inf re) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re) (taylor inf re) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re) (taylor inf re) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt (.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) (patch (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) (patch (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) (patch (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) (patch (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im)) (patch #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re) (taylor inf re) (#s(alt #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im)) (patch #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re) (taylor inf re) (#s(alt #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im)) (patch #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re) (taylor inf re) (#s(alt #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im)) (patch #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf re) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf re) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf re) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf re) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor inf re) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor inf re) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor inf re) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor inf re) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re) (taylor inf re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re) (taylor inf re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re) (taylor inf re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (pow im 2) re)) (taylor inf re) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re) (taylor inf re) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re) (taylor inf re) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re) (taylor inf re) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (patch (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (patch (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (patch (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (patch (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt re (taylor inf re) (#s(alt (sqrt.f64 (fma.f64 re re (.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))) (taylor inf re) (#s(alt (sqrt.f64 (fma.f64 re re (.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))) (taylor inf re) (#s(alt (sqrt.f64 (fma.f64 re re (.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))) (taylor inf re) (#s(alt (sqrt.f64 (fma.f64 re re (.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (pow re 2) (taylor inf re) (#s(alt (fma.f64 re re (.f64 im im)) (patch (fma.f64 re re (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2)))) (taylor inf re) (#s(alt (fma.f64 re re (.f64 im im)) (patch (fma.f64 re re (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2)))) (taylor inf re) (#s(alt (fma.f64 re re (.f64 im im)) (patch (fma.f64 re re (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2)))) (taylor inf re) (#s(alt (fma.f64 re re (.f64 im im)) (patch (fma.f64 re re (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) (patch (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2))))) (taylor -inf re) (#s(alt (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) (patch (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) (patch (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) (patch (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -2 re) (taylor -inf re) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))) (taylor -inf re) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) (patch (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) (patch (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) (patch (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) (patch (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im)) (patch #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2))))) (taylor -inf re) (#s(alt #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im)) (patch #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im)) (patch #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im)) (patch #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re))) (taylor -inf re) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re))) (taylor -inf re) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re))) (taylor -inf re) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (/ (pow (sqrt -1) 2) im) (sqrt re))) (taylor -inf re) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2))))) (taylor -inf re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -2 re) (taylor -inf re) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))) (taylor -inf re) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (patch (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (patch (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (patch (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (patch (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (pow (sqrt -1) 2))) (taylor -inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (pow (sqrt -1) 2))) (taylor -inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (pow (sqrt -1) 2))) (taylor -inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (pow (sqrt -1) 2))) (taylor -inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (* -1 re) (taylor -inf re) (#s(alt (sqrt.f64 (fma.f64 re re (.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (fma.f64 re re (.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt (sqrt.f64 (fma.f64 re re (.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))) (taylor -inf re) (#s(alt (sqrt.f64 (fma.f64 re re (.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (pow re 2) (taylor -inf re) (#s(alt (fma.f64 re re (.f64 im im)) (patch (fma.f64 re re (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2)))) (taylor -inf re) (#s(alt (fma.f64 re re (.f64 im im)) (patch (fma.f64 re re (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2)))) (taylor -inf re) (#s(alt (fma.f64 re re (.f64 im im)) (patch (fma.f64 re re (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2)))) (taylor -inf re) (#s(alt (fma.f64 re re (.f64 im im)) (patch (fma.f64 re re (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))) (taylor 0 im) (#s(alt (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) (patch (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))) (taylor 0 im) (#s(alt (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) (patch (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) (patch (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) (patch (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (pow im 2) re)) (taylor 0 im) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) (patch (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) (patch (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) (patch (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) (patch (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im)) (patch #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im)) (patch #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im)) (patch #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im)) (patch #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 im) (#s(alt (.f64 #s(literal 2 binary64) im) (patch (.f64 #s(literal 2 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 im) (#s(alt (.f64 #s(literal 2 binary64) im) (patch (.f64 #s(literal 2 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 im) (#s(alt (.f64 #s(literal 2 binary64) im) (patch (.f64 #s(literal 2 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 im) (#s(alt (.f64 #s(literal 2 binary64) im) (patch (.f64 #s(literal 2 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))) (taylor 0 im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor 0 im) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor 0 im) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor 0 im) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor 0 im) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))) (taylor 0 im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))) (taylor 0 im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (pow im 2) re)) (taylor 0 im) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))) (taylor 0 im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (patch (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (patch (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (patch (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (patch (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt re (taylor 0 im) (#s(alt (sqrt.f64 (fma.f64 re re (.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ re (* 1/2 (/ (pow im 2) re))) (taylor 0 im) (#s(alt (sqrt.f64 (fma.f64 re re (.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))) (taylor 0 im) (#s(alt (sqrt.f64 (fma.f64 re re (.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))) (taylor 0 im) (#s(alt (sqrt.f64 (fma.f64 re re (.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (pow re 2) (taylor 0 im) (#s(alt (fma.f64 re re (.f64 im im)) (patch (fma.f64 re re (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (+ (pow im 2) (pow re 2)) (taylor 0 im) (#s(alt (fma.f64 re re (.f64 im im)) (patch (fma.f64 re re (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (+ (pow im 2) (pow re 2)) (taylor 0 im) (#s(alt (fma.f64 re re (.f64 im im)) (patch (fma.f64 re re (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (+ (pow im 2) (pow re 2)) (taylor 0 im) (#s(alt (fma.f64 re re (.f64 im im)) (patch (fma.f64 re re (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt 1/2)) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (patch (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt 1/2)) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (patch (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt 1/2)) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (patch (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt 1/2)) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (patch (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor inf im) (#s(alt (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))) (taylor inf im) (#s(alt (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) (patch (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (* -2 (/ re im)))) (taylor inf im) (#s(alt (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) (patch (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) (patch (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2)))))) (taylor inf im) (#s(alt (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) (patch (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt im (taylor inf im) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (* -1 (/ re im)))) (taylor inf im) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im))) (taylor inf im) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im))) (taylor inf im) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt (.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt (.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) (patch (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) (patch (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) (patch (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) (patch (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im)) (patch #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (* -2 (/ re im)))) (taylor inf im) (#s(alt #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im)) (patch #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im)) (patch #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2)))))) (taylor inf im) (#s(alt #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im)) (patch #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt (.f64 #s(literal 2 binary64) im) (patch (.f64 #s(literal 2 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt (.f64 #s(literal 2 binary64) im) (patch (.f64 #s(literal 2 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt (.f64 #s(literal 2 binary64) im) (patch (.f64 #s(literal 2 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt (.f64 #s(literal 2 binary64) im) (patch (.f64 #s(literal 2 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf im) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf im) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf im) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf im) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))) (taylor inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor inf im) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor inf im) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor inf im) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor inf im) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor inf im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))) (taylor inf im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (* -2 (/ re im)))) (taylor inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2)))))) (taylor inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt im (taylor inf im) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (* -1 (/ re im)))) (taylor inf im) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im))) (taylor inf im) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im))) (taylor inf im) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))) (taylor inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf im) (#s(alt (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf im) (#s(alt (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf im) (#s(alt (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf im) (#s(alt (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor inf im) (#s(alt (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (patch (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor inf im) (#s(alt (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (patch (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor inf im) (#s(alt (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (patch (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor inf im) (#s(alt (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (patch (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt im (taylor inf im) (#s(alt (sqrt.f64 (fma.f64 re re (.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt (sqrt.f64 (fma.f64 re re (.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))) (taylor inf im) (#s(alt (sqrt.f64 (fma.f64 re re (.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))) (taylor inf im) (#s(alt (sqrt.f64 (fma.f64 re re (.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor inf im) (#s(alt (fma.f64 re re (.f64 im im)) (patch (fma.f64 re re (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2)))) (taylor inf im) (#s(alt (fma.f64 re re (.f64 im im)) (patch (fma.f64 re re (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2)))) (taylor inf im) (#s(alt (fma.f64 re re (.f64 im im)) (patch (fma.f64 re re (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2)))) (taylor inf im) (#s(alt (fma.f64 re re (.f64 im im)) (patch (fma.f64 re re (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt 1/2)) (taylor inf im) (#s(alt (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (patch (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt 1/2)) (taylor inf im) (#s(alt (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (patch (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt 1/2)) (taylor inf im) (#s(alt (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (patch (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt 1/2)) (taylor inf im) (#s(alt (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (patch (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf im) (#s(alt (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) (patch (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor -inf im) (#s(alt (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) (patch (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* 2 (/ re im))))) (taylor -inf im) (#s(alt (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) (patch (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im))))) (taylor -inf im) (#s(alt (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) (patch (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im))))) (taylor -inf im) (#s(alt (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) (patch (.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (/ re im)))) (taylor -inf im) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im))))) (taylor -inf im) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im))))) (taylor -inf im) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) (patch (.f64 (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) (patch (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) (patch (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) (patch (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im))) (patch (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor -inf im) (#s(alt #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im)) (patch #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* 2 (/ re im))))) (taylor -inf im) (#s(alt #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im)) (patch #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im))))) (taylor -inf im) (#s(alt #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im)) (patch #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im))))) (taylor -inf im) (#s(alt #s(approx (* (- (sqrt (+ (* im im) (* re re))) re) 2) (.f64 #s(literal 2 binary64) im)) (patch #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor -inf im) (#s(alt (.f64 #s(literal 2 binary64) im) (patch (.f64 #s(literal 2 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor -inf im) (#s(alt (.f64 #s(literal 2 binary64) im) (patch (.f64 #s(literal 2 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor -inf im) (#s(alt (.f64 #s(literal 2 binary64) im) (patch (.f64 #s(literal 2 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor -inf im) (#s(alt (.f64 #s(literal 2 binary64) im) (patch (.f64 #s(literal 2 binary64) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) (patch (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor -inf im) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor -inf im) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor -inf im) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* (/ 1 im) (sqrt re)) (taylor -inf im) (#s(alt (/.f64 (sqrt.f64 re) im) (patch (/.f64 (sqrt.f64 re) im) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor -inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* 2 (/ re im))))) (taylor -inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im))))) (taylor -inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im))))) (taylor -inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (/ re im)))) (taylor -inf im) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im))))) (taylor -inf im) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im))))) (taylor -inf im) (#s(alt (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) (patch (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (patch (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (patch (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (patch (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (patch (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (sqrt.f64 (fma.f64 re re (.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))) (taylor -inf im) (#s(alt (sqrt.f64 (fma.f64 re re (.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 (fma.f64 re re (.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))) (taylor -inf im) (#s(alt (sqrt.f64 (fma.f64 re re (.f64 im im))) (patch (sqrt.f64 (fma.f64 re re (.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor -inf im) (#s(alt (fma.f64 re re (.f64 im im)) (patch (fma.f64 re re (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2)))) (taylor -inf im) (#s(alt (fma.f64 re re (.f64 im im)) (patch (fma.f64 re re (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2)))) (taylor -inf im) (#s(alt (fma.f64 re re (.f64 im im)) (patch (fma.f64 re re (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2)))) (taylor -inf im) (#s(alt (fma.f64 re re (.f64 im im)) (patch (fma.f64 re re (.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt 1/2)) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (patch (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt 1/2)) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (patch (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt 1/2)) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (patch (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt 1/2)) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (patch (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) #<representation binary64>) () ())) ())

Calls

6 calls:

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

simplify230.0ms (3.2%)

Memory

-25.4MiB live, 333.0MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	561	12721
1	1843	11925
2	6446	11861
0	8328	11345

Stop Event

1×	iter limit
1×	node limit

Counts

540 → 532

Calls

Call 1

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

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

rewrite137.0ms (1.9%)

Memory

38.7MiB live, 187.0MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	44	301
0	69	282
1	180	270
2	831	269
0	8411	204

Stop Event

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

Counts

24 → 659

Calls

Call 1

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

Outputs
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval215.0ms (3%)

Memory: 15.2MiB live, 355.3MiB allocated
Compiler: Compiled 27 965 to 4 054 computations (85.5% saved)

prune37.0ms (0.5%)

Memory

-24.1MiB live, 138.2MiB allocated

Pruning

19 alts after pruning (12 fresh and 7 done)

	Pruned	Kept	Total
New	1 214	6	1 220
Fresh	2	6	8
Picked	2	3	5
Done	1	4	5
Total	1 219	19	1 238

Accuracy

99.9%

Counts

1 238 → 19

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	55.2%	(.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
✓	77.9%	(.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))
✓	55.6%	(.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64))
	54.5%	(.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 (fma.f64 (/.f64 re im) #s(literal -2 binary64) #s(literal 2 binary64)) im))) #s(literal 1/2 binary64))
✓	53.6%	(.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64))
▶	27.3%	(.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64))
✓	44.8%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))
▶	31.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))))
✓	53.9%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))))
✓	13.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))))
▶	16.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))))
✓	24.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))))
	15.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (exp.f64 (fma.f64 (log.f64 im) #s(literal 2 binary64) (neg.f64 (log.f64 re)))))))
	53.8%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (+ (* (- (/ re im) 2) re) (* 2 im)) (.f64 (-.f64 #s(literal -2 binary64) (/.f64 (.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re) im)) (neg.f64 im))))))
	27.2%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 (/.f64 im (pow.f64 re #s(literal 1/4 binary64))) (pow.f64 re #s(literal 1/4 binary64)))))
	26.7%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal -1 binary64) im) (neg.f64 (sqrt.f64 re))))))
▶	27.2%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))))
	24.8%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 (/.f64 re #s(literal 1/2 binary64))) im)) #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
	27.3%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) #s(approx (/ 1 (/ (sqrt re) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im))))

Compiler

Compiled 356 to 328 computations (7.9% saved)

simplify88.0ms (1.2%)

Memory

11.3MiB live, 89.6MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	42	364
0	65	364
1	87	364
2	118	364
3	150	364
4	187	364
5	275	364
6	422	364
7	621	364
8	1049	364
9	1436	364
10	1830	364
11	1986	364
12	2162	364
13	2409	364
14	2448	364
15	2482	364
16	2641	364
17	2649	364
0	2649	303

Stop Event

1×	iter limit
1×	saturated
1×	iter limit

Calls

Call 1

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

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

localize134.0ms (1.9%)

Memory

1.0MiB live, 193.6MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score
accuracy	0.05078125	(sqrt.f64 (/.f64 #s(literal 1/2 binary64) re))
accuracy	0.0859375	(*.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im)
accuracy	0.174160009768442	(.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))
accuracy	13.74022868386055	#s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))
accuracy	6.9674903229354195	(-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)
accuracy	7.024885574078562	(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))
accuracy	13.279404412776813	#s(approx (+ (* re re) (* im im)) (*.f64 im im))
accuracy	13.299711861343994	(sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im)))
accuracy	0	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))))
accuracy	0.06640625	(*.f64 (/.f64 im re) im)
accuracy	7.024885574078562	(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))
accuracy	13.794954920813348	#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))
accuracy	0	(.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64))
accuracy	0	(sqrt.f64 re)
accuracy	0.140625	(/.f64 im (sqrt.f64 re))
accuracy	13.74022868386055	#s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re)))
accuracy	0	(sqrt.f64 #s(literal 2 binary64))
accuracy	0.203125	(.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64)))
accuracy	7.033696965601145	(sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)))
accuracy	16.497842865037565	#s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))

Samples

33.0ms	131×	0	invalid
17.0ms	23×	2	valid
14.0ms	60×	0	valid
12.0ms	28×	1	valid
11.0ms	14×	3	valid

Compiler

Compiled 472 to 62 computations (86.9% saved)

Precisions

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

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

ival-hypot: 15.0ms (26% of total)

ival-sqrt: 10.0ms (17.3% of total)

ival-sub: 6.0ms (10.4% of total)

ival-div: 5.0ms (8.7% of total)

adjust: 3.0ms (5.2% of total)

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

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

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

exact: 0.0ms (0% of total)

series60.0ms (0.8%)

Memory

-24.8MiB live, 46.6MiB allocated

Counts

24 → 528

Calls

Call 1

Inputs
#s(alt (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) #<representation binary64>) () ())
#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())
#s(alt (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())
#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #<representation binary64>) () ())
#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())
#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())
#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))) #<representation binary64>) () ())
#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #<representation binary64>) () ())
#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)) #<representation binary64>) () ())
#s(alt (.f64 (/.f64 im re) im) (patch (.f64 (/.f64 im re) im) #<representation binary64>) () ())
#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))) #<representation binary64>) () ())
#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))) #<representation binary64>) () ())
#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)) #<representation binary64>) () ())
#s(alt (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re) #<representation binary64>) () ())
#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())
#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())
#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())
#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) #<representation binary64>) () ())
#s(alt (sqrt.f64 #s(literal 2 binary64)) (patch (sqrt.f64 #s(literal 2 binary64)) #<representation binary64>) () ())
#s(alt (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) (patch (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) #<representation binary64>) () ())
#s(alt #s(approx (+ (* re re) (* im im)) (.f64 im im)) (patch #s(approx (+ ( re re) (* im im)) (*.f64 im im)) #<representation binary64>) () ())
#s(alt (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #<representation binary64>) () ())

Outputs
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor 0 re) (#s(alt (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt im) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt im) (* -1/2 (* (sqrt (/ 1 im)) re))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt im) (* re (+ (* -1/2 (sqrt (/ 1 im))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) re))))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (+ (sqrt im) (* re (+ (* -1/2 (sqrt (/ 1 im))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) re)) (* 1/8 (sqrt (/ 1 (pow im 3))))))))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt im (taylor 0 re) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (+ im (* -1 re)) (taylor 0 re) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (+ im (* re (- (* 1/2 (/ re im)) 1))) (taylor 0 re) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1))) (taylor 0 re) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor 0 re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor 0 re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor 0 re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor 0 re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor 0 re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 re) (* 2 im)) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (/ re im) 2))) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2))) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 re) (#s(alt (.f64 (/.f64 im re) im) (patch (.f64 (/.f64 im re) im) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 re) (#s(alt (.f64 (/.f64 im re) im) (patch (.f64 (/.f64 im re) im) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 re) (#s(alt (.f64 (/.f64 im re) im) (patch (.f64 (/.f64 im re) im) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 re) (#s(alt (.f64 (/.f64 im re) im) (patch (.f64 (/.f64 im re) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor 0 re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 re) (* 2 im)) (taylor 0 re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (/ re im) 2))) (taylor 0 re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2))) (taylor 0 re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt im (taylor 0 re) (#s(alt (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (+ im (* -1 re)) (taylor 0 re) (#s(alt (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (+ im (* re (- (* 1/2 (/ re im)) 1))) (taylor 0 re) (#s(alt (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1))) (taylor 0 re) (#s(alt (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2)))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2))))))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2)))))))) (taylor 0 re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor 0 re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2))) (taylor 0 re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor 0 re) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt im (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) (patch (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ im (* 1/2 (/ (pow re 2) im))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) (patch (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im))))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) (patch (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im))))) (taylor 0 re) (#s(alt (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) (patch (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor 0 re) (#s(alt #s(approx (+ (* re re) (* im im)) (.f64 im im)) (patch #s(approx (+ ( re re) (* im im)) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (+ (pow im 2) (pow re 2)) (taylor 0 re) (#s(alt #s(approx (+ (* re re) (* im im)) (.f64 im im)) (patch #s(approx (+ ( re re) (* im im)) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (+ (pow im 2) (pow re 2)) (taylor 0 re) (#s(alt #s(approx (+ (* re re) (* im im)) (.f64 im im)) (patch #s(approx (+ ( re re) (* im im)) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (+ (pow im 2) (pow re 2)) (taylor 0 re) (#s(alt #s(approx (+ (* re re) (* im im)) (.f64 im im)) (patch #s(approx (+ ( re re) (* im im)) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (sqrt 1/2)) (taylor 0 re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (sqrt 1/2)) (taylor 0 re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (sqrt 1/2)) (taylor 0 re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (sqrt 1/2)) (taylor 0 re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (pow im 5) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (pow im 2) re)) (taylor inf re) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re) (taylor inf re) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re) (taylor inf re) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re) (taylor inf re) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf re) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf re) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf re) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf re) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (sqrt re) (taylor inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt (.f64 (/.f64 im re) im) (patch (.f64 (/.f64 im re) im) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt (.f64 (/.f64 im re) im) (patch (.f64 (/.f64 im re) im) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt (.f64 (/.f64 im re) im) (patch (.f64 (/.f64 im re) im) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt (.f64 (/.f64 im re) im) (patch (.f64 (/.f64 im re) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (pow im 2)) re) (taylor inf re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2))) re) (taylor inf re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/4 (/ (pow im 4) (pow re 2))) (+ (* 1/8 (/ (pow im 6) (pow re 4))) (pow im 2)))) re) (taylor inf re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (pow im 2) re)) (taylor inf re) (#s(alt (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re) (taylor inf re) (#s(alt (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2)))) re) (taylor inf re) (#s(alt (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -1/2 (/ (+ (* 1/64 (pow im 8)) (* 1/16 (pow im 8))) (pow re 6))) (+ (* -1/8 (/ (pow im 4) (pow re 2))) (+ (* 1/16 (/ (pow im 6) (pow re 4))) (* 1/2 (pow im 2))))) re) (taylor inf re) (#s(alt (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/32 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))))) (taylor inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))) (taylor inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -1/16 (* (/ (* (pow im 3) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/512 (* (/ (* (pow im 5) (sqrt 2)) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/32 (* (/ (* (pow im 5) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))))) (taylor inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor inf re) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt re (taylor inf re) (#s(alt (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) (patch (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) (patch (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) (patch (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))) (taylor inf re) (#s(alt (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) (patch (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (pow re 2) (taylor inf re) (#s(alt #s(approx (+ (* re re) (* im im)) (.f64 im im)) (patch #s(approx (+ ( re re) (* im im)) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2)))) (taylor inf re) (#s(alt #s(approx (+ (* re re) (* im im)) (.f64 im im)) (patch #s(approx (+ ( re re) (* im im)) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2)))) (taylor inf re) (#s(alt #s(approx (+ (* re re) (* im im)) (.f64 im im)) (patch #s(approx (+ ( re re) (* im im)) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2)))) (taylor inf re) (#s(alt #s(approx (+ (* re re) (* im im)) (.f64 im im)) (patch #s(approx (+ ( re re) (* im im)) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (sqrt 1/2)) (taylor inf re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (sqrt 1/2)) (taylor inf re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (sqrt 1/2)) (taylor inf re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (sqrt 1/2)) (taylor inf re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (* (sqrt -1) (sqrt 2)))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -2 re) (taylor -inf re) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))) (taylor -inf re) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (pow (sqrt -1) 2))) (taylor -inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (pow (sqrt -1) 2))) (taylor -inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (pow (sqrt -1) 2))) (taylor -inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (pow (sqrt -1) 2))) (taylor -inf re) (#s(alt (sqrt.f64 re) (patch (sqrt.f64 re) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2))))) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor -inf re) (#s(alt (.f64 (/.f64 im re) im) (patch (.f64 (/.f64 im re) im) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor -inf re) (#s(alt (.f64 (/.f64 im re) im) (patch (.f64 (/.f64 im re) im) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor -inf re) (#s(alt (.f64 (/.f64 im re) im) (patch (.f64 (/.f64 im re) im) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor -inf re) (#s(alt (.f64 (/.f64 im re) im) (patch (.f64 (/.f64 im re) im) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (/ (pow im 2) (pow re 2))))) (taylor -inf re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 4 (+ (* -1/4 (/ (pow im 4) (pow re 4))) (+ (* 1/8 (/ (pow im 6) (pow re 6))) (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -2 re) (taylor -inf re) (#s(alt (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))) (taylor -inf re) (#s(alt (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/8 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))) (taylor -inf re) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2)))) (taylor -inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re)))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ (* -1 (/ (+ (* -1/16 (* (* (pow im 4) (sqrt -1)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/32 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 2)) (sqrt (/ 1 (pow re 3))))) (* 1/4 (* (* (pow im 2) (sqrt -1)) (sqrt re))))) (pow re 3))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2)))))) (taylor -inf re) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt -1) (* (sqrt -1/2) (sqrt 2)))) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt -1) (* (sqrt -1/2) (sqrt 2)))) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt -1) (* (sqrt -1/2) (sqrt 2)))) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt -1) (* (sqrt -1/2) (sqrt 2)))) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt -1) (sqrt -1/2))) (sqrt (/ 1 re))) (taylor -inf re) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 re) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) (patch (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) (patch (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) (patch (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))) (taylor -inf re) (#s(alt (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) (patch (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (pow re 2) (taylor -inf re) (#s(alt #s(approx (+ (* re re) (* im im)) (.f64 im im)) (patch #s(approx (+ ( re re) (* im im)) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2)))) (taylor -inf re) (#s(alt #s(approx (+ (* re re) (* im im)) (.f64 im im)) (patch #s(approx (+ ( re re) (* im im)) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2)))) (taylor -inf re) (#s(alt #s(approx (+ (* re re) (* im im)) (.f64 im im)) (patch #s(approx (+ ( re re) (* im im)) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2)))) (taylor -inf re) (#s(alt #s(approx (+ (* re re) (* im im)) (.f64 im im)) (patch #s(approx (+ ( re re) (* im im)) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt -1/2))) (taylor -inf re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt -1/2))) (taylor -inf re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt -1/2))) (taylor -inf re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt -1/2))) (taylor -inf re) (#s(alt (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (patch (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/16 (* (/ (pow im 2) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (sqrt 1/2)))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (sqrt 1/2)) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (sqrt 1/2)) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (pow im 2) re)) (taylor 0 im) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))) (taylor 0 im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt (.f64 (/.f64 im re) im) (patch (.f64 (/.f64 im re) im) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt (.f64 (/.f64 im re) im) (patch (.f64 (/.f64 im re) im) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt (.f64 (/.f64 im re) im) (patch (.f64 (/.f64 im re) im) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt (.f64 (/.f64 im re) im) (patch (.f64 (/.f64 im re) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))) (taylor 0 im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re))) (taylor 0 im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/64 (/ (pow im 2) (pow re 7))) (* 1/8 (/ 1 (pow re 5))))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re))) (taylor 0 im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (pow im 2) re)) (taylor 0 im) (#s(alt (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ (* (pow im 2) (- (* (pow im 2) (+ (* -5/128 (/ (pow im 2) (pow re 7))) (* 1/16 (/ 1 (pow re 5))))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))) (taylor 0 im) (#s(alt (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/32 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/4 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2)))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/4 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/16 (* (/ (* (pow im 2) (sqrt 2)) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))))) (taylor 0 im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* 1/2 (* (/ (* (pow im 2) (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))))) (sqrt 1/2)) (sqrt re))))))) (taylor 0 im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* (sqrt (/ 1 re)) (* (sqrt 1/2) (sqrt 2))) (* (pow im 2) (+ (* -1/16 (* (sqrt (/ 1 (pow re 5))) (/ (sqrt 2) (sqrt 1/2)))) (* (pow im 2) (+ (* -1/2 (* (/ (* (pow im 2) (* (sqrt 2) (+ (* -1/16 (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (* (pow re 2) (pow (sqrt 1/2) 2)))) (* 5/128 (/ 1 (pow re 7)))))) (sqrt 1/2)) (sqrt re))) (* 1/2 (* (sqrt re) (/ (* (sqrt 2) (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2)))))) (sqrt 1/2)))))))))) (taylor 0 im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor 0 im) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt re (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) (patch (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ re (* 1/2 (/ (pow im 2) re))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) (patch (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) (patch (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))) (taylor 0 im) (#s(alt (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) (patch (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (pow re 2) (taylor 0 im) (#s(alt #s(approx (+ (* re re) (* im im)) (.f64 im im)) (patch #s(approx (+ ( re re) (* im im)) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (+ (pow im 2) (pow re 2)) (taylor 0 im) (#s(alt #s(approx (+ (* re re) (* im im)) (.f64 im im)) (patch #s(approx (+ ( re re) (* im im)) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (+ (pow im 2) (pow re 2)) (taylor 0 im) (#s(alt #s(approx (+ (* re re) (* im im)) (.f64 im im)) (patch #s(approx (+ ( re re) (* im im)) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (+ (pow im 2) (pow re 2)) (taylor 0 im) (#s(alt #s(approx (+ (* re re) (* im im)) (.f64 im im)) (patch #s(approx (+ ( re re) (* im im)) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor inf im) (#s(alt (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))) (taylor inf im) (#s(alt (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (sqrt im) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (sqrt (/ 1 im)) (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)) (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2)))))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (sqrt (/ 1 im)) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/4 (* (sqrt (/ 1 (pow im 5))) (pow re 2))))))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt im (taylor inf im) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (* -1 (/ re im)))) (taylor inf im) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im))) (taylor inf im) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im))) (taylor inf im) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))) (taylor inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf im) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf im) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf im) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor inf im) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (* -2 (/ re im)))) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2)))))) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf im) (#s(alt (.f64 (/.f64 im re) im) (patch (.f64 (/.f64 im re) im) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf im) (#s(alt (.f64 (/.f64 im re) im) (patch (.f64 (/.f64 im re) im) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf im) (#s(alt (.f64 (/.f64 im re) im) (patch (.f64 (/.f64 im re) im) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf im) (#s(alt (.f64 (/.f64 im re) im) (patch (.f64 (/.f64 im re) im) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor inf im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))) (taylor inf im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (* -2 (/ re im)))) (taylor inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2)))))) (taylor inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt im (taylor inf im) (#s(alt (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (* -1 (/ re im)))) (taylor inf im) (#s(alt (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im))) (taylor inf im) (#s(alt (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im))) (taylor inf im) (#s(alt (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (* (sqrt im) (sqrt 2))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2))))))) (taylor inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))) (taylor inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))) (taylor inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (+ (* 1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2)))))) (taylor inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf im) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf im) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf im) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor inf im) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor inf im) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor inf im) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor inf im) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor inf im) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt im (taylor inf im) (#s(alt (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) (patch (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) (patch (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) (patch (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))) (taylor inf im) (#s(alt (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) (patch (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor inf im) (#s(alt #s(approx (+ (* re re) (* im im)) (.f64 im im)) (patch #s(approx (+ ( re re) (* im im)) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2)))) (taylor inf im) (#s(alt #s(approx (+ (* re re) (* im im)) (.f64 im im)) (patch #s(approx (+ ( re re) (* im im)) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2)))) (taylor inf im) (#s(alt #s(approx (+ (* re re) (* im im)) (.f64 im im)) (patch #s(approx (+ ( re re) (* im im)) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2)))) (taylor inf im) (#s(alt #s(approx (+ (* re re) (* im im)) (.f64 im im)) (patch #s(approx (+ ( re re) (* im im)) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) (patch (.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (sqrt.f64 #s(approx (- (sqrt (+ ( im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt im) (sqrt -1))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1)))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (sqrt -1)))) (* 1/4 (* (sqrt im) (* (pow re 2) (sqrt -1))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* (sqrt (/ 1 im)) (sqrt -1)))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (patch (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (/ re im)))) (taylor -inf im) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im))))) (taylor -inf im) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im))))) (taylor -inf im) (#s(alt #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) (patch (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* im (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (/.f64 im (sqrt.f64 re)) (patch (/.f64 im (sqrt.f64 re)) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* 2 (/ re im))))) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im))))) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im))))) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 (/.f64 im re) im)) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor -inf im) (#s(alt (.f64 (/.f64 im re) im) (patch (.f64 (/.f64 im re) im) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor -inf im) (#s(alt (.f64 (/.f64 im re) im) (patch (.f64 (/.f64 im re) im) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor -inf im) (#s(alt (.f64 (/.f64 im re) im) (patch (.f64 (/.f64 im re) im) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor -inf im) (#s(alt (.f64 (/.f64 im re) im) (patch (.f64 (/.f64 im re) im) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor -inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* 2 (/ re im))))) (taylor -inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (pow re 2) im))) im))))) (taylor -inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* -1 (/ (+ (* -2 re) (* -1 (/ (+ (* -1/4 (/ (pow re 4) (pow im 2))) (pow re 2)) im))) im))))) (taylor -inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (.f64 im im))) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (/ re im)))) (taylor -inf im) (#s(alt (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im))))) (taylor -inf im) (#s(alt (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* -1 (/ (- (* -1 (/ (+ (* -1/8 (/ (pow re 4) (pow im 2))) (* 1/2 (pow re 2))) im)) re) im))))) (taylor -inf im) (#s(alt (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) re) (patch (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re) #<representation binary64>) () ())) ())
#s(alt (* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))) (taylor -inf im) (#s(alt (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2)))) (taylor -inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))) (taylor -inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))) (taylor -inf im) (#s(alt #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) (patch #s(approx (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) (patch (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* (* im (sqrt 1/2)) (sqrt (/ 1 re))) (taylor -inf im) (#s(alt (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (patch (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) (patch (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) (patch (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) (patch (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))) (taylor -inf im) (#s(alt (sqrt.f64 #s(approx (+ (* re re) (* im im)) (.f64 im im))) (patch (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) #<representation binary64>) () ())) ())
#s(alt (pow im 2) (taylor -inf im) (#s(alt #s(approx (+ (* re re) (* im im)) (.f64 im im)) (patch #s(approx (+ ( re re) (* im im)) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2)))) (taylor -inf im) (#s(alt #s(approx (+ (* re re) (* im im)) (.f64 im im)) (patch #s(approx (+ ( re re) (* im im)) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2)))) (taylor -inf im) (#s(alt #s(approx (+ (* re re) (* im im)) (.f64 im im)) (patch #s(approx (+ ( re re) (* im im)) (*.f64 im im)) #<representation binary64>) () ())) ())
#s(alt (* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2)))) (taylor -inf im) (#s(alt #s(approx (+ (* re re) (* im im)) (.f64 im im)) (patch #s(approx (+ ( re re) (* im im)) (*.f64 im im)) #<representation binary64>) () ())) ())

Calls

6 calls:

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

simplify253.0ms (3.5%)

Memory

26.0MiB live, 218.5MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	696	13112
1	2297	12312
2	7974	12312
0	8004	11796

Stop Event

1×	iter limit
1×	node limit

Counts

528 → 520

Calls

Call 1

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

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

rewrite198.0ms (2.8%)

Memory

0.1MiB live, 153.9MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	42	332
0	65	330
1	189	330
2	947	327
0	8339	260

Stop Event

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

Counts

24 → 346

Calls

Call 1

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

Outputs
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>
#<batchref>

eval155.0ms (2.2%)

Memory: -10.1MiB live, 139.8MiB allocated
Compiler: Compiled 20 340 to 2 639 computations (87% saved)

prune73.0ms (1%)

Memory

25.5MiB live, 64.6MiB allocated

Pruning

19 alts after pruning (7 fresh and 12 done)

	Pruned	Kept	Total
New	870	3	873
Fresh	3	4	7
Picked	0	5	5
Done	0	7	7
Total	873	19	892

Accuracy

99.9%

Counts

892 → 19

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	55.2%	(.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
✓	77.9%	(.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))
✓	55.6%	(.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64))
	54.5%	(.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 (fma.f64 (/.f64 re im) #s(literal -2 binary64) #s(literal 2 binary64)) im))) #s(literal 1/2 binary64))
✓	53.6%	(.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64))
	27.1%	(.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (pow.f64 (pow.f64 re #s(literal 1/4 binary64)) #s(literal 2 binary64)))) #s(literal 1/2 binary64))
✓	27.3%	(.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64))
	27.3%	(.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) #s(approx (/ im (sqrt re)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im))) #s(literal 1/2 binary64))
✓	44.8%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))
✓	31.5%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))))
✓	53.9%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))))
✓	13.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))))
✓	16.6%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))))
✓	24.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))))
	15.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (exp.f64 (fma.f64 (log.f64 im) #s(literal 2 binary64) (neg.f64 (log.f64 re)))))))
	53.8%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (+ (* (- (/ re im) 2) re) (* 2 im)) (.f64 (-.f64 #s(literal -2 binary64) (/.f64 (.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re) im)) (neg.f64 im))))))
	26.7%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal -1 binary64) im) (neg.f64 (sqrt.f64 re))))))
✓	27.2%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))))
	25.7%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1/2 binary64) re)) #s(literal 1/2 binary64))) im) (sqrt.f64 #s(literal 2 binary64)))))

Compiler

Compiled 640 to 400 computations (37.5% saved)

regimes150.0ms (2.1%)

Memory

-31.0MiB live, 101.7MiB allocated

Counts

35 → 2

Calls

Call 1

Inputs
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal 2 binary64) im))))
(.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
(.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) #s(approx (/ 1 (/ (sqrt re) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))))
(.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) #s(approx (/ im (sqrt re)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im))) #s(literal 1/2 binary64))
(.f64 (.f64 (sqrt.f64 #s(approx (- (sqrt (+ (* im im) (* re re))) re) (-.f64 im re))) (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (/.f64 (sqrt.f64 re) im))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (fma.f64 (/.f64 re im) #s(literal -2 binary64) #s(literal 2 binary64)) im))))
(.f64 (sqrt.f64 #s(approx ( (- (sqrt (+ (* im im) (* re re))) re) 2) (*.f64 (fma.f64 (/.f64 re im) #s(literal -2 binary64) #s(literal 2 binary64)) im))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re (*.f64 #s(literal 2 binary64) im)))))
(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 #s(literal 1 binary64) (*.f64 (/.f64 #s(literal -1 binary64) im) (neg.f64 (sqrt.f64 re))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))))
(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) im) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) #s(approx (+ (* (- (/ re im) 2) re) (* 2 im)) (.f64 (-.f64 #s(literal -2 binary64) (/.f64 (.f64 (-.f64 (/.f64 re im) #s(literal 2 binary64)) re) im)) (neg.f64 im))))))
(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (/.f64 im (sqrt.f64 re)) (sqrt.f64 #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im) (sqrt.f64 re)) (sqrt.f64 #s(literal 2 binary64)))))
#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (.f64 (.f64 (.f64 #s(literal 1/2 binary64) (.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))
(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (*.f64 im (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 #s(approx (sqrt (+ (* re re) (* im im))) (.f64 (fma.f64 (/.f64 (.f64 re (/.f64 re im)) im) #s(literal 1/2 binary64) #s(literal 1 binary64)) im)) re))))
(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (*.f64 (pow.f64 re #s(literal -1/2 binary64)) im)))
(.f64 (sqrt.f64 (.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64))
(.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (pow.f64 (pow.f64 re #s(literal 1/4 binary64)) #s(literal 2 binary64)))) #s(literal 1/2 binary64))
(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 (/.f64 im (pow.f64 re #s(literal 1/4 binary64))) (pow.f64 re #s(literal 1/4 binary64)))))
(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (fma.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 2 binary64))) (sqrt.f64 #s(literal 1/2 binary64)) (.f64 (.f64 (.f64 #s(literal -1/16 binary64) (.f64 im im)) (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64)))) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) im)))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (pow.f64 (sqrt.f64 (hypot.f64 im re)) #s(literal 2 binary64)) re))))
(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (exp.f64 (*.f64 (log.f64 (/.f64 #s(literal 1/2 binary64) re)) #s(literal 1/2 binary64))) im) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (exp.f64 (.f64 (log.f64 (/.f64 (sqrt.f64 (/.f64 re #s(literal 1/2 binary64))) im)) #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (exp.f64 (fma.f64 (log.f64 im) #s(literal 2 binary64) (neg.f64 (log.f64 re)))))))

Outputs

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

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

Calls

7 calls:

46.0ms	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))
32.0ms	(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)
30.0ms	re
10.0ms	im
10.0ms	(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))

Results

Accuracy	Segments	Branch
86.3%	2	`re`
77.9%	1	`im`
90.8%	3	`(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))`
90.8%	3	`(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`
90.8%	2	`(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))`
90.8%	2	`(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`
77.9%	1	`(*.f64 im im)`

Compiler

Compiled 55 to 45 computations (18.2% saved)

regimes49.0ms (0.7%)

Memory

11.5MiB live, 50.2MiB allocated

Counts

27 → 4

Calls

Call 1

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

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

Calls

5 calls:

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

Results

Accuracy	Segments	Branch
76.5%	4	`re`
82.6%	5	`(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))`
82.6%	5	`(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`
82.6%	4	`(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))`
82.6%	4	`(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`

Compiler

Compiled 51 to 40 computations (21.6% saved)

regimes33.0ms (0.5%)

Memory

-16.2MiB live, 22.7MiB allocated

Counts

26 → 4

Calls

Call 1

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

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

Calls

2 calls:

7.0ms	(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))
7.0ms	(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)

Results

Accuracy	Segments	Branch
82.6%	4	`(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))`
82.6%	4	`(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`

Compiler

Compiled 22 to 16 computations (27.3% saved)

regimes60.0ms (0.8%)

Memory

12.7MiB live, 54.2MiB allocated

Counts

17 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

7 calls:

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

Results

Accuracy	Segments	Branch
74.2%	3	`re`
70.3%	3	`(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))`
70.3%	3	`(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`
66.0%	2	`im`
64.7%	2	`(*.f64 im im)`
70.3%	2	`(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))`
70.3%	2	`(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`

Compiler

Compiled 55 to 45 computations (18.2% saved)

regimes3.0ms (0%)

Memory

5.4MiB live, 5.4MiB allocated

Counts

6 → 3

Calls

Call 1

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

Outputs

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

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

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

Calls

1 calls:

3.0ms

re

Results

Accuracy	Segments	Branch
74.2%	3	`re`

Compiler

Compiled 1 to 2 computations (-100% saved)

regimes38.0ms (0.5%)

Memory

-7.2MiB live, 32.1MiB allocated

Counts

5 → 2

Calls

Call 1

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

Outputs

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

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

Calls

7 calls:

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

Results

Accuracy	Segments	Branch
61.9%	2	`(*.f64 im im)`
63.5%	2	`im`
55.6%	1	`(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))`
55.6%	1	`(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`
55.6%	1	`(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))`
55.6%	1	`(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`
62.8%	2	`re`

Compiler

Compiled 55 to 45 computations (18.2% saved)

regimes4.0ms (0.1%)

Memory

12.0MiB live, 12.0MiB allocated

Counts

3 → 2

Calls

Call 1

Inputs

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

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

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

Outputs

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

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

Calls

2 calls:

2.0ms	im
2.0ms	re

Results

Accuracy	Segments	Branch
62.8%	2	`re`
62.5%	2	`im`

Compiler

Compiled 2 to 4 computations (-100% saved)

regimes10.0ms (0.1%)

Memory

-10.3MiB live, 29.0MiB allocated

Accuracy

Total -0.0b remaining (-0%)

Threshold costs -0b (-0%)

Counts

1 → 1

Calls

Call 1

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

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

Calls

7 calls:

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

Results

Accuracy	Segments	Branch
24.1%	1	`(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))`
24.1%	1	`(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`
24.1%	1	`(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))`
24.1%	1	`(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`
24.1%	1	`(*.f64 im im)`
24.1%	1	`im`
24.1%	1	`re`

Compiler

Compiled 55 to 45 computations (18.2% saved)

bsearch1.0ms (0%)

Memory

1.5MiB live, 1.5MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.0	2.6130774670456667e-303

Compiler

Compiled 18 to 17 computations (5.6% saved)

bsearch1.0ms (0%)

Memory

1.8MiB live, 1.8MiB allocated

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	8.01939780734393e+147	1.143819611277448e+150
0.0ms	1.6893718249649727e-230	9.469945956434209e-223
0.0ms	0.0	2.6130774670456667e-303

Compiler

Compiled 18 to 17 computations (5.6% saved)

bsearch1.0ms (0%)

Memory

1.8MiB live, 1.8MiB allocated

Algorithm

3×	left-value

Steps

Time	Left	Right
0.0ms	8.01939780734393e+147	1.143819611277448e+150
0.0ms	1.6893718249649727e-230	9.469945956434209e-223
0.0ms	0.0	2.6130774670456667e-303

Compiler

Compiled 18 to 17 computations (5.6% saved)

bsearch40.0ms (0.6%)

Memory

12.9MiB live, 91.0MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
19.0ms	8.016171364396373e-53	1.2469875836175774e-51
18.0ms	-9.356916945608092e+45	-1.359887500462194e+31

Samples

14.0ms	213×	0	valid
6.0ms	33×	2	valid
5.0ms	10×	1	valid

Compiler

Compiled 292 to 330 computations (-13% saved)

Precisions

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

ival-hypot: 6.0ms (39.7% of total)

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

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

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

adjust: 1.0ms (6.6% of total)

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

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

exact: 0.0ms (0% of total)

bsearch3.0ms (0%)

Memory

6.1MiB live, 6.1MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	8.016171364396373e-53	1.2469875836175774e-51
1.0ms	-9.356916945608092e+45	-1.359887500462194e+31

Compiler

Compiled 274 to 312 computations (-13.9% saved)

bsearch25.0ms (0.3%)

Memory

0.3MiB live, 38.2MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
23.0ms	2.3311805575143833e-185	5.438012791409745e-183

Samples

5.0ms	13×	1	valid
5.0ms	17×	3	valid
4.0ms	63×	0	valid
4.0ms	19×	2	valid

Compiler

Compiled 130 to 147 computations (-13.1% saved)

Precisions

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

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

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

adjust: 1.0ms (7% of total)

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

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

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

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

exact: 0.0ms (0% of total)

bsearch21.0ms (0.3%)

Memory

-8.0MiB live, 29.5MiB allocated

Algorithm

1×	binary-search

Stop Event

1×	narrow-enough

Steps

Time	Left	Right
19.0ms	-34384582314713588000.0	-5770163454657.55

Samples

13.0ms

144×

valid

Compiler

Compiled 144 to 176 computations (-22.2% saved)

Precisions

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

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

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

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

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

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

exact: 0.0ms (0% of total)

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

simplify31.0ms (0.4%)

Memory

17.1MiB live, 54.7MiB allocated

Algorithm

1×	egg-herbie

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	85	520
1	108	520
2	115	520
3	117	520
4	118	520

Stop Event

1×

saturated

Calls

Call 1

Inputs
(if (<=.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 0 binary64)) (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (pow.f64 re #s(literal -1/2 binary64)) im))) (.f64 (sqrt.f64 (*.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(if (<=.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 0 binary64)) (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (pow.f64 re #s(literal -1/2 binary64)) im))) (if (<=.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 8739899877464283/436994993873214129706097166956708350993678881411295357199729151951767944417616335439228580716318181998128654620651240845861768505204366709906692902245553277900892247131030458103436298545516643924637451297481464347472084863384057367177715867713536 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))))) (if (<=.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 10000000000000000489767265751505205795722270035307438887450423745901682635933847561612315292472764637931130646815102767620534329186625852171022761984 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))))))))
(if (<=.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 0 binary64)) (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) #s(approx (/ 1 (/ (sqrt re) im)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im)))) (if (<=.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 8739899877464283/436994993873214129706097166956708350993678881411295357199729151951767944417616335439228580716318181998128654620651240845861768505204366709906692902245553277900892247131030458103436298545516643924637451297481464347472084863384057367177715867713536 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))))) (if (<=.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 10000000000000000489767265751505205795722270035307438887450423745901682635933847561612315292472764637931130646815102767620534329186625852171022761984 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))))))))
(if (<=.f64 re #s(literal -31999999999999998258407391585370112 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (if (<=.f64 re #s(literal 3504793066729583/13479973333575319897333507543509815336818572211270286240551805124608 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))))) (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) #s(approx (/ 1 (/ (sqrt re) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im))))))
(if (<=.f64 re #s(literal -31999999999999998258407391585370112 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (if (<=.f64 re #s(literal 3504793066729583/13479973333575319897333507543509815336818572211270286240551805124608 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))))) (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64))))
(if (<=.f64 im #s(literal 5382073949696787/1196016433265952743395471289404697169072810493804166494441751843412187589432751524808206008009981008223572409600860332310053179810480242818613945648997260116165130891915497295074524972252293700255744 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))))))
(if (<=.f64 re #s(literal -40000000000000 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal 2 binary64) im)))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))))

Outputs
(if (<=.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 0 binary64)) (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (pow.f64 re #s(literal -1/2 binary64)) im))) (.f64 (sqrt.f64 (*.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(if (<=.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 0 binary64)) (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (pow.f64 re #s(literal -1/2 binary64)) im)) #s(literal 1/2 binary64)) (.f64 (sqrt.f64 (*.f64 (-.f64 (hypot.f64 im re) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(if (<=.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 0 binary64)) (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (pow.f64 re #s(literal -1/2 binary64)) im))) (if (<=.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 8739899877464283/436994993873214129706097166956708350993678881411295357199729151951767944417616335439228580716318181998128654620651240845861768505204366709906692902245553277900892247131030458103436298545516643924637451297481464347472084863384057367177715867713536 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))))) (if (<=.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 10000000000000000489767265751505205795722270035307438887450423745901682635933847561612315292472764637931130646815102767620534329186625852171022761984 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))))))))
(if (<=.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 0 binary64)) (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (pow.f64 re #s(literal -1/2 binary64)) im)) #s(literal 1/2 binary64)) (if (<=.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 8739899877464283/436994993873214129706097166956708350993678881411295357199729151951767944417616335439228580716318181998128654620651240845861768505204366709906692902245553277900892247131030458103436298545516643924637451297481464347472084863384057367177715867713536 binary64)) (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (if (<=.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 10000000000000000489767265751505205795722270035307438887450423745901682635933847561612315292472764637931130646815102767620534329186625852171022761984 binary64)) (.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
(if (<=.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 0 binary64)) (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) #s(approx (/ 1 (/ (sqrt re) im)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im)))) (if (<=.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 8739899877464283/436994993873214129706097166956708350993678881411295357199729151951767944417616335439228580716318181998128654620651240845861768505204366709906692902245553277900892247131030458103436298545516643924637451297481464347472084863384057367177715867713536 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))))) (if (<=.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 10000000000000000489767265751505205795722270035307438887450423745901682635933847561612315292472764637931130646815102767620534329186625852171022761984 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))))))))
(if (<=.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 0 binary64)) (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) #s(approx (/ 1 (/ (sqrt re) im)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im))) #s(literal 1/2 binary64)) (if (<=.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 8739899877464283/436994993873214129706097166956708350993678881411295357199729151951767944417616335439228580716318181998128654620651240845861768505204366709906692902245553277900892247131030458103436298545516643924637451297481464347472084863384057367177715867713536 binary64)) (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (if (<=.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 im im) (.f64 re re))) re) #s(literal 10000000000000000489767265751505205795722270035307438887450423745901682635933847561612315292472764637931130646815102767620534329186625852171022761984 binary64)) (.f64 (sqrt.f64 (.f64 (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))))
(if (<=.f64 re #s(literal -31999999999999998258407391585370112 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (if (<=.f64 re #s(literal 3504793066729583/13479973333575319897333507543509815336818572211270286240551805124608 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))))) (.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) #s(approx (/ 1 (/ (sqrt re) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im))))))
(if (<=.f64 re #s(literal -31999999999999998258407391585370112 binary64)) (.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) #s(literal 1/2 binary64)) (if (<=.f64 re #s(literal 3504793066729583/13479973333575319897333507543509815336818572211270286240551805124608 binary64)) (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) #s(approx (/ 1 (/ (sqrt re) im)) (*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) im))) #s(literal 1/2 binary64))))
(if (<=.f64 re #s(literal -31999999999999998258407391585370112 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (if (<=.f64 re #s(literal 3504793066729583/13479973333575319897333507543509815336818572211270286240551805124608 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))))) (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64))))
(if (<=.f64 re #s(literal -31999999999999998258407391585370112 binary64)) (.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) #s(literal 1/2 binary64)) (if (<=.f64 re #s(literal 3504793066729583/13479973333575319897333507543509815336818572211270286240551805124608 binary64)) (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)) (.f64 #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (/.f64 im (sqrt.f64 re))) #s(literal 1/2 binary64))))
(if (<=.f64 im #s(literal 5382073949696787/1196016433265952743395471289404697169072810493804166494441751843412187589432751524808206008009981008223572409600860332310053179810480242818613945648997260116165130891915497295074524972252293700255744 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))))))
(if (<=.f64 im #s(literal 5382073949696787/1196016433265952743395471289404697169072810493804166494441751843412187589432751524808206008009981008223572409600860332310053179810480242818613945648997260116165130891915497295074524972252293700255744 binary64)) (.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) #s(literal 1/2 binary64)) (.f64 (sqrt.f64 (.f64 #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)) #s(literal 2 binary64))) #s(literal 1/2 binary64)))
(if (<=.f64 re #s(literal -40000000000000 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re)))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal 2 binary64) im)))))
(if (<=.f64 re #s(literal -40000000000000 binary64)) (.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 #s(literal -4 binary64) re))) #s(literal 1/2 binary64)) (.f64 (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal 2 binary64) im))) #s(literal 1/2 binary64)))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))))
(.f64 (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 #s(literal -4 binary64) re))) #s(literal 1/2 binary64))

soundness881.0ms (12.2%)

Memory

-37.3MiB live, 621.6MiB allocated

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	561	12721
1	1843	11925
2	6446	11861
0	8328	11345
0	12	65
0	20	65
1	56	65
2	374	65
3	4192	65
0	8391	38
0	551	3257
1	1814	3103
2	6380	3088
0	8199	2913
0	43	310
0	71	255
1	209	247
2	1073	229
0	8605	229

Stop Event

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

Compiler

Compiled 650 to 354 computations (45.5% saved)

preprocess78.0ms (1.1%)

Memory: 13.8MiB live, 132.6MiB allocated
Remove: (abs im)
Compiler: Compiled 756 to 262 computations (65.3% saved)

end0.0ms (0%)

Memory: 0.0MiB live, 0.0MiB allocated

Iter	Nodes	Cost
0	30	77
1	71	75
2	152	75
3	285	75
4	424	75
5	515	75
6	637	75
7	775	75
8	830	75
0	12	15
0	20	15
1	25	15
2	36	15
3	52	15
4	73	15
5	98	15
6	154	15
7	227	15
8	310	15
9	360	15
10	420	15
11	434	15
12	450	15
13	470	15
14	500	15
15	531	15
16	543	15
17	545	15
0	545	10

Iter	Nodes	Cost
0	12	75
0	20	75
1	25	75
2	36	75
3	52	75
4	73	75
5	98	75
6	154	75
7	227	75
8	310	75
9	360	75
10	420	75
11	434	75
12	450	75
13	470	75
14	500	75
15	531	75
16	543	75
17	545	75
0	545	49

Iter	Nodes	Cost
0	30	77
1	71	75
2	152	75
3	285	75
4	424	75
5	515	75
6	637	75
7	775	75
8	830	75
0	12	15
0	20	15
1	25	15
2	36	15
3	52	15
4	73	15
5	98	15
6	154	15
7	227	15
8	310	15
9	360	15
10	420	15
11	434	15
12	450	15
13	470	15
14	500	15
15	531	15
16	543	15
17	545	15
0	545	10

Iter	Nodes	Cost
0	12	75
0	20	75
1	25	75
2	36	75
3	52	75
4	73	75
5	98	75
6	154	75
7	227	75
8	310	75
9	360	75
10	420	75
11	434	75
12	450	75
13	470	75
14	500	75
15	531	75
16	543	75
17	545	75
0	545	49

start0.0ms (0%)

analyze112.0ms (1.6%)

sample1.9s (26.6%)

explain237.0ms (3.3%)

preprocess49.0ms (0.7%)

eval0.0ms (0%)

prune1.0ms (0%)

simplify35.0ms (0.5%)

localize52.0ms (0.7%)

series25.0ms (0.3%)

simplify243.0ms (3.4%)

rewrite167.0ms (2.3%)

eval100.0ms (1.4%)

prune33.0ms (0.5%)

simplify131.0ms (1.8%)

localize155.0ms (2.2%)

series47.0ms (0.7%)

simplify201.0ms (2.8%)

rewrite182.0ms (2.5%)

eval137.0ms (1.9%)

prune36.0ms (0.5%)

simplify140.0ms (2%)

localize128.0ms (1.8%)

series65.0ms (0.9%)

simplify230.0ms (3.2%)

rewrite137.0ms (1.9%)

eval215.0ms (3%)

prune37.0ms (0.5%)

simplify88.0ms (1.2%)

localize134.0ms (1.9%)

series60.0ms (0.8%)

simplify253.0ms (3.5%)

rewrite198.0ms (2.8%)

eval155.0ms (2.2%)

prune73.0ms (1%)

regimes150.0ms (2.1%)

regimes49.0ms (0.7%)

regimes33.0ms (0.5%)

regimes60.0ms (0.8%)

regimes3.0ms (0%)

regimes38.0ms (0.5%)

regimes4.0ms (0.1%)

regimes10.0ms (0.1%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch1.0ms (0%)

bsearch40.0ms (0.6%)

bsearch3.0ms (0%)

bsearch25.0ms (0.3%)

bsearch21.0ms (0.3%)

simplify31.0ms (0.4%)

soundness881.0ms (12.2%)

preprocess78.0ms (1.1%)

end0.0ms (0%)

Profiling

Iter	Nodes	Cost
0	30	77
1	71	75
2	152	75
3	285	75
4	424	75
5	515	75
6	637	75
7	775	75
8	830	75
0	12	15
0	20	15
1	25	15
2	36	15
3	52	15
4	73	15
5	98	15
6	154	15
7	227	15
8	310	15
9	360	15
10	420	15
11	434	15
12	450	15
13	470	15
14	500	15
15	531	15
16	543	15
17	545	15
0	545	10

Iter	Nodes	Cost
0	12	75
0	20	75
1	25	75
2	36	75
3	52	75
4	73	75
5	98	75
6	154	75
7	227	75
8	310	75
9	360	75
10	420	75
11	434	75
12	450	75
13	470	75
14	500	75
15	531	75
16	543	75
17	545	75
0	545	49