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

analyze92.0ms (1.1%)

Memory

-10.2MiB live, 179.6MiB 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.4s (16.7%)

Memory

54.7MiB live, 2 175.3MiB allocated

Samples

505.0ms	6 238×	0	valid
194.0ms	826×	1	valid
148.0ms	774×	2	valid
119.0ms	418×	3	valid

Precisions

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

ival-hypot: 307.0ms (43.3% of total)

ival-mult: 147.0ms (20.7% of total)

ival-sqrt: 81.0ms (11.4% of total)

ival-sub: 56.0ms (7.9% of total)

adjust: 54.0ms (7.6% of total)

ival->: 49.0ms (6.9% of total)

exact: 12.0ms (1.7% of total)

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

Bogosity

preprocess66.0ms (0.8%)

Memory

-19.0MiB live, 58.3MiB allocated

Algorithm

1×	egg-herbie

Rules

368×	`lower-fma.f64`
368×	`lower-fma.f32`
228×	`lower-*.f32`
220×	`lower-*.f64`
136×	`distribute-rgt-in`

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

Symmetry

(abs im)

explain251.0ms (3.1%)

Memory

12.3MiB live, 256.1MiB allocated

FPErrors

Click to see full error table

Ground Truth	Example	Underpredictions	Example	Subexpression
142	-	1	(1.5255994728580586e-161 7.910567928570265e-161)	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`
40	-	0	-	`(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`
22	-	3	(1.1981794492116342e-260 3.292278084268413e-289)	`(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`
0	-	0	-	`(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))`
0	-	0	-	`(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))`
0	-	0	-	`(*.f64 re re)`
0	-	0	-	`im`
0	-	0	-	`(+.f64 (.f64 re re) (.f64 im im))`
0	-	0	-	`#s(literal 2 binary64)`
0	-	0	-	`re`
0	-	0	-	`#s(literal 1/2 binary64)`
0	-	0	-	`(*.f64 im im)`

Explanations

Click to see full explanations table

Operator	Subexpression	Explanation	Count
`sqrt.f64`	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`	oflow-rescue	129	0
↳	`(+.f64 (.f64 re re) (.f64 im im))`	overflow	129
↳	`(*.f64 re re)`	overflow	78
↳	`(*.f64 im im)`	overflow	77
`-.f64`	`(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`	cancellation	40	0
`sqrt.f64`	`(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`	uflow-rescue	18	0
↳	`(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))`	underflow	24
↳	`(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`	underflow	6
↳	`(*.f64 re re)`	underflow	60
↳	`(*.f64 im im)`	underflow	59
↳	`(+.f64 (.f64 re re) (.f64 im im))`	underflow	12
↳	`(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`	underflow	24
`sqrt.f64`	`(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))`	uflow-rescue	12	0
↳	`(+.f64 (.f64 re re) (.f64 im im))`	underflow	12
↳	`(*.f64 re re)`	underflow	60
↳	`(*.f64 im im)`	underflow	59
`sqrt.f64`	`(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`	oflow-rescue	1	0
↳	`(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))`	overflow	1
↳	`(+.f64 (.f64 re re) (.f64 im im))`	overflow	129
↳	`(*.f64 re re)`	overflow	78
↳	`(*.f64 im im)`	overflow	77

Confusion

	Predicted +	Predicted -
+	166	1
-	0	89

Precision

1.0

Recall

0.9940119760479041

Confusion?

	Predicted +	Predicted Maybe	Predicted -
+	166	0	1
-	0	0	89

Precision?

1.0

Recall?

0.9940119760479041

Freqs

test

number	freq
0	90
1	132
2	34

Total Confusion?

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

Precision?

1.0

Recall?

1.0

Samples

49.0ms	384×	0	valid
23.0ms	48×	2	valid
19.0ms	60×	1	valid
7.0ms	20×	3	valid

Compiler

Compiled 188 to 52 computations (72.3% saved)

Precisions

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

ival-mult: 40.0ms (58.3% of total)

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

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

adjust: 4.0ms (5.8% of total)

ival-sub: 3.0ms (4.4% of total)

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

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

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

exact: 0.0ms (0% of total)

eval0.0ms (0%)

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

prune1.0ms (0%)

Memory

1.9MiB live, 1.9MiB allocated

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	37.7%	(.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 17 to 12 computations (29.4% saved)

simplify32.0ms (0.4%)

Memory

-12.2MiB live, 26.8MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 4 expressions of interest:

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

Rules

368×	`lower-fma.f64`
368×	`lower-fma.f32`
228×	`lower-*.f32`
220×	`lower-*.f64`
104×	`lower-+.f32`

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 #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 (+.f64 (.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 (+.f64 (.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 (+.f64 (.f64 re re) (.f64 im im))) re)
(-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)
(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))
(sqrt.f64 (fma.f64 re re (*.f64 im im)))
(+.f64 (.f64 re re) (.f64 im im))
(fma.f64 re re (*.f64 im im))
(*.f64 re re)
re
(*.f64 im im)
im

localize83.0ms (1%)

Memory

-17.3MiB live, 87.6MiB allocated

Localize:

Found 4 expressions of interest:

New	Metric	Score	Program
✓	accuracy	100.0%	(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))
✓	accuracy	92.9%	(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))
✓	accuracy	85.6%	(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)
✓	accuracy	48.7%	(sqrt.f64 (+.f64 (.f64 re re) (.f64 im im)))

Samples

27.0ms	24×	2	valid
18.0ms	192×	0	valid
5.0ms	30×	1	valid
3.0ms	10×	3	valid

Compiler

Compiled 77 to 14 computations (81.8% saved)

Precisions

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

adjust: 23.0ms (54.2% of total)

ival-hypot: 7.0ms (16.5% of total)

ival-mult: 7.0ms (16.5% of total)

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

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

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

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

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

exact: 0.0ms (0% of total)

series23.0ms (0.3%)

Memory

-3.8MiB live, 35.0MiB 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 (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 (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 (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 (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 (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 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 (* 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 (* -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/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 (* 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 (* -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 (* (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 (* (* 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 (* -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 (* (* 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 (* (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 (* -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 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 (/ (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 (* -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 (/ (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 (* 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 (* -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 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 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 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 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 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 (* -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 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 (* 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 (* -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 (* 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 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 (* -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

36 calls:

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

simplify382.0ms (4.7%)

Memory

8.8MiB live, 477.4MiB allocated

Algorithm

1×	egg-herbie

Rules

11 848×	`lower-fma.f64`
11 848×	`lower-fma.f32`
8 470×	`lower-*.f64`
8 470×	`lower-*.f32`
3 078×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	551	3257
1	1814	3103
2	6380	3088
0	8197	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))
(pow re 2)
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(pow re 2)
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(pow re 2)
(+ (pow im 2) (pow re 2))
(+ (pow im 2) (pow re 2))
(+ (pow im 2) (pow re 2))
(pow im 2)
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(pow im 2)
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* 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))))))))
(* 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)))))))
(* -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/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))))))))))
(* 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)))))))
(* -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))))))))
(* (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)))
(+ (* -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 (* (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 (+ (* -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))))))))))
(* (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 (* (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)
(+ (* -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)
(/ (+ (* -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)
(* -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) (+ (* -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)
(* 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)
(* -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)))))
im
(+ im (* 1/2 (/ (pow re 2) im)))
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
im
(* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
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 (/ (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)
(* -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 (/ (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))))
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 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 im im (*.f64 re re))
(+ (pow im 2) (pow re 2))
(fma.f64 im im (*.f64 re re))
(+ (pow im 2) (pow re 2))
(fma.f64 im im (*.f64 re re))
(pow re 2)
(*.f64 re re)
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(.f64 re (.f64 re (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 1 binary64))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(.f64 re (.f64 re (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 1 binary64))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(.f64 re (.f64 re (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 1 binary64))))
(pow re 2)
(*.f64 re re)
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(.f64 re (.f64 re (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 1 binary64))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(.f64 re (.f64 re (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 1 binary64))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(.f64 re (.f64 re (fma.f64 im (/.f64 im (*.f64 re re)) #s(literal 1 binary64))))
(pow re 2)
(*.f64 re re)
(+ (pow im 2) (pow re 2))
(fma.f64 im im (*.f64 re re))
(+ (pow im 2) (pow re 2))
(fma.f64 im im (*.f64 re re))
(+ (pow im 2) (pow re 2))
(fma.f64 im im (*.f64 re re))
(pow im 2)
(*.f64 im im)
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(.f64 im (.f64 im (fma.f64 re (/.f64 re (*.f64 im im)) #s(literal 1 binary64))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(.f64 im (.f64 im (fma.f64 re (/.f64 re (*.f64 im im)) #s(literal 1 binary64))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(.f64 im (.f64 im (fma.f64 re (/.f64 re (*.f64 im im)) #s(literal 1 binary64))))
(pow im 2)
(*.f64 im im)
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(.f64 im (.f64 im (fma.f64 re (/.f64 re (*.f64 im im)) #s(literal 1 binary64))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(.f64 im (.f64 im (fma.f64 re (/.f64 re (*.f64 im im)) #s(literal 1 binary64))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(.f64 im (.f64 im (fma.f64 re (/.f64 re (*.f64 im im)) #s(literal 1 binary64))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(fma.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))))
(fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/16 binary64)))) (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/4 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))))
(fma.f64 re (fma.f64 re (fma.f64 #s(literal 1/16 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im))))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 (.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/32 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/4 binary64)))) (.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64))))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 im (.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))))
(+ (* -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) (.f64 im (.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)))) (.f64 im (.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)))))
(+ (* -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 #s(literal -1/32 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (.f64 im (.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))))) (sqrt.f64 #s(literal 1/2 binary64))) (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (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 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 9 binary64)))) (fma.f64 #s(literal -1/512 binary64) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 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))))) (fma.f64 (.f64 (.f64 #s(literal -1/32 binary64) (.f64 im (.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)))) (.f64 im (.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))))))
(* -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)))))))
(neg.f64 (.f64 re (fma.f64 #s(literal -1/8 binary64) (.f64 (.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 (-.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal -1 binary64))) (/.f64 (fma.f64 #s(literal -1/32 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (.f64 (.f64 im im) (.f64 im im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re)))))) (.f64 (.f64 im (.f64 im (sqrt.f64 #s(literal -1 binary64)))) (.f64 (sqrt.f64 re) #s(literal 1/8 binary64)))) (.f64 re (*.f64 re re)))) (neg.f64 re))
(* -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 (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) (.f64 re (.f64 re re)))) (fma.f64 #s(literal -1/32 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (.f64 im im) (.f64 im im))) (.f64 #s(literal 1/64 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (.f64 (.f64 im im) (.f64 im im)) #s(literal 2 binary64))))) (.f64 (.f64 im (.f64 im (sqrt.f64 #s(literal -1 binary64)))) (.f64 (sqrt.f64 re) #s(literal 1/8 binary64)))) (neg.f64 (.f64 re (.f64 re re))))) (neg.f64 re))
(* 1/2 (* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re))))
(.f64 im (.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 (+ (* -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 im (fma.f64 (.f64 im im) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/32 binary64))) (.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 (+ (* 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 im (fma.f64 (.f64 im im) (fma.f64 (.f64 im im) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.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 (sqrt.f64 re) #s(literal 1/4 binary64))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/32 binary64)))) (.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 (+ (* 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 im (fma.f64 (.f64 im im) (fma.f64 (.f64 im im) (fma.f64 #s(literal -1/4 binary64) (.f64 (.f64 (sqrt.f64 re) (.f64 im im)) (.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (.f64 (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.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 (sqrt.f64 re) #s(literal 1/4 binary64)))) (.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/32 binary64)))) (.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)))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(.f64 (sqrt.f64 im) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt 2)))))
(.f64 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64)))))
(* 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 im (fma.f64 #s(literal 1/2 binary64) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 (.f64 re (.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/8 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64))))))
(* 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 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/4 binary64)) (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/2 binary64)) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re (.f64 re (sqrt.f64 #s(literal 2 binary64))))) #s(literal 1/16 binary64)))))
(* -1/2 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64))) (*.f64 (sqrt.f64 im) #s(literal -1/2 binary64)))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (neg.f64 im))
(* -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 (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (fma.f64 #s(literal -1/8 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re (.f64 re (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal -1 binary64))) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (*.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64)))))) (neg.f64 im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* 1/2 (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))))
(.f64 (-.f64 (fma.f64 #s(literal 1/2 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64))))) (/.f64 (.f64 (.f64 (.f64 re re) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (sqrt.f64 im) #s(literal 3/16 binary64))) (.f64 im (.f64 im im)))) (neg.f64 im))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(+ (* -1/2 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* (sqrt im) (sqrt 2)))
(fma.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (*.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))))) (* (sqrt im) (sqrt 2)))
(fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/8 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))))
(+ (* re (+ (* -1/2 (* (sqrt (/ 1 im)) (sqrt 2))) (* re (+ (* 1/16 (* (sqrt (/ 1 (pow im 5))) (* re (sqrt 2)))) (* 1/8 (* (sqrt (/ 1 (pow im 3))) (sqrt 2))))))) (* (sqrt im) (sqrt 2)))
(fma.f64 re (fma.f64 re (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal 1/8 binary64)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 (.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal 1/16 binary64)))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 #s(literal 2 binary64)) #s(literal -1/2 binary64)))) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64))))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) 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))))
(fma.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 im (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (.f64 (.f64 #s(literal -1/16 binary64) (.f64 im (*.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))))))
(+ (* -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) (.f64 im (.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)))) (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 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) 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))))))
(fma.f64 (/.f64 (.f64 (.f64 im im) (.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/16 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 (sqrt.f64 #s(literal 2 binary64)) (pow.f64 im #s(literal 5 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 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
(* -1 (* (sqrt re) (* (sqrt -1) (pow (sqrt 2) 2))))
(.f64 (sqrt.f64 re) (.f64 #s(literal -2 binary64) (sqrt.f64 #s(literal -1 binary64))))
(* -1 (* re (+ (* -1/4 (* (* (pow im 2) (sqrt -1)) (sqrt (/ 1 (pow re 5))))) (* (sqrt (/ 1 re)) (* (sqrt -1) (pow (sqrt 2) 2))))))
(neg.f64 (.f64 re (fma.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (.f64 (.f64 #s(literal -1/4 binary64) (.f64 im im)) (sqrt.f64 #s(literal -1 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 (/ 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))))))
(neg.f64 (.f64 re (-.f64 (.f64 #s(literal 2 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))) (/.f64 (fma.f64 (.f64 im im) (.f64 (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 re)) #s(literal 1/4 binary64)) (.f64 (.f64 #s(literal -1/16 binary64) (.f64 (.f64 im im) (.f64 im im))) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 re (.f64 re re))))))) (.f64 re (.f64 re re))))))
(* -1 (* 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 (-.f64 (.f64 #s(literal 2 binary64) (.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) (.f64 re (.f64 re re)))) (fma.f64 #s(literal -1/16 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (.f64 (.f64 im im) (.f64 im im))) (.f64 #s(literal 1/32 binary64) (.f64 (sqrt.f64 #s(literal -1 binary64)) (/.f64 (.f64 (.f64 im im) (.f64 im im)) #s(literal 2 binary64))))) (.f64 (.f64 im (.f64 im (sqrt.f64 #s(literal -1 binary64)))) (.f64 (sqrt.f64 re) #s(literal 1/4 binary64)))) (.f64 re (.f64 re re)))) (neg.f64 re))
(* (* im (* (sqrt 1/2) (sqrt 2))) (sqrt (/ 1 re)))
(.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) 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)))))
(.f64 im (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))) (.f64 (/.f64 (.f64 im (.f64 im (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/16 binary64)))))
(* 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 im (fma.f64 (.f64 im im) (fma.f64 (/.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) #s(literal -1/16 binary64)) (.f64 (.f64 (.f64 im im) (/.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.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 (sqrt.f64 re) #s(literal 1/2 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) 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))))))))))
(.f64 im (fma.f64 (.f64 im im) (fma.f64 (.f64 im im) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sqrt.f64 re) (.f64 im im)) (.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 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal 1/2 binary64))))) (/.f64 (.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) (.f64 (sqrt.f64 #s(literal 2 binary64)) (-.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/16 binary64) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 re #s(literal 5 binary64)))) (sqrt.f64 #s(literal 2 binary64)))) (sqrt.f64 #s(literal 1/2 binary64)))) (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re))))))
(* (sqrt im) (sqrt 2))
(*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))
(* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt 2)))) (* (sqrt (/ 1 im)) (sqrt 2))))
(.f64 im (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)))))
(* im (+ (* -1/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 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 (.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/4 binary64))))))
(* 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 im (fma.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 (.f64 re (sqrt.f64 #s(literal 2 binary64))) #s(literal -1/2 binary64)) (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 (.f64 re (*.f64 re (sqrt.f64 #s(literal 2 binary64)))) #s(literal 1/8 binary64))))))
(* -1 (* (sqrt im) (* (sqrt -1) (sqrt 2))))
(.f64 (sqrt.f64 im) (.f64 (neg.f64 (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64))))
(* -1 (* im (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2))))))
(.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (neg.f64 im))
(* -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 (fma.f64 (sqrt.f64 #s(literal 2 binary64)) (.f64 (sqrt.f64 #s(literal -1 binary64)) (sqrt.f64 (/.f64 #s(literal 1 binary64) im))) (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (.f64 #s(literal -1/4 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (pow.f64 im #s(literal 5 binary64)))) (.f64 re (.f64 re (sqrt.f64 #s(literal 2 binary64))))) (sqrt.f64 #s(literal -1 binary64)))))) (neg.f64 im))
(* -1 (* im (+ (* -1 (/ (+ (* 1/8 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2))))) (* 1/4 (* (sqrt im) (* (pow re 2) (* (sqrt -1) (sqrt 2)))))) (pow im 3))) (+ (* -1/2 (* (sqrt (/ 1 (pow im 3))) (* re (* (sqrt -1) (sqrt 2))))) (* (sqrt (/ 1 im)) (* (sqrt -1) (sqrt 2)))))))
(.f64 (-.f64 (fma.f64 #s(literal -1/2 binary64) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) (.f64 im (.f64 im im)))) (.f64 re (sqrt.f64 #s(literal -1 binary64)))) (sqrt.f64 #s(literal 2 binary64))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) im)) (sqrt.f64 #s(literal -1 binary64))) (sqrt.f64 #s(literal 2 binary64)))) (/.f64 (.f64 (.f64 (.f64 re re) (.f64 (sqrt.f64 #s(literal 2 binary64)) (sqrt.f64 #s(literal -1 binary64)))) (.f64 (sqrt.f64 im) #s(literal 3/8 binary64))) (.f64 im (*.f64 im im)))) (neg.f64 im))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(+ (* -2 re) (* 2 im))
(fma.f64 im #s(literal 2 binary64) (*.f64 re #s(literal -2 binary64)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))
(+ (* 2 im) (* re (- (* re (+ (* -1/4 (/ (pow re 2) (pow im 3))) (/ 1 im))) 2)))
(fma.f64 re (fma.f64 re (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 re re) (.f64 im (.f64 im im))) (/.f64 #s(literal 1 binary64) im)) #s(literal -2 binary64)) (.f64 im #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 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 im im) (.f64 im im)) (.f64 re 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 im im (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 im im) (.f64 im im)) (.f64 re re)) (/.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (.f64 (.f64 re re) (.f64 re re))))) 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 im im (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 im im) (.f64 im im)) (.f64 re re)) (/.f64 (.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (.f64 (.f64 re re) (.f64 re re))))) (/.f64 (*.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (pow.f64 re #s(literal 6 binary64)))) re)
(* -4 re)
(*.f64 re #s(literal -4 binary64))
(* -1 (* re (+ 4 (/ (pow im 2) (pow re 2)))))
(neg.f64 (.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 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 im im) (.f64 im im)) (.f64 (.f64 re re) (.f64 re re))) (fma.f64 im (/.f64 im (.f64 re re)) #s(literal 4 binary64))) (neg.f64 re))
(* -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 (+.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 im im) (.f64 im im)) (.f64 (.f64 re re) (.f64 re re))) (fma.f64 im (/.f64 im (.f64 re re)) #s(literal 4 binary64))) (/.f64 (*.f64 #s(literal 1/8 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))) (neg.f64 re))
(/ (pow im 2) re)
(/.f64 (*.f64 im im) re)
(* (pow im 2) (+ (* -1/4 (/ (pow im 2) (pow re 3))) (/ 1 re)))
(.f64 (.f64 im im) (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 im im) (.f64 re (*.f64 re re))) (/.f64 #s(literal 1 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/8 (/ (pow im 2) (pow re 5))) (* 1/4 (/ 1 (pow re 3))))) (/ 1 re)))
(.f64 (.f64 im im) (fma.f64 (.f64 im im) (fma.f64 (.f64 im im) (/.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal 5 binary64))) (/.f64 #s(literal -1/4 binary64) (.f64 re (.f64 re re)))) (/.f64 #s(literal 1 binary64) 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)))
(.f64 (.f64 im im) (fma.f64 (.f64 im im) (fma.f64 (.f64 im im) (fma.f64 #s(literal -5/64 binary64) (/.f64 (.f64 im im) (pow.f64 re #s(literal 7 binary64))) (/.f64 #s(literal 1/8 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 #s(literal -1/4 binary64) (.f64 re (*.f64 re re)))) (/.f64 #s(literal 1 binary64) re)))
(* 2 im)
(*.f64 im #s(literal 2 binary64))
(* im (+ 2 (* -2 (/ re im))))
(*.f64 im (fma.f64 #s(literal -2 binary64) (/.f64 re im) #s(literal 2 binary64)))
(* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2)))))
(.f64 im (fma.f64 re (/.f64 re (.f64 im im)) (fma.f64 #s(literal -2 binary64) (/.f64 re im) #s(literal 2 binary64))))
(* im (+ 2 (+ (* -2 (/ re im)) (+ (* -1/4 (/ (pow re 4) (pow im 4))) (/ (pow re 2) (pow im 2))))))
(.f64 im (+.f64 (fma.f64 #s(literal -1/4 binary64) (/.f64 (.f64 (.f64 re re) (.f64 re re)) (.f64 (.f64 im im) (.f64 im im))) (/.f64 (.f64 re #s(literal -2 binary64)) im)) (fma.f64 re (/.f64 re (*.f64 im im)) #s(literal 2 binary64))))
(* -2 im)
(*.f64 im #s(literal -2 binary64))
(* -1 (* im (+ 2 (* 2 (/ re im)))))
(*.f64 (fma.f64 #s(literal 2 binary64) (/.f64 re im) #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 (-.f64 (.f64 re #s(literal -2 binary64)) (/.f64 (*.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)))))
(neg.f64 (.f64 im (-.f64 #s(literal 2 binary64) (/.f64 (fma.f64 re #s(literal -2 binary64) (/.f64 (fma.f64 re re (/.f64 (.f64 #s(literal -1/4 binary64) (.f64 (.f64 re re) (.f64 re re))) (.f64 im im))) (neg.f64 im))) im))))
im
(+ im (* 1/2 (/ (pow re 2) im)))
(fma.f64 re (/.f64 (*.f64 re #s(literal 1/2 binary64)) im) im)
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(fma.f64 (.f64 re re) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 re re) (.f64 im (.f64 im im))) (/.f64 #s(literal 1/2 binary64) im)) 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 (.f64 re re) (fma.f64 (.f64 re re) (fma.f64 #s(literal 1/16 binary64) (/.f64 (.f64 re re) (pow.f64 im #s(literal 5 binary64))) (/.f64 #s(literal -1/8 binary64) (.f64 im (*.f64 im im)))) (/.f64 #s(literal 1/2 binary64) im)) im)
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(fma.f64 (/.f64 (.f64 im im) (.f64 re re)) (*.f64 #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 re (fma.f64 (.f64 im im) (/.f64 #s(literal 1/2 binary64) (.f64 re re)) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 im im) (.f64 im im))) (.f64 (.f64 re re) (*.f64 re 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 re (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (fma.f64 (.f64 im im) (/.f64 #s(literal 1/2 binary64) (.f64 re re)) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 im im) (.f64 im im))) (.f64 (.f64 re re) (*.f64 re re))))) re)
(* -1 re)
(neg.f64 re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(neg.f64 (fma.f64 (/.f64 (.f64 im im) (.f64 re re)) (*.f64 #s(literal 1/2 binary64) re) re))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(neg.f64 (fma.f64 re (fma.f64 (.f64 im im) (/.f64 #s(literal 1/2 binary64) (.f64 re re)) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 im im) (.f64 im im))) (.f64 (.f64 re re) (*.f64 re re)))) re))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
(neg.f64 (fma.f64 re (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (pow.f64 re #s(literal 6 binary64))) (fma.f64 (.f64 im im) (/.f64 #s(literal 1/2 binary64) (.f64 re re)) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 im im) (.f64 im im))) (.f64 (.f64 re re) (*.f64 re re))))) re))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(fma.f64 (*.f64 im im) (/.f64 #s(literal 1/2 binary64) re) re)
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(fma.f64 (.f64 im im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 im im) (.f64 re (.f64 re re))) (/.f64 #s(literal 1/2 binary64) re)) 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 (.f64 im im) (fma.f64 (.f64 im im) (fma.f64 im (.f64 im (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 #s(literal -1/8 binary64) (.f64 re (*.f64 re re)))) (/.f64 #s(literal 1/2 binary64) re)) re)
im
(* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))
(fma.f64 im (/.f64 (.f64 re (.f64 re #s(literal 1/2 binary64))) (*.f64 im im)) im)
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))
(fma.f64 im (fma.f64 (.f64 re re) (/.f64 #s(literal 1/2 binary64) (.f64 im im)) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 re re) (.f64 re re))) (.f64 (.f64 im im) (*.f64 im im)))) 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 im (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (fma.f64 (.f64 re re) (/.f64 #s(literal 1/2 binary64) (.f64 im im)) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 re re) (.f64 re re))) (.f64 (.f64 im im) (*.f64 im im))))) im)
(* -1 im)
(neg.f64 im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(.f64 (fma.f64 (.f64 re re) (/.f64 #s(literal 1/2 binary64) (*.f64 im im)) #s(literal 1 binary64)) (neg.f64 im))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(.f64 (fma.f64 (/.f64 (.f64 re re) (.f64 im im)) #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 re re) (.f64 re re)) (.f64 (.f64 im im) (*.f64 im im))) #s(literal 1 binary64))) (neg.f64 im))
(* -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 im (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 re #s(literal 6 binary64)) (pow.f64 im #s(literal 6 binary64))) (fma.f64 (.f64 re re) (/.f64 #s(literal 1/2 binary64) (.f64 im im)) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 re re) (.f64 re re))) (.f64 (.f64 im im) (*.f64 im im))))) im))
im
(+ im (* -1 re))
(-.f64 im re)
(+ im (* re (- (* 1/2 (/ re im)) 1)))
(fma.f64 re (fma.f64 re (/.f64 #s(literal 1/2 binary64) im) #s(literal -1 binary64)) im)
(+ im (* re (- (* re (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))) 1)))
(fma.f64 re (fma.f64 re (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 re re) (.f64 im (*.f64 im im))) (/.f64 #s(literal 1/2 binary64) im)) #s(literal -1 binary64)) im)
(* 1/2 (/ (pow im 2) re))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im im) re))
(/ (+ (* -1/8 (/ (pow im 4) (pow re 2))) (* 1/2 (pow im 2))) re)
(/.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 im im) (.f64 im im)) (.f64 re re)) (.f64 (.f64 im im) #s(literal 1/2 binary64))) 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 #s(literal 1/16 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (.f64 (.f64 re re) (.f64 re re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 im im) (.f64 im im)) (.f64 re re)) (.f64 (*.f64 im im) #s(literal 1/2 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 #s(literal -1/2 binary64) (/.f64 (.f64 (pow.f64 im #s(literal 8 binary64)) #s(literal 5/64 binary64)) (pow.f64 re #s(literal 6 binary64))) (fma.f64 #s(literal 1/16 binary64) (/.f64 (pow.f64 im #s(literal 6 binary64)) (.f64 (.f64 re re) (.f64 re re))) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 im im) (.f64 im im)) (.f64 re re)) (.f64 (.f64 im im) #s(literal 1/2 binary64))))) re)
(* -2 re)
(*.f64 re #s(literal -2 binary64))
(* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2))))))
(.f64 re (neg.f64 (fma.f64 (.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re re)) #s(literal 2 binary64))))
(* -1 (* re (+ 2 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(neg.f64 (.f64 re (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 im im) (.f64 im im)) (.f64 (.f64 re re) (.f64 re re))) (fma.f64 (.f64 im im) (/.f64 #s(literal 1/2 binary64) (*.f64 re 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 (+.f64 (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 im im) (.f64 im im)) (.f64 (.f64 re re) (.f64 re re))) (fma.f64 (.f64 im im) (/.f64 #s(literal 1/2 binary64) (.f64 re re)) #s(literal 2 binary64))) (/.f64 (.f64 #s(literal 1/16 binary64) (pow.f64 im #s(literal 6 binary64))) (pow.f64 re #s(literal 6 binary64)))) (neg.f64 re))
(* 1/2 (/ (pow im 2) re))
(.f64 #s(literal 1/2 binary64) (/.f64 (.f64 im im) re))
(* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re))))
(.f64 (.f64 im im) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 im im) (.f64 re (*.f64 re re))) (/.f64 #s(literal 1/2 binary64) re)))
(* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re))))
(.f64 (.f64 im im) (fma.f64 (.f64 im im) (fma.f64 im (.f64 im (/.f64 #s(literal 1/16 binary64) (pow.f64 re #s(literal 5 binary64)))) (/.f64 #s(literal -1/8 binary64) (.f64 re (.f64 re re)))) (/.f64 #s(literal 1/2 binary64) 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))))
(.f64 (.f64 im im) (fma.f64 im (.f64 im (fma.f64 (.f64 im im) (fma.f64 (/.f64 (.f64 im 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 #s(literal -1/8 binary64) (.f64 re (*.f64 re re))))) (/.f64 #s(literal 1/2 binary64) re)))
im
(* im (+ 1 (* -1 (/ re im))))
(-.f64 im (*.f64 im (/.f64 re im)))
(* im (- (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))) (/ re im)))
(.f64 im (-.f64 (fma.f64 (.f64 re re) (/.f64 #s(literal 1/2 binary64) (*.f64 im im)) #s(literal 1 binary64)) (/.f64 re im)))
(* im (- (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))) (/ re im)))
(.f64 im (-.f64 (fma.f64 (/.f64 (.f64 re re) (.f64 im im)) #s(literal 1/2 binary64) (fma.f64 #s(literal -1/8 binary64) (/.f64 (.f64 (.f64 re re) (.f64 re re)) (.f64 (.f64 im im) (*.f64 im im))) #s(literal 1 binary64))) (/.f64 re im)))
(* -1 im)
(neg.f64 im)
(* -1 (* im (+ 1 (/ re im))))
(neg.f64 (fma.f64 im (/.f64 re im) im))
(* -1 (* im (+ 1 (* -1 (/ (- (* -1/2 (/ (pow re 2) im)) re) im)))))
(fma.f64 im (/.f64 (-.f64 (.f64 #s(literal -1/2 binary64) (/.f64 (.f64 re re) im)) 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)))))
(neg.f64 (fma.f64 im (/.f64 (+.f64 (/.f64 (fma.f64 re (.f64 re #s(literal 1/2 binary64)) (/.f64 (.f64 #s(literal -1/8 binary64) (.f64 (.f64 re re) (.f64 re re))) (.f64 im im))) im) re) im) im))

rewrite299.0ms (3.6%)

Memory

9.1MiB live, 529.8MiB allocated

Algorithm

1×	batch-egg-rewrite

Rules

5 708×	`lower-fma.f64`
5 708×	`lower-fma.f32`
3 650×	`lower-*.f32`
3 642×	`lower-*.f64`
2 118×	`lower-+.f32`

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

eval125.0ms (1.5%)

Memory: -0.5MiB live, 114.2MiB allocated
Compiler: Compiled 15 858 to 2 381 computations (85% saved)

prune89.0ms (1.1%)

Memory

-8.2MiB live, 160.0MiB allocated

Pruning

11 alts after pruning (11 fresh and 0 done)

	Pruned	Kept	Total
New	419	11	430
Fresh	0	0	0
Picked	1	0	1
Done	0	0	0
Total	420	11	431

Accuracy

99.9%

Counts

431 → 11

Alt Table

Click to see full alt table

Status	Accuracy	Program
	37.7%	(.f64 (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64))
▶	78.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
	29.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))))
▶	55.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
▶	52.8%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))))
▶	16.3%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))))
	25.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
▶	52.9%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))
	26.4%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
	53.0%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))))
	26.4%	#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (.f64 im (.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)))))

Compiler

Compiled 284 to 208 computations (26.8% saved)

simplify76.0ms (0.9%)

Memory

21.3MiB live, 60.8MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Rules

1 200×	`lower-fma.f32`
1 198×	`lower-fma.f64`
600×	`lower-*.f32`
582×	`lower-*.f64`
272×	`lower-+.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	36	271
0	61	271
1	84	271
2	112	271
3	138	271
4	172	271
5	246	271
6	393	271
7	629	271
8	1066	271
9	1515	271
10	1918	271
11	2012	271
12	2043	271
13	2067	271
14	2067	271
0	2067	271

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

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

localize147.0ms (1.8%)

Memory

-15.0MiB live, 98.5MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	accuracy	100.0%	(+.f64 #s(literal -2 binary64) (/.f64 re im))
✓	accuracy	99.9%	(fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))
✓	accuracy	92.9%	(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))
✓	accuracy	53.1%	#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))
✓	accuracy	100.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))))
✓	accuracy	92.9%	(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re)))
✓	accuracy	89.1%	(/.f64 (*.f64 im im) re)
✓	accuracy	27.9%	#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (/.f64 (*.f64 im im) re))
✓	accuracy	100.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
✓	accuracy	100.0%	(.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))
✓	accuracy	92.9%	(sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))))
✓	accuracy	55.6%	#s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))
✓	accuracy	100.0%	(*.f64 im #s(literal 2 binary64))
✓	accuracy	100.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))
✓	accuracy	92.9%	(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))
✓	accuracy	52.9%	#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))
✓	accuracy	100.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
✓	accuracy	100.0%	(*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))
✓	accuracy	92.9%	(sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))
✓	accuracy	85.6%	(-.f64 (hypot.f64 re im) re)

Samples

58.0ms	192×	0	valid
12.0ms	24×	2	valid
9.0ms	30×	1	valid
5.0ms	10×	3	valid

Compiler

Compiled 285 to 20 computations (93% saved)

Precisions

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

ival-sub: 18.0ms (39.3% of total)

ival-mult: 8.0ms (17.5% of total)

ival-hypot: 7.0ms (15.3% of total)

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

adjust: 3.0ms (6.5% of total)

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

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

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

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

exact: 0.0ms (0% of total)

series37.0ms (0.5%)

Memory

-1.3MiB live, 35.5MiB allocated

Counts

22 → 516

Calls

Call 1

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

Outputs
#s(alt im (taylor 0 re) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (+ im (* 1/2 (/ (pow re 2) im))) (taylor 0 re) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re 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 (hypot.f64 re im) (patch (hypot.f64 re 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 (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt re (taylor inf re) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))) (taylor inf re) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re 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 (hypot.f64 re im) (patch (hypot.f64 re 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 (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (* -1 re) (taylor -inf re) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re 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 (hypot.f64 re im) (patch (hypot.f64 re 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 (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt re (taylor 0 im) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (+ re (* 1/2 (/ (pow im 2) re))) (taylor 0 im) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re 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 (hypot.f64 re im) (patch (hypot.f64 re 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 (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt im (taylor inf im) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re 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 (hypot.f64 re im) (patch (hypot.f64 re 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 (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re im) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))) (taylor -inf im) (#s(alt (hypot.f64 re im) (patch (hypot.f64 re 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 (hypot.f64 re im) (patch (hypot.f64 re 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 (hypot.f64 re im) (patch (hypot.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 (hypot.f64 re im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor 0 re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor inf im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 re) (* 2 im)) (taylor 0 re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (/ re im) 2))) (taylor 0 re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (* -2 (/ re im)))) (taylor inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor -inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* 2 (/ re im))))) (taylor -inf im) (#s(alt (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re)) (patch (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re 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)) (.f64 im #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<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 im #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<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 im #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<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 im #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<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 im #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<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 im #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))) #<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 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<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 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<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 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<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 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<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 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<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 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64)))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 re) (* 2 im)) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<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 im #s(literal 2 binary64))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<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 im #s(literal 2 binary64))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (* -2 (/ re im)))) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<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 im #s(literal 2 binary64))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<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 im #s(literal 2 binary64))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 im) (#s(alt (.f64 im #s(literal 2 binary64)) (patch (.f64 im #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 im) (#s(alt (.f64 im #s(literal 2 binary64)) (patch (.f64 im #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 im) (#s(alt (.f64 im #s(literal 2 binary64)) (patch (.f64 im #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 im) (#s(alt (.f64 im #s(literal 2 binary64)) (patch (.f64 im #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt (.f64 im #s(literal 2 binary64)) (patch (.f64 im #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt (.f64 im #s(literal 2 binary64)) (patch (.f64 im #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt (.f64 im #s(literal 2 binary64)) (patch (.f64 im #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt (.f64 im #s(literal 2 binary64)) (patch (.f64 im #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor -inf im) (#s(alt (.f64 im #s(literal 2 binary64)) (patch (.f64 im #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor -inf im) (#s(alt (.f64 im #s(literal 2 binary64)) (patch (.f64 im #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor -inf im) (#s(alt (.f64 im #s(literal 2 binary64)) (patch (.f64 im #s(literal 2 binary64)) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor -inf im) (#s(alt (.f64 im #s(literal 2 binary64)) (patch (.f64 im #s(literal 2 binary64)) #<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) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) 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(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) 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(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) 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(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 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 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 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 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor 0 re) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* (sqrt im) (sqrt 2)) (taylor inf im) (#s(alt (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))) (patch (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re)))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 re) (#s(alt (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) (patch (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 re) (* 2 im)) (taylor 0 re) (#s(alt (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) (patch (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (/ re im) 2))) (taylor 0 re) (#s(alt (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) (patch (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) (patch (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) (patch (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) (patch (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) (patch (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) (patch (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) (patch (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) (patch (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) (patch (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) (patch (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) (patch (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) (patch (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) (patch (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) (patch (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) (patch (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (* -2 (/ re im)))) (taylor inf im) (#s(alt (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) (patch (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) (patch (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) (patch (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor -inf im) (#s(alt (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) (patch (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 2 (* 2 (/ re im))))) (taylor -inf im) (#s(alt (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) (patch (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) (patch (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 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) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) (patch (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))) #<representation binary64>) () ())) ())
#s(alt im (taylor 0 re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (+ im (* -1 re)) (taylor 0 re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (+ im (* re (- (* 1/2 (/ re im)) 1))) (taylor 0 re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) 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 (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (pow im 2) re)) (taylor inf re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) 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 (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) 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 (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) 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 (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -2 re) (taylor -inf re) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) 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 (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) 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 (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) 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 (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (pow im 2) re)) (taylor 0 im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) 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 (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) 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 (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) 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 (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt im (taylor inf im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (* -1 (/ re im)))) (taylor inf im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) 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 (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) 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 (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (/ re im)))) (taylor -inf im) (#s(alt #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) 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 (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) 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 (+ (* re re) (* im im))) re) (-.f64 im re)) (patch #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 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)) (/.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 (* 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 (* -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/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 (* 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 (* -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 (* (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 (* (* 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 (* -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 (* (* 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 (* (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 (* -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 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 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 (* -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 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 (* 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 (* -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 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 (/ (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 (/ (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 (/ (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 (/ (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 (/ (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 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 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<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 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<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 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<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 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<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 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<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 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))))) (patch (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))))) #<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 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<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 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<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 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<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 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<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 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<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 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))))) (patch (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 re) (* 2 im)) (taylor 0 re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<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 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -4 re) (taylor -inf re) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<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 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (/ (pow im 2) re) (taylor 0 im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<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 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<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 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* -2 im) (taylor -inf im) (#s(alt #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<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 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #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 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64)))) (patch #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64)))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor 0 re) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* -2 re) (* 2 im)) (taylor 0 re) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (/ re im) 2))) (taylor 0 re) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (+ (* 2 im) (* re (- (/ re im) 2))) (taylor 0 re) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow re 2) im) (taylor inf re) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re)))) (taylor inf re) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re)))) (taylor inf re) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- (+ (* 2 (/ im (pow re 2))) (/ 1 im)) (* 2 (/ 1 re)))) (taylor inf re) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow re 2) im) (taylor -inf re) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (- (/ 1 im) (* 2 (/ 1 re)))) (taylor -inf re) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im))) (taylor -inf re) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* (pow re 2) (+ (* -1 (/ (+ 2 (* -2 (/ im re))) re)) (/ 1 im))) (taylor -inf re) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (pow re 2) im) (taylor 0 im) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* -2 (* im re)) (pow re 2)) im) (taylor 0 im) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im) (taylor 0 im) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (/ (+ (* im (+ (* -2 re) (* 2 im))) (pow re 2)) im) (taylor 0 im) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor inf im) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (* -2 (/ re im)))) (taylor inf im) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* im (+ 2 (+ (* -2 (/ re im)) (/ (pow re 2) (pow im 2))))) (taylor inf im) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* 2 im) (taylor -inf im) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (- (* 2 (/ re im)) 2))) (taylor -inf im) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2))) (taylor -inf im) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (- (* -1 (/ (+ (* -2 re) (/ (pow re 2) im)) im)) 2))) (taylor -inf im) (#s(alt (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) (patch (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (.f64 im #s(literal 2 binary64))) #<representation binary64>) () ())) ())
#s(alt im (taylor 0 re) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (+ im (* -1 re)) (taylor 0 re) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (+ im (* re (- (* 1/2 (/ re im)) 1))) (taylor 0 re) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (pow im 2) re)) (taylor inf re) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (* -2 re) (taylor -inf re) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (+ 2 (* 1/2 (/ (pow im 2) (pow re 2)))))) (taylor -inf re) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (* 1/2 (/ (pow im 2) re)) (taylor 0 im) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt im (taylor inf im) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (* im (+ 1 (* -1 (/ re im)))) (taylor inf im) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) 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 re im) re) (patch (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (* -1 im) (taylor -inf im) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt (* -1 (* im (+ 1 (/ re im)))) (taylor -inf im) (#s(alt (-.f64 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) 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 re im) re) (patch (-.f64 (hypot.f64 re 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 (hypot.f64 re im) re) (patch (-.f64 (hypot.f64 re im) re) #<representation binary64>) () ())) ())
#s(alt -2 (taylor 0 re) (#s(alt (+.f64 #s(literal -2 binary64) (/.f64 re im)) (patch (+.f64 #s(literal -2 binary64) (/.f64 re im)) #<representation binary64>) () ())) ())
#s(alt (- (/ re im) 2) (taylor 0 re) (#s(alt (+.f64 #s(literal -2 binary64) (/.f64 re im)) (patch (+.f64 #s(literal -2 binary64) (/.f64 re im)) #<representation binary64>) () ())) ())
#s(alt (- (/ re im) 2) (taylor 0 re) (#s(alt (+.f64 #s(literal -2 binary64) (/.f64 re im)) (patch (+.f64 #s(literal -2 binary64) (/.f64 re im)) #<representation binary64>) () ())) ())
#s(alt (- (/ re im) 2) (taylor 0 re) (#s(alt (+.f64 #s(literal -2 binary64) (/.f64 re im)) (patch (+.f64 #s(literal -2 binary64) (/.f64 re im)) #<representation binary64>) () ())) ())
#s(alt (/ re im) (taylor inf re) (#s(alt (+.f64 #s(literal -2 binary64) (/.f64 re im)) (patch (+.f64 #s(literal -2 binary64) (/.f64 re im)) #<representation binary64>) () ())) ())
#s(alt (* re (- (/ 1 im) (* 2 (/ 1 re)))) (taylor inf re) (#s(alt (+.f64 #s(literal -2 binary64) (/.f64 re im)) (patch (+.f64 #s(literal -2 binary64) (/.f64 re im)) #<representation binary64>) () ())) ())
#s(alt (* re (- (/ 1 im) (* 2 (/ 1 re)))) (taylor inf re) (#s(alt (+.f64 #s(literal -2 binary64) (/.f64 re im)) (patch (+.f64 #s(literal -2 binary64) (/.f64 re im)) #<representation binary64>) () ())) ())
#s(alt (* re (- (/ 1 im) (* 2 (/ 1 re)))) (taylor inf re) (#s(alt (+.f64 #s(literal -2 binary64) (/.f64 re im)) (patch (+.f64 #s(literal -2 binary64) (/.f64 re im)) #<representation binary64>) () ())) ())
#s(alt (/ re im) (taylor -inf re) (#s(alt (+.f64 #s(literal -2 binary64) (/.f64 re im)) (patch (+.f64 #s(literal -2 binary64) (/.f64 re im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (- (* 2 (/ 1 re)) (/ 1 im)))) (taylor -inf re) (#s(alt (+.f64 #s(literal -2 binary64) (/.f64 re im)) (patch (+.f64 #s(literal -2 binary64) (/.f64 re im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (- (* 2 (/ 1 re)) (/ 1 im)))) (taylor -inf re) (#s(alt (+.f64 #s(literal -2 binary64) (/.f64 re im)) (patch (+.f64 #s(literal -2 binary64) (/.f64 re im)) #<representation binary64>) () ())) ())
#s(alt (* -1 (* re (- (* 2 (/ 1 re)) (/ 1 im)))) (taylor -inf re) (#s(alt (+.f64 #s(literal -2 binary64) (/.f64 re im)) (patch (+.f64 #s(literal -2 binary64) (/.f64 re im)) #<representation binary64>) () ())) ())
#s(alt (/ re im) (taylor 0 im) (#s(alt (+.f64 #s(literal -2 binary64) (/.f64 re im)) (patch (+.f64 #s(literal -2 binary64) (/.f64 re im)) #<representation binary64>) () ())) ())
#s(alt (/ (+ re (* -2 im)) im) (taylor 0 im) (#s(alt (+.f64 #s(literal -2 binary64) (/.f64 re im)) (patch (+.f64 #s(literal -2 binary64) (/.f64 re im)) #<representation binary64>) () ())) ())
#s(alt (/ (+ re (* -2 im)) im) (taylor 0 im) (#s(alt (+.f64 #s(literal -2 binary64) (/.f64 re im)) (patch (+.f64 #s(literal -2 binary64) (/.f64 re im)) #<representation binary64>) () ())) ())
#s(alt (/ (+ re (* -2 im)) im) (taylor 0 im) (#s(alt (+.f64 #s(literal -2 binary64) (/.f64 re im)) (patch (+.f64 #s(literal -2 binary64) (/.f64 re im)) #<representation binary64>) () ())) ())
#s(alt -2 (taylor inf im) (#s(alt (+.f64 #s(literal -2 binary64) (/.f64 re im)) (patch (+.f64 #s(literal -2 binary64) (/.f64 re im)) #<representation binary64>) () ())) ())
#s(alt (- (/ re im) 2) (taylor inf im) (#s(alt (+.f64 #s(literal -2 binary64) (/.f64 re im)) (patch (+.f64 #s(literal -2 binary64) (/.f64 re im)) #<representation binary64>) () ())) ())
#s(alt (- (/ re im) 2) (taylor inf im) (#s(alt (+.f64 #s(literal -2 binary64) (/.f64 re im)) (patch (+.f64 #s(literal -2 binary64) (/.f64 re im)) #<representation binary64>) () ())) ())
#s(alt (- (/ re im) 2) (taylor inf im) (#s(alt (+.f64 #s(literal -2 binary64) (/.f64 re im)) (patch (+.f64 #s(literal -2 binary64) (/.f64 re im)) #<representation binary64>) () ())) ())
#s(alt -2 (taylor -inf im) (#s(alt (+.f64 #s(literal -2 binary64) (/.f64 re im)) (patch (+.f64 #s(literal -2 binary64) (/.f64 re im)) #<representation binary64>) () ())) ())
#s(alt (- (/ re im) 2) (taylor -inf im) (#s(alt (+.f64 #s(literal -2 binary64) (/.f64 re im)) (patch (+.f64 #s(literal -2 binary64) (/.f64 re im)) #<representation binary64>) () ())) ())
#s(alt (- (/ re im) 2) (taylor -inf im) (#s(alt (+.f64 #s(literal -2 binary64) (/.f64 re im)) (patch (+.f64 #s(literal -2 binary64) (/.f64 re im)) #<representation binary64>) () ())) ())
#s(alt (- (/ re im) 2) (taylor -inf im) (#s(alt (+.f64 #s(literal -2 binary64) (/.f64 re im)) (patch (+.f64 #s(literal -2 binary64) (/.f64 re im)) #<representation binary64>) () ())) ())

Calls

129 calls:

Time	Variable		Point	Expression
2.0ms	im	@	0	(+ -2 (/ re im))
0.0ms	im	@	inf	(/ (* im im) re)
0.0ms	im	@	0	(/ (* im im) re)
0.0ms	re	@	0	(/ (* im im) re)
0.0ms	re	@	inf	(+ (* re (+ -2 (/ re im))) (* im 2))

simplify559.0ms (6.8%)

Memory

1.2MiB live, 452.1MiB allocated

Algorithm

1×	egg-herbie

Rules

11 522×	`lower-fma.f64`
11 522×	`lower-fma.f32`
8 304×	`lower-*.f64`
8 304×	`lower-*.f32`
3 166×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	583	12963
1	1894	12197
2	6621	12123
0	8274	11548

Stop Event

1×	iter limit
1×	node limit

Counts

516 → 508

Calls

Call 1

Inputs
im
(+ im (* 1/2 (/ (pow re 2) im)))
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
im
(* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/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))))))))
(* 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)))))))
(* -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/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))))))))))
(* 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)))))))
(* -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))))))))
(* (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)))
(+ (* -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 (* (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 (+ (* -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))))))))))
(* (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 (* (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)
(+ (* -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)
(/ (+ (* -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)
(* -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) (+ (* -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)
(* 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)
(* -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 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))))))))
(* 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)))))))
(* -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/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))))))))))
(* 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)))))))
(* -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))))))))
(* (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)))
(+ (* -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 (* (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 (+ (* -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))))))))))
(* (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 (* (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)
(+ (* -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)
(/ (+ (* -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)
(* -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) (+ (* -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)
(* 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)
(* -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)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 2 im)
(* 1/2 (* (sqrt im) (sqrt 2)))
(+ (* -1/4 (* (sqrt (/ 1 im)) (* re (sqrt 2)))) (* 1/2 (* (sqrt im) (sqrt 2))))
(+ (* 1/2 (* (sqrt im) (sqrt 2))) (* re (+ (* -1/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))))))))
(* 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)))))))
(* -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/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))))))))))
(* 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)))))))
(* -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))))))))
(* (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)))
(+ (* -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 (* (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 (+ (* -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))))))))))
(* (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 (* (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)
(+ (* -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)
(/ (+ (* -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)
(* -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) (+ (* -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)
(* 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)
(* -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)))))
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 (/ (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)
(* -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 (/ (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))))
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 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 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))))))))
(* 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)))))))
(* -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/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))))))))))
(* 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)))))))
(* -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))))))))
(* (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)))
(+ (* -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 (* (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 (+ (* -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))))))))))
(* (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 (* (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)
(+ (* -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)
(/ (+ (* -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)
(* -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) (+ (* -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)
(* 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)
(* -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)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(/ (pow im 2) re)
(* 1/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))))))))
(* 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)))))))
(* -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/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))))))))))
(* 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)))))))
(* -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))))))))
(* (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)))
(+ (* -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 (* (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 (+ (* -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))))))))))
(* (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 (* (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)
(+ (* -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)
(/ (+ (* -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)
(* -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) (+ (* -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)
(* 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)
(* -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 re) (* 2 im))
(+ (* 2 im) (* re (- (/ re im) 2)))
(+ (* 2 im) (* re (- (/ re im) 2)))
(/ (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))))
(/ (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)))
(/ (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)
(* 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)))))
(* 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)))
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 (/ (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)
(* -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 (/ (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))))
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 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)))))
-2
(- (/ re im) 2)
(- (/ re im) 2)
(- (/ re im) 2)
(/ re im)
(* re (- (/ 1 im) (* 2 (/ 1 re))))
(* re (- (/ 1 im) (* 2 (/ 1 re))))
(* re (- (/ 1 im) (* 2 (/ 1 re))))
(/ re im)
(* -1 (* re (- (* 2 (/ 1 re)) (/ 1 im))))
(* -1 (* re (- (* 2 (/ 1 re)) (/ 1 im))))
(* -1 (* re (- (* 2 (/ 1 re)) (/ 1 im))))
(/ re im)
(/ (+ re (* -2 im)) im)
(/ (+ re (* -2 im)) im)
(/ (+ re (* -2 im)) im)
-2
(- (/ re im) 2)
(- (/ re im) 2)
(- (/ re im) 2)
-2
(- (/ re im) 2)
(- (/ re im) 2)
(- (/ re im) 2)

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

rewrite410.0ms (5%)

Memory

-0.4MiB live, 504.9MiB allocated

Algorithm

1×	batch-egg-rewrite

Rules

9 910×	`lower-fma.f32`
9 908×	`lower-fma.f64`
5 444×	`lower-*.f32`
5 426×	`lower-*.f64`
3 422×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	36	240
0	61	240
1	168	240
2	1026	240
0	8496	240

Stop Event

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

Counts

22 → 376

Calls

Call 1

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

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

eval183.0ms (2.2%)

Memory: 15.4MiB live, 171.8MiB allocated
Compiler: Compiled 25 374 to 2 342 computations (90.8% saved)

prune102.0ms (1.2%)

Memory

-22.0MiB live, 143.0MiB allocated

Pruning

13 alts after pruning (9 fresh and 4 done)

	Pruned	Kept	Total
New	895	3	898
Fresh	0	6	6
Picked	1	4	5
Done	0	0	0
Total	896	13	909

Accuracy

99.9%

Counts

909 → 13

Alt Table

Click to see full alt table

Status	Accuracy	Program
▶	55.2%	(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64)))
	37.7%	(.f64 (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64))
✓	78.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
	29.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))))
▶	45.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im (/.f64 (*.f64 im re) im))))))
✓	55.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
✓	52.8%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))))
▶	20.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))))
▶	25.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
✓	52.9%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))
	26.4%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (.f64 (.f64 (sqrt.f64 #s(literal 2 binary64)) (*.f64 (sqrt.f64 #s(literal 1/2 binary64)) im)) (sqrt.f64 (/.f64 #s(literal 1 binary64) re)))))
	53.0%	(.f64 #s(literal 1/2 binary64) #s(approx (sqrt ( 2 (- (sqrt (+ (* re re) (* im im))) re))) (*.f64 (sqrt.f64 im) (sqrt.f64 #s(literal 2 binary64)))))
▶	26.4%	#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (.f64 im (.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)))))

Compiler

Compiled 290 to 211 computations (27.2% saved)

simplify183.0ms (2.2%)

Memory

35.6MiB live, 189.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 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))
✓	cost-diff	0	(.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)))
✓	cost-diff	0	(.f64 im (.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))))
✓	cost-diff	0	#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (.f64 im (.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)))))
✓	cost-diff	0	(.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im (/.f64 (*.f64 im re) im))))
✓	cost-diff	0	(sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im (/.f64 (*.f64 im re) im)))))
✓	cost-diff	0	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im (/.f64 (*.f64 im re) im))))))
✓	cost-diff	1024	(/.f64 (*.f64 im re) im)
✓	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	(*.f64 re #s(literal -4 binary64))
✓	cost-diff	0	#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))
✓	cost-diff	0	(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))
✓	cost-diff	0	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
✓	cost-diff	0	#s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))
✓	cost-diff	0	(sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))
✓	cost-diff	0	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im re))))
✓	cost-diff	0	(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64)))

Rules

3 050×	`lower-fma.f64`
3 050×	`lower-fma.f32`
3 048×	`lower-*.f32`
3 022×	`lower-*.f64`
1 462×	`unsub-neg`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	44	386
0	69	374
1	103	374
2	176	362
3	342	362
4	633	362
5	1391	362
6	4074	362
7	6158	362
0	8116	287

Stop Event

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

Calls

Call 1

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

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

localize249.0ms (3%)

Memory

-31.4MiB live, 169.6MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	accuracy	99.8%	(.f64 im (.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))))
✓	accuracy	99.7%	(*.f64 (sqrt.f64 (/.f64 #s(literal 1 binary64) re)) (sqrt.f64 #s(literal 1/2 binary64)))
✓	accuracy	99.6%	(.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)))
✓	accuracy	76.7%	#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (.f64 im (.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)))))
✓	accuracy	100.0%	(.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im (/.f64 (*.f64 im re) im))))
✓	accuracy	92.9%	(sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ ( re re) (* im im))) re) (-.f64 im (/.f64 (*.f64 im re) im)))))
✓	accuracy	86.5%	(/.f64 (*.f64 im re) im)
✓	accuracy	75.0%	#s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im (/.f64 (*.f64 im re) im)))
✓	accuracy	100.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))))
✓	accuracy	99.9%	(*.f64 (/.f64 im re) im)
✓	accuracy	92.9%	(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im)))
✓	accuracy	77.2%	#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))
✓	accuracy	100.0%	(*.f64 re #s(literal -4 binary64))
✓	accuracy	100.0%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
✓	accuracy	92.9%	(sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64))))
✓	accuracy	50.9%	#s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))
✓	accuracy	100.0%	(sqrt.f64 #s(literal 2 binary64))
✓	accuracy	99.6%	(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64)))
✓	accuracy	93.3%	(sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))
✓	accuracy	75.0%	#s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re))

Samples

88.0ms	10×	3	valid
27.0ms	128×	0	invalid
14.0ms	30×	1	valid
13.0ms	64×	0	valid
12.0ms	24×	2	valid

Compiler

Compiled 295 to 31 computations (89.5% saved)

Precisions

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

ival-hypot: 69.0ms (54.4% of total)

ival-sub: 24.0ms (18.9% of total)

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

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

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

adjust: 3.0ms (2.4% of total)

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

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

exact: 0.0ms (0% of total)

series54.0ms (0.7%)

Memory

8.1MiB live, 59.3MiB allocated

Counts

22 → 468

Calls

Call 1

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

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

Calls

117 calls:

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

simplify465.0ms (5.7%)

Memory

12.3MiB live, 597.9MiB allocated

Algorithm

1×	egg-herbie

Rules

10 324×	`lower-fma.f64`
10 324×	`lower-fma.f32`
8 330×	`lower-*.f64`
8 330×	`lower-*.f32`
4 282×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	746	11766
1	2494	11061
2	7512	11037
0	8183	10579

Stop Event

1×	iter limit
1×	node limit

Counts

468 → 440

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

rewrite411.0ms (5%)

Memory

21.3MiB live, 616.7MiB allocated

Algorithm

1×	batch-egg-rewrite

Rules

8 854×	`lower-fma.f64`
8 854×	`lower-fma.f32`
4 440×	`lower-*.f32`
4 414×	`lower-*.f64`
2 946×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	44	336
0	69	325
1	182	312
2	973	288
0	8979	213

Stop Event

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

Counts

22 → 256

Calls

Call 1

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

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

eval117.0ms (1.4%)

Memory: -22.6MiB live, 184.1MiB allocated
Compiler: Compiled 15 839 to 1 623 computations (89.8% saved)

prune95.0ms (1.2%)

Memory

4.2MiB live, 246.1MiB allocated

Pruning

14 alts after pruning (6 fresh and 8 done)

	Pruned	Kept	Total
New	699	4	703
Fresh	2	2	4
Picked	1	4	5
Done	0	4	4
Total	702	14	716

Accuracy

100.0%

Counts

716 → 14

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	55.2%	(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64)))
▶	53.0%	(.f64 (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (- (sqrt (+ (* re re) (* im im))) re)) (sqrt.f64 im))) (sqrt.f64 #s(literal 2 binary64)))
▶	37.7%	(.f64 (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64))
✓	78.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
▶	29.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))))
✓	45.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im (/.f64 (*.f64 im re) im))))))
✓	55.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
✓	52.8%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))))
✓	20.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))))
✓	25.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
✓	52.9%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))
▶	26.6%	#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re)))
▶	26.6%	#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im))
	26.4%	#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))

Compiler

Compiled 239 to 170 computations (28.9% saved)

simplify74.0ms (0.9%)

Memory

-6.7MiB live, 72.2MiB allocated

Algorithm

1×	egg-herbie

Localize:

Found 20 expressions of interest:

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

Rules

752×	`lower-fma.f32`
750×	`lower-fma.f64`
544×	`lower-*.f32`
526×	`lower-*.f64`
238×	`associate-r`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	38	280
0	61	280
1	75	280
2	100	280
3	127	280
4	157	280
5	203	280
6	303	280
7	426	280
8	564	280
9	645	280
10	719	280
11	733	280
12	753	280
13	775	280
14	805	280
15	836	280
16	896	280
17	1025	280
18	1197	280
19	1275	280
20	1522	280
21	1575	280
22	1592	280
0	1592	240

Stop Event

1×	iter limit
1×	saturated
1×	iter limit

Calls

Call 1

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

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

localize107.0ms (1.3%)

Memory

10.3MiB live, 219.2MiB allocated

Localize:

Found 20 expressions of interest:

New	Metric	Score	Program
✓	accuracy	100.0%	(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))
✓	accuracy	92.9%	(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re)))
✓	accuracy	85.6%	(-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re)
✓	accuracy	71.6%	(sqrt.f64 (fma.f64 re re (*.f64 im im)))
✓	accuracy	92.9%	(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 #s(approx (+ ( re re) (* im im)) (*.f64 im im))) re)))
✓	accuracy	85.6%	(-.f64 (sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im))) re)
✓	accuracy	80.8%	#s(approx (+ (* re re) (* im im)) (*.f64 im im))
✓	accuracy	71.6%	(sqrt.f64 #s(approx (+ (* re re) (* im im)) (*.f64 im im)))
✓	accuracy	100.0%	(*.f64 im #s(literal 1/2 binary64))
✓	accuracy	100.0%	(sqrt.f64 re)
✓	accuracy	99.8%	(/.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re))
✓	accuracy	76.7%	#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re)))
✓	accuracy	100.0%	(sqrt.f64 re)
✓	accuracy	99.8%	(*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im)
✓	accuracy	99.8%	(/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))
✓	accuracy	76.7%	#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im))
✓	accuracy	100.0%	(sqrt.f64 im)
✓	accuracy	100.0%	(sqrt.f64 #s(literal 2 binary64))
✓	accuracy	99.6%	(.f64 (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (- (sqrt (+ (* re re) (* im im))) re)) (sqrt.f64 im))) (sqrt.f64 #s(literal 2 binary64)))
✓	accuracy	76.1%	#s(approx (sqrt (- (sqrt (+ (* re re) (* im im))) re)) (sqrt.f64 im))

Samples

24.0ms	128×	0	invalid
13.0ms	30×	1	valid
12.0ms	64×	0	valid
11.0ms	24×	2	valid
6.0ms	10×	3	valid

Compiler

Compiled 252 to 25 computations (90.1% saved)

Precisions

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

ival-mult: 15.0ms (38.7% of total)

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

ival-hypot: 7.0ms (18.1% of total)

adjust: 2.0ms (5.2% of total)

ival-div: 2.0ms (5.2% of total)

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

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

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

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

exact: 0.0ms (0% of total)

series31.0ms (0.4%)

Memory

-17.6MiB live, 60.4MiB allocated

Counts

23 → 480

Calls

Call 1

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

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

Calls

120 calls:

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

simplify467.0ms (5.7%)

Memory

7.8MiB live, 633.8MiB allocated

Algorithm

1×	egg-herbie

Rules

9 888×	`lower-fma.f64`
9 888×	`lower-fma.f32`
7 632×	`lower-*.f64`
7 632×	`lower-*.f32`
4 694×	`lower-+.f64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	786	11280
1	2634	10657
2	7975	10657
0	8004	10169

Stop Event

1×	iter limit
1×	node limit

Counts

480 → 468

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))))))))
(* 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)))))))
(* -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/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))))))))))
(* 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)))))))
(* -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/2 (sqrt im))
(+ (* -1/4 (* (sqrt (/ 1 im)) re)) (* 1/2 (sqrt im)))
(+ (* 1/2 (sqrt im)) (* re (+ (* -1/4 (sqrt (/ 1 im))) (* 1/16 (* (sqrt (/ 1 (pow im 3))) re)))))
(+ (* 1/2 (sqrt im)) (* re (+ (* -1/4 (sqrt (/ 1 im))) (* re (+ (* 1/32 (* (sqrt (/ 1 (pow im 5))) re)) (* 1/16 (sqrt (/ 1 (pow im 3)))))))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(+ (* -1/32 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))))
(+ (* -1/32 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* 1/64 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))))
(+ (* -1/32 (* (/ (pow im 3) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (+ (* -1/1024 (* (/ (pow im 5) (pow (sqrt 1/2) 3)) (sqrt (/ 1 (pow re 9))))) (+ (* 1/64 (* (/ (pow im 5) (sqrt 1/2)) (sqrt (/ 1 (pow re 9))))) (* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re)))))))
(* -1/2 (* (sqrt re) (* (sqrt -1) (sqrt 2))))
(* -1 (* re (+ (* -1/8 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re)))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(* -1 (* re (+ (* -1 (/ (+ (* -1/32 (* (/ (* (pow im 4) (sqrt -1)) (sqrt 2)) (sqrt (/ 1 (pow re 3))))) (+ (* 1/64 (* (/ (* (pow im 4) (sqrt -1)) (pow (sqrt 2) 3)) (sqrt (/ 1 (pow re 3))))) (* 1/8 (* (/ (* (pow im 2) (sqrt -1)) (sqrt 2)) (sqrt re))))) (pow re 3))) (* 1/2 (* (sqrt (/ 1 re)) (* (sqrt -1) (sqrt 2)))))))
(* 1/2 (* (* im (sqrt 1/2)) (sqrt (/ 1 re))))
(* im (+ (* -1/32 (* (/ (pow im 2) (sqrt 1/2)) (sqrt (/ 1 (pow re 5))))) (* 1/2 (* (sqrt (/ 1 re)) (sqrt 1/2)))))
(* im (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt 1/2))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* 1/4 (* (/ (* (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 (+ (* 1/2 (* (sqrt (/ 1 re)) (sqrt 1/2))) (* (pow im 2) (+ (* -1/32 (* (sqrt (/ 1 (pow re 5))) (/ 1 (sqrt 1/2)))) (* (pow im 2) (+ (* -1/4 (* (/ (* (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/4 (* (sqrt re) (/ (- (* 1/16 (/ 1 (pow re 5))) (* 1/256 (/ 1 (* (pow re 5) (pow (sqrt 1/2) 2))))) (sqrt 1/2))))))))))
(* 1/2 (sqrt im))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) re)) (* 1/2 (sqrt (/ 1 im)))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (sqrt (/ 1 im))))))
(* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) re)) (+ (* -1/16 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (+ (* 1/8 (* (sqrt (/ 1 (pow im 5))) (pow re 2))) (* 1/2 (sqrt (/ 1 im)))))))
(* -1/2 (* (sqrt im) (sqrt -1)))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt -1))))))
(* -1 (* im (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (+ (* -1/8 (* (sqrt (/ 1 (pow im 5))) (* (pow re 2) (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt -1)))))))
(* -1 (* im (+ (* -1 (/ (+ (* 1/16 (* (sqrt im) (* (pow re 2) (sqrt -1)))) (* 1/8 (* (sqrt im) (* (pow re 2) (sqrt -1))))) (pow im 3))) (+ (* -1/4 (* (sqrt (/ 1 (pow im 3))) (* re (sqrt -1)))) (* 1/2 (* (sqrt (/ 1 im)) (sqrt -1)))))))
(sqrt im)
(+ (sqrt im) (* -1/2 (* (sqrt (/ 1 im)) re)))
(+ (sqrt im) (* re (+ (* -1/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 (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 (* (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))))))
(* (* 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))))))))))
(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)))))))
(* -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))))))
(sqrt im)
(sqrt im)
(sqrt im)
(sqrt im)
(sqrt im)
(sqrt im)
(sqrt im)
(sqrt im)
(* -1 (* (sqrt im) (pow (sqrt -1) 2)))
(* -1 (* (sqrt im) (pow (sqrt -1) 2)))
(* -1 (* (sqrt im) (pow (sqrt -1) 2)))
(* -1 (* (sqrt im) (pow (sqrt -1) 2)))
(* 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))))))))
(* 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)))))))
(* -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/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))))))))))
(* 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)))))))
(* -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/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(* 1/2 (sqrt (/ 1 re)))
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(sqrt re)
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(* -1 (* (sqrt re) (pow (sqrt -1) 2)))
(* 1/2 (* (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))))))))
(* 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)))))))
(* -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/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))))))))))
(* 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)))))))
(* -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/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 (* im (sqrt (/ 1 re))))
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 1/2 im)
(* 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))))))))
(* 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)))))))
(* -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/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))))))))))
(* 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)))))))
(* -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))))))))
(* (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)))
(+ (* -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 (* (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 (+ (* -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))))))))))
(* (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 (* (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)
(+ (* -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)
(/ (+ (* -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)
(* -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) (+ (* -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)
(* 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)
(* -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)))))
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 (/ (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)
(* -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 (/ (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))))
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 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 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))))))))
(* 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)))))))
(* -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/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))))))))))
(* 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)))))))
(* -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))))))))
(* (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)))
(+ (* -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 (* (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 (+ (* -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))))))))))
(* (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 (* (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)
(+ (* -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)
(/ (+ (* -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)
(* -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) (+ (* -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)
(* 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)
(* -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)))))
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 (/ (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)
(* -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 (/ (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))))
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 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)))))
im
(+ im (* 1/2 (/ (pow re 2) im)))
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
im
(* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))
(pow im 2)
(+ (pow im 2) (pow re 2))
(+ (pow im 2) (pow re 2))
(+ (pow im 2) (pow re 2))
(pow re 2)
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(pow re 2)
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(* (pow re 2) (+ 1 (/ (pow im 2) (pow re 2))))
(pow re 2)
(+ (pow im 2) (pow re 2))
(+ (pow im 2) (pow re 2))
(+ (pow im 2) (pow re 2))
(pow im 2)
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(pow im 2)
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
(* (pow im 2) (+ 1 (/ (pow re 2) (pow im 2))))
im
(+ im (* 1/2 (/ (pow re 2) im)))
(+ im (* (pow re 2) (+ (* -1/8 (/ (pow re 2) (pow im 3))) (* 1/2 (/ 1 im)))))
(+ im (* (pow re 2) (+ (* (pow re 2) (- (* 1/16 (/ (pow re 2) (pow im 5))) (* 1/8 (/ 1 (pow im 3))))) (* 1/2 (/ 1 im)))))
re
(* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2)))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2))))))
(* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 re)
(* -1 (* re (+ 1 (* 1/2 (/ (pow im 2) (pow re 2))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (* 1/2 (/ (pow im 2) (pow re 2)))))))
(* -1 (* re (+ 1 (+ (* -1/8 (/ (pow im 4) (pow re 4))) (+ (* 1/16 (/ (pow im 6) (pow re 6))) (* 1/2 (/ (pow im 2) (pow re 2))))))))
re
(+ re (* 1/2 (/ (pow im 2) re)))
(+ re (* (pow im 2) (+ (* -1/8 (/ (pow im 2) (pow re 3))) (* 1/2 (/ 1 re)))))
(+ re (* (pow im 2) (+ (* (pow im 2) (- (* 1/16 (/ (pow im 2) (pow re 5))) (* 1/8 (/ 1 (pow re 3))))) (* 1/2 (/ 1 re)))))
im
(* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2)))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2))))))
(* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 im)
(* -1 (* im (+ 1 (* 1/2 (/ (pow re 2) (pow im 2))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (* 1/2 (/ (pow re 2) (pow im 2)))))))
(* -1 (* im (+ 1 (+ (* -1/8 (/ (pow re 4) (pow im 4))) (+ (* 1/16 (/ (pow re 6) (pow im 6))) (* 1/2 (/ (pow re 2) (pow im 2))))))))

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

rewrite357.0ms (4.3%)

Memory

14.7MiB live, 580.4MiB allocated

Algorithm

1×	batch-egg-rewrite

Rules

4 988×	`lower-fma.f32`
4 986×	`lower-fma.f64`
4 132×	`lower-*.f32`
4 114×	`lower-*.f64`
2 842×	`lower-/.f32`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	38	249
0	61	249
1	136	249
2	680	249
3	6377	249
0	8288	203

Stop Event

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

Counts

23 → 530

Calls

Call 1

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

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

eval119.0ms (1.5%)

Memory: 0.8MiB live, 261.8MiB allocated
Compiler: Compiled 27 272 to 2 995 computations (89% saved)

prune167.0ms (2%)

Memory

4.7MiB live, 383.0MiB allocated

Pruning

16 alts after pruning (3 fresh and 13 done)

	Pruned	Kept	Total
New	1 024	2	1 026
Fresh	0	1	1
Picked	0	5	5
Done	0	8	8
Total	1 024	16	1 040

Accuracy

100.0%

Counts

1 040 → 16

Alt Table

Click to see full alt table

Status	Accuracy	Program
✓	55.2%	(.f64 (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))) (sqrt.f64 #s(literal 2 binary64)))
✓	53.0%	(.f64 (.f64 #s(literal 1/2 binary64) #s(approx (sqrt (- (sqrt (+ (* re re) (* im im))) re)) (sqrt.f64 im))) (sqrt.f64 #s(literal 2 binary64)))
✓	37.7%	(.f64 (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (*.f64 im im))) re))) #s(literal 1/2 binary64))
	44.9%	(.f64 (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (.f64 im (-.f64 (fma.f64 #s(literal 1/2 binary64) (/.f64 (.f64 re re) (*.f64 im im)) #s(literal 1 binary64)) (/.f64 re im)))))) #s(literal 1/2 binary64))
✓	78.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re))))
✓	29.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))))
✓	45.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im (/.f64 (*.f64 im re) im))))))
✓	55.1%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) #s(approx (- (sqrt (+ (* re re) (* im im))) re) (-.f64 im re)))))
✓	52.8%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (fma.f64 re (+.f64 #s(literal -2 binary64) (/.f64 re im)) (*.f64 im #s(literal 2 binary64))))))
✓	20.2%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 (/.f64 im re) im))))
✓	25.4%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 re #s(literal -4 binary64)))))
✓	52.9%	(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))
	26.5%	#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (/.f64 #s(literal 1 binary64) (sqrt.f64 re)) (/.f64 #s(literal 2 binary64) im)))
✓	26.6%	#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re)))
✓	26.6%	#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im))
	26.4%	#s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (.f64 (.f64 (sqrt.f64 (/.f64 #s(literal 1/2 binary64) re)) (*.f64 im #s(literal 1/2 binary64))) (sqrt.f64 #s(literal 2 binary64))))

Compiler

Compiled 436 to 240 computations (45% saved)

regimes46.0ms (0.6%)

Memory

-19.9MiB live, 96.6MiB allocated

Counts

21 → 2

Calls

Call 1

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

Outputs

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

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

Calls

7 calls:

8.0ms	(*.f64 im im)
7.0ms	re
7.0ms	(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))
6.0ms	im
6.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))))

Results

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

Compiler

Compiled 69 to 45 computations (34.8% saved)

regimes44.0ms (0.5%)

Memory

21.4MiB live, 101.6MiB allocated

Counts

20 → 4

Calls

Call 1

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

Calls

7 calls:

8.0ms	(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))
7.0ms	re
6.0ms	im
5.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))))
5.0ms	(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)

Results

Accuracy	Segments	Branch
67.8%	2	`im`
67.8%	2	`(*.f64 im im)`
78.3%	4	`re`
75.8%	4	`(.f64 #s(literal 1/2 binary64) (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re))))`
75.8%	4	`(sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re)))`
75.8%	3	`(.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (*.f64 im im))) re))`
75.8%	3	`(-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re)`

Compiler

Compiled 69 to 45 computations (34.8% saved)

regimes6.0ms (0.1%)

Memory

-27.4MiB live, 12.1MiB allocated

Counts

14 → 3

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

5.0ms

re

Results

Accuracy	Segments	Branch
76.0%	3	`re`

Compiler

Compiled 3 to 2 computations (33.3% saved)

regimes2.0ms (0%)

Memory

4.7MiB live, 4.7MiB allocated

Counts

4 → 3

Calls

Call 1

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

Outputs

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

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

Calls

1 calls:

2.0ms

re

Results

Accuracy	Segments	Branch
76.0%	3	`re`

Compiler

Compiled 3 to 2 computations (33.3% saved)

regimes12.0ms (0.2%)

Memory

23.8MiB live, 23.8MiB 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 im #s(literal 2 binary64)))))

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

Outputs

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

Calls

7 calls:

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

Results

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

Compiler

Compiled 69 to 45 computations (34.8% saved)

regimes3.0ms (0%)

Memory

6.0MiB live, 6.0MiB allocated

Counts

2 → 2

Calls

Call 1

Inputs

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

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

Outputs

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

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

Calls

2 calls:

1.0ms	im
1.0ms	(*.f64 im im)

Results

Accuracy	Segments	Branch
67.6%	2	`im`
67.6%	2	`(*.f64 im im)`

Compiler

Compiled 8 to 5 computations (37.5% saved)

regimes9.0ms (0.1%)

Memory

-19.7MiB live, 19.8MiB 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 im #s(literal 2 binary64)))))

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

Calls

7 calls:

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

Results

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

Compiler

Compiled 69 to 45 computations (34.8% saved)

bsearch0.0ms (0%)

Memory

0.5MiB live, 0.5MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	0.0	4.0705065467001306e-297

Compiler

Compiled 20 to 17 computations (15% saved)

bsearch178.0ms (2.2%)

Memory

16.6MiB live, 96.1MiB allocated

Algorithm

3×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
141.0ms	4.076815261952109e+48	4.2884465454990997e+54
14.0ms	-9.859125467551463e-140	-3.878217626321764e-149
17.0ms	-8.567379203308901e+115	-5.916955944259253e+99

Samples

124.0ms	26×	3	valid
23.0ms	367×	0	valid
5.0ms	31×	2	valid
3.0ms	24×	1	valid

Compiler

Compiled 713 to 529 computations (25.8% saved)

Precisions

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

ival-hypot: 128.0ms (88.6% of total)

ival-mult: 6.0ms (4.2% of total)

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

ival-sub: 3.0ms (2.1% of total)

adjust: 1.0ms (0.7% of total)

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

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

exact: 0.0ms (0% of total)

bsearch32.0ms (0.4%)

Memory

-24.7MiB live, 53.0MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
17.0ms	4.076815261952109e+48	4.2884465454990997e+54
13.0ms	-2.3578504752404086e+117	-8.567379203308901e+115

Samples

13.0ms	160×	0	valid
4.0ms	25×	2	valid
3.0ms	13×	3	valid
1.0ms	10×	1	valid

Compiler

Compiled 372 to 277 computations (25.5% saved)

Precisions

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

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

ival-mult: 3.0ms (18.5% of total)

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

adjust: 1.0ms (6.2% of total)

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

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

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

exact: 0.0ms (0% of total)

bsearch2.0ms (0%)

Memory

3.6MiB live, 3.6MiB allocated

Algorithm

2×	binary-search

Stop Event

1×	narrow-enough
1×	narrow-enough

Steps

Time	Left	Right
1.0ms	4.076815261952109e+48	4.2884465454990997e+54
1.0ms	-2.3578504752404086e+117	-8.567379203308901e+115

Compiler

Compiled 372 to 277 computations (25.5% saved)

bsearch0.0ms (0%)

Memory

0.5MiB live, 0.5MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	5.545720175136278e-217	3.607423327500276e-216

Compiler

Compiled 20 to 17 computations (15% saved)

bsearch0.0ms (0%)

Memory

0.4MiB live, 0.4MiB allocated

Algorithm

1×	left-value

Steps

Time	Left	Right
0.0ms	5.545720175136278e-217	3.607423327500276e-216

Compiler

Compiled 20 to 17 computations (15% saved)

simplify10.0ms (0.1%)

Memory

21.5MiB live, 21.5MiB allocated

Algorithm

1×	egg-herbie

Rules

26×	`*-commutative_binary64`
12×	`+-commutative_binary64`
10×	`sub-neg_binary64`
2×	`neg-sub0_binary64`
2×	`neg-mul-1_binary64`

Iterations

Useful iterations: 0 (0.0ms)

Iter	Nodes	Cost
0	73	374
1	91	374
2	98	374
3	100	374
4	101	374

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)) #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))))
(if (<=.f64 re #s(literal -5200000000000000080908963873227583726194647263989519453522807018240335662056729656977924027558246727916272660512768 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 re #s(literal -4 binary64))))) (if (<=.f64 re #s(literal -4744948142682277/3514776401986872174070733209129673327241950873673372369609965291102998109899599898686750536018664732148375711432438199315006457855854921632037902485050909261824 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #s(literal 1/2 binary64)) (if (<=.f64 re #s(literal 55000000000000004196373412600537851812230734020608 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))))) #s(approx ( 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re))))))
(if (<=.f64 re #s(literal -141999999999999993460434191252244011956075689892305262125829698848328651222312884223815928570433044675968583791017984 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 re #s(literal -4 binary64))))) (if (<=.f64 re #s(literal 10199999999999999635931214913710396059377234608128 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))))) #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re)))))
(if (<=.f64 re #s(literal -141999999999999993460434191252244011956075689892305262125829698848328651222312884223815928570433044675968583791017984 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 re #s(literal -4 binary64))))) (if (<=.f64 re #s(literal 10199999999999999635931214913710396059377234608128 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))))) #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im))))
(if (<=.f64 (.f64 im im) #s(literal 1552518092300709/1552518092300708935148979488462502555256886017116696611139052038026050952686376886330878408828646477950487730697131073206171580044114814391444287275041181139204454976020849905550265285631598444825262999193716468750892846853816057856 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 re #s(literal -4 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 im im) #s(literal 1552518092300709/1552518092300708935148979488462502555256886017116696611139052038026050952686376886330878408828646477950487730697131073206171580044114814391444287275041181139204454976020849905550265285631598444825262999193716468750892846853816057856 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 re #s(literal -4 binary64))))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))

Outputs
(if (<=.f64 (-.f64 (sqrt.f64 (+.f64 (.f64 re re) (.f64 im im))) re) #s(literal 0 binary64)) #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 (*.f64 #s(literal 2 binary64) (-.f64 (hypot.f64 re im) re)))))
(if (<=.f64 re #s(literal -5200000000000000080908963873227583726194647263989519453522807018240335662056729656977924027558246727916272660512768 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 re #s(literal -4 binary64))))) (if (<=.f64 re #s(literal -4744948142682277/3514776401986872174070733209129673327241950873673372369609965291102998109899599898686750536018664732148375711432438199315006457855854921632037902485050909261824 binary64)) (.f64 (sqrt.f64 (.f64 #s(literal 2 binary64) (-.f64 (sqrt.f64 (fma.f64 re re (.f64 im im))) re))) #s(literal 1/2 binary64)) (if (<=.f64 re #s(literal 55000000000000004196373412600537851812230734020608 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))))) #s(approx ( 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re))))))
(if (<=.f64 re #s(literal -5200000000000000080908963873227583726194647263989519453522807018240335662056729656977924027558246727916272660512768 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 re #s(literal -4 binary64))))) (if (<=.f64 re #s(literal -4744948142682277/3514776401986872174070733209129673327241950873673372369609965291102998109899599898686750536018664732148375711432438199315006457855854921632037902485050909261824 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)))) (if (<=.f64 re #s(literal 55000000000000004196373412600537851812230734020608 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 im #s(literal 2 binary64))))) #s(approx ( 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re))))))
(if (<=.f64 re #s(literal -141999999999999993460434191252244011956075689892305262125829698848328651222312884223815928570433044675968583791017984 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 re #s(literal -4 binary64))))) (if (<=.f64 re #s(literal 10199999999999999635931214913710396059377234608128 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))))) #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (/.f64 (*.f64 im #s(literal 1/2 binary64)) (sqrt.f64 re)))))
(if (<=.f64 re #s(literal -141999999999999993460434191252244011956075689892305262125829698848328651222312884223815928570433044675968583791017984 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 re #s(literal -4 binary64))))) (if (<=.f64 re #s(literal 10199999999999999635931214913710396059377234608128 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))))) #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re)) im))))
(if (<=.f64 re #s(literal -141999999999999993460434191252244011956075689892305262125829698848328651222312884223815928570433044675968583791017984 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 re #s(literal -4 binary64))))) (if (<=.f64 re #s(literal 10199999999999999635931214913710396059377234608128 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))))) #s(approx (* 1/2 (sqrt (* 2 (- (sqrt (+ (* re re) (* im im))) re)))) (*.f64 im (/.f64 #s(literal 1/2 binary64) (sqrt.f64 re))))))
(if (<=.f64 (.f64 im im) #s(literal 1552518092300709/1552518092300708935148979488462502555256886017116696611139052038026050952686376886330878408828646477950487730697131073206171580044114814391444287275041181139204454976020849905550265285631598444825262999193716468750892846853816057856 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 re #s(literal -4 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 im im) #s(literal 1552518092300709/1552518092300708935148979488462502555256886017116696611139052038026050952686376886330878408828646477950487730697131073206171580044114814391444287275041181139204454976020849905550265285631598444825262999193716468750892846853816057856 binary64)) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (.f64 re #s(literal -4 binary64))))) (.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx (* 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64))))))
(.f64 #s(literal 1/2 binary64) (sqrt.f64 #s(approx ( 2 (- (sqrt (+ (* re re) (* im im))) re)) (*.f64 im #s(literal 2 binary64)))))

soundness573.0ms (7%)

Memory

-4.6MiB live, 466.9MiB allocated

Rules

11 848×	`lower-fma.f64`
11 848×	`lower-fma.f32`
8 854×	`lower-fma.f64`
8 854×	`lower-fma.f32`
8 470×	`lower-*.f64`

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
0	551	3257
1	1814	3103
2	6380	3088
0	8197	2913
0	44	336
0	69	325
1	182	312
2	973	288
0	8979	213

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

Compiler

Compiled 489 to 280 computations (42.7% saved)

preprocess62.0ms (0.8%)

Memory: 16.5MiB live, 97.9MiB allocated
Remove: (abs im)
Compiler: Compiled 478 to 184 computations (61.5% 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

analyze92.0ms (1.1%)

sample1.4s (16.7%)

preprocess66.0ms (0.8%)

explain251.0ms (3.1%)

eval0.0ms (0%)

prune1.0ms (0%)

simplify32.0ms (0.4%)

localize83.0ms (1%)

series23.0ms (0.3%)

simplify382.0ms (4.7%)

rewrite299.0ms (3.6%)

eval125.0ms (1.5%)

prune89.0ms (1.1%)

simplify76.0ms (0.9%)

localize147.0ms (1.8%)

series37.0ms (0.5%)

simplify559.0ms (6.8%)

rewrite410.0ms (5%)

eval183.0ms (2.2%)

prune102.0ms (1.2%)

simplify183.0ms (2.2%)

localize249.0ms (3%)

series54.0ms (0.7%)

simplify465.0ms (5.7%)

rewrite411.0ms (5%)

eval117.0ms (1.4%)

prune95.0ms (1.2%)

simplify74.0ms (0.9%)

localize107.0ms (1.3%)

series31.0ms (0.4%)

simplify467.0ms (5.7%)

rewrite357.0ms (4.3%)

eval119.0ms (1.5%)

prune167.0ms (2%)

regimes46.0ms (0.6%)

regimes44.0ms (0.5%)

regimes6.0ms (0.1%)

regimes2.0ms (0%)

regimes12.0ms (0.2%)

regimes3.0ms (0%)

regimes9.0ms (0.1%)

bsearch0.0ms (0%)

bsearch178.0ms (2.2%)

bsearch32.0ms (0.4%)

bsearch2.0ms (0%)

bsearch0.0ms (0%)

bsearch0.0ms (0%)

simplify10.0ms (0.1%)

soundness573.0ms (7%)

preprocess62.0ms (0.8%)

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